Module Same_witness_exn_4 (A : S4) (B : S4)

type t = {

eq

: 'a 'b 'c 'd . (('a, 'b, 'c, 'd) A.t, ('a, 'b, 'c, 'd) B.t) Type_equal.t

;

}