sig
type
t
val
compare :
Mapext
.
OrderedType
.t
->
Mapext
.
OrderedType
.t
->
int
end