sig
  val ( >>= ) :
    'a GapiMonad.MonadCombinators.m ->
    ('a -> 'b GapiMonad.MonadCombinators.m) ->
    'b GapiMonad.MonadCombinators.m
  val ( >> ) :
    'a GapiMonad.MonadCombinators.m ->
    'b GapiMonad.MonadCombinators.m -> 'b GapiMonad.MonadCombinators.m
end