1(**************************************************************************) 2(* *) 3(* OCaml *) 4(* *) 5(* Pierre Chambart, OCamlPro *) 6(* Mark Shinwell and Leo White, Jane Street Europe *) 7(* *) 8(* Copyright 2013--2016 OCamlPro SAS *) 9(* Copyright 2014--2016 Jane Street Group LLC *) 10(* *) 11(* All rights reserved. This file is distributed under the terms of *) 12(* the GNU Lesser General Public License version 2.1, with the *) 13(* special exception on linking described in the file LICENSE. *) 14(* *) 15(**************************************************************************) 16 17(** Modules about numbers that satisfy {!Identifiable.S}. *) 18 19module Int : sig 20 include Identifiable.S with type t = int 21 22 (** [zero_to_n n] is the set of numbers \{0, ..., n\} (inclusive). *) 23 val zero_to_n : int -> Set.t 24end 25 26module Float : Identifiable.S with type t = float 27