sig
type
t = string
val
compare : string
->
string
->
int
end