module type OrderedType =sig..end
Set.Make ファンクタの入力のシグネチャ。type t
val compare : t -> t -> intf です。
すなわち、 f e1 e2 は e1 と e2 が等しい場合に 0 を返し、
e1 が e2 よりも小さい場合には厳密に負の数を返し、
e1 が e2 よりも大きい場合には厳密に正の数を返します。
例: 順序関数として適切なものとしては、汎用構造比較関数 compare があります。