let
equal x y = compare x y = 0