val eval: ('s, 'x, unit) t -> 's -> 'x -> 'x
+(** Use [bridge x f m] to lower the state-continuation monad [m], then bridge
+ with the initial context [x] and a map function [f], and finally lift the
+ result to another state-contination monad, one that evaluates [m] using the
+ state bridged from the result monad.
+val bridge: 'x -> ('x -> 'y) -> ('s, 'x, unit) t -> ('s, 'y, unit) t
(*--- End of File [ cf_scmonad.mli ] ---*)