module Mfloat_natural: sig .. end
sig
end
module Create: functor (D : Mdata.S) -> sig .. end
functor (
D
:
Mdata.S
) ->