Module Make.Triple

The triple interface lifted into a monad.

val fst : ('a * 'b * 'c) M.t -> 'a M.t

fst (x,y,z) computes x

val snd : ('a * 'b * 'c) M.t -> 'b M.t

snd (x,y,z computes y

val trd : ('a * 'b * 'c) M.t -> 'c M.t

trd (x,y,z) computes z