Module type GapiMonad.StateMonad

module type StateMonad = sig .. end

include GapiMonad.Monad

val get : 'a -> 'a * 'a

val put : 'a -> 'b -> unit * 'a