Syntax (monads.Monads.Std.Monad.Seq.Make2.Syntax)

val (>>=) : ('a, 'e) T2(M).t -> ('a -> ('b, 'e) T2(M).t) -> ('b, 'e) T2(M).t

m >>= f is bind m f

val (>>|) : ('a, 'e) T2(M).t -> ('a -> 'b) -> ('b, 'e) T2(M).t

m >>= f is map m ~f

val (>=>) : 
  ('a -> ('b, 'e) T2(M).t) ->
  ('b -> ('c, 'e) T2(M).t) ->
  'a ->
  ('c, 'e) T2(M).t

f >=> g is fun x -> f x >>= g

val (!!) : 'a -> ('a, 'e) T2(M).t

!!x is return x

val (!$) : ('a -> 'b) -> ('a, 'e) T2(M).t -> ('b, 'e) T2(M).t

!$f is Lift.unary f

val (!$$) : 
  ('a -> 'b -> 'c) ->
  ('a, 'e) T2(M).t ->
  ('b, 'e) T2(M).t ->
  ('c, 'e) T2(M).t

!$$f is Lift.binary f

val (!$$$) : 
  ('a -> 'b -> 'c -> 'd) ->
  ('a, 'e) T2(M).t ->
  ('b, 'e) T2(M).t ->
  ('c, 'e) T2(M).t ->
  ('d, 'e) T2(M).t

!$$$f is Lift.ternary f

val (!$$$$) : 
  ('a -> 'b -> 'c -> 'd -> 'e) ->
  ('a, 's) T2(M).t ->
  ('b, 's) T2(M).t ->
  ('c, 's) T2(M).t ->
  ('d, 's) T2(M).t ->
  ('e, 's) T2(M).t

!$$$$f is Lift.quaternary f

val (!$$$$$) : 
  ('a -> 'b -> 'c -> 'd -> 'e -> 'f) ->
  ('a, 's) T2(M).t ->
  ('b, 's) T2(M).t ->
  ('c, 's) T2(M).t ->
  ('d, 's) T2(M).t ->
  ('e, 's) T2(M).t ->
  ('f, 's) T2(M).t

!$$$$$f is Lift.quinary f