Module Operator.Choice

type t = private int
val fresh : unit -> t