Parameters
module State : sig ... end
Signature
include S with type 'a t = State.t -> 'a * State.t
val bind : 'a t -> f:('a -> 'b t) -> 'b t
val map : 'a t -> f:('a -> 'b) -> 'b t
val ap : ('a -> 'b) t -> 'a t -> 'b t
val prod : 'a t -> 'b t -> ('a * 'b) t