Parameter Bifunctor.1-B

type ('a, 'b) t
val bimap : ('a -> 'b) -> ('c -> 'd) -> ('a, 'c) t -> ('b, 'd) t