module Value_product: sig .. end
sig
end
module Make: functor (Left : Abstract_value.S) -> functor (Right : Abstract_value.S) -> Abstract_value.S with type t = Left.t * Right.t
functor (
Left
:
Abstract_value.S
) ->
Right
with type t = Left.t * Right.t