sig
type
t
val
compare : t
->
t
->
int
val
default : t
end