sig   module State :     sig       type t = Random.State.t       val make : int array -> BatRandom.Incubator.Private_state_enums.State.t       val make_self_init :         unit -> BatRandom.Incubator.Private_state_enums.State.t       val copy :         BatRandom.Incubator.Private_state_enums.State.t ->         BatRandom.Incubator.Private_state_enums.State.t       val bits : BatRandom.Incubator.Private_state_enums.State.t -> int       val int : BatRandom.Incubator.Private_state_enums.State.t -> int -> int       val int32 :         BatRandom.Incubator.Private_state_enums.State.t -> Int32.t -> Int32.t       val nativeint :         BatRandom.Incubator.Private_state_enums.State.t ->         Nativeint.t -> Nativeint.t       val int64 :         BatRandom.Incubator.Private_state_enums.State.t -> Int64.t -> Int64.t       val float :         BatRandom.Incubator.Private_state_enums.State.t -> float -> float       val bool : BatRandom.Incubator.Private_state_enums.State.t -> bool       val char : BatRandom.Incubator.Private_state_enums.State.t -> char       val enum_bits :         BatRandom.Incubator.Private_state_enums.State.t ->         unit -> int BatEnum.t       val enum_int :         BatRandom.Incubator.Private_state_enums.State.t ->         int -> int BatEnum.t       val enum_bool :         BatRandom.Incubator.Private_state_enums.State.t ->         unit -> bool BatEnum.t       val enum_float :         BatRandom.Incubator.Private_state_enums.State.t ->         float -> float BatEnum.t       val enum_int32 :         BatRandom.Incubator.Private_state_enums.State.t ->         Int32.t -> Int32.t BatEnum.t       val enum_int64 :         BatRandom.Incubator.Private_state_enums.State.t ->         Int64.t -> Int64.t BatEnum.t       val enum_nativeint :         BatRandom.Incubator.Private_state_enums.State.t ->         Nativeint.t -> Nativeint.t BatEnum.t       val enum_char :         BatRandom.Incubator.Private_state_enums.State.t ->         unit -> char BatEnum.t       val perturb :         BatRandom.Incubator.Private_state_enums.State.t ->         BatRandom.Incubator.Private_state_enums.State.t     end   val enum_bits : unit -> int BatEnum.t   val enum_int : int -> int BatEnum.t   val enum_bool : unit -> bool BatEnum.t   val enum_float : float -> float BatEnum.t   val enum_int32 : Int32.t -> Int32.t BatEnum.t   val enum_int64 : Int64.t -> Int64.t BatEnum.t   val enum_nativeint : Nativeint.t -> Nativeint.t BatEnum.t   val enum_char : unit -> char BatEnum.t end