Intrinsics_intf.M
module StateM : State.StateM.S
module type Impl = sig ... end
module type S = sig ... end