Module Domain_product

module Domain_product: sig .. end

module Make: 
functor (Value : Abstract_value.S-> 
functor (Left : Abstract_domain.Internal with type value = Value.t-> 
functor (Right : Abstract_domain.Internal with type value = Left.value and type location = Left.location-> Abstract_domain.Internal with type value = Value.t and type location = Left.location and type state = Left.state * Right.state