val (<$>) : ('a, 'b) Bijection.topt -> 'a t -> 'b tval ($>) : unit t -> (unit, 'a) Bijection.topt -> 'a tval (<$) : 'a t -> (unit, 'a) Bijection.topt -> unit t1-S.Optionval (<$>) : ('a, 'b) Bijection.topt -> 'a t -> 'b tval ($>) : unit t -> (unit, 'a) Bijection.topt -> 'a tval (<$) : 'a t -> (unit, 'a) Bijection.topt -> unit t