Module 1-Machine.Triple

The triple interface lifted into a monad.

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

fst (x,y,z) computes x

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

snd (x,y,z computes y

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

trd (x,y,z) computes z