Parameters
Signature
val profunctor_1 : unit -> (('a, 'b) P.t, ('a, 'b) P.t) Law.tval profunctor_2 : unit -> (('a, 'b) P.t, ('a, 'b) P.t) Law.tval profunctor_3 : unit -> (('a, 'b) P.t, ('a, 'b) P.t) Law.tval profunctor_4 : 
  unit ->
  ('a -> 'b, ('c -> 'd) -> ('b, 'c) P.t -> ('a, 'd) P.t) Law.tval profunctor_5 : 
  unit ->
  ('a ->
    'b,
    ('c -> 'a) ->
    ('d -> 'e) ->
    ('f -> 'd) ->
    ('b, 'f) P.t ->
    ('c, 'e) P.t)
    Law.tval profunctor_6 : 
  unit ->
  ('a -> 'b, ('c -> 'a) -> ('b, 'd) P.t -> ('c, 'd) P.t) Law.tval profunctor_7 : 
  unit ->
  ('a -> 'b, ('c -> 'a) -> ('d, 'c) P.t -> ('d, 'b) P.t) Law.t