Up
Module
Same_witness_exn_3
(
A
:
S3
) (
B
:
S3
)
Parameters
A
:
S3
B
:
S3
Signature
type
t = {
eq
: 'a 'b 'c . (('a, 'b, 'c)
A.t
, ('a, 'b, 'c)
B.t
)
Type_equal.t
;
}
val
witness :
t