let compare = Char.compare