Functor Typename.Same_witness_exn_1

module Same_witness_exn_1: 
functor (A : S1) ->
functor (B : S1) -> sig .. end
Parameters:
A : S1
B : S1

type t = {
   eq : 'a. ('a A.t, 'a B.t) Type_equal.t;
}
val witness : t