Module Fields.Direct

val iter : t -> seed:((tSeed.t) Fieldslib.Field.t -> t -> Seed.t -> Base.unit) -> test_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.unit) -> shrink_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.unit) -> sizes:((tBase.int Base.Sequence.t) Fieldslib.Field.t -> t -> Base.int Base.Sequence.t -> Base.unit) -> Base.unit
val fold : t -> init:'acc__0 -> seed:('acc__0 -> (tSeed.t) Fieldslib.Field.t -> t -> Seed.t -> 'acc__1) -> test_count:('acc__1 -> (tBase.int) Fieldslib.Field.t -> t -> Base.int -> 'acc__2) -> shrink_count:('acc__2 -> (tBase.int) Fieldslib.Field.t -> t -> Base.int -> 'acc__3) -> sizes:('acc__3 -> (tBase.int Base.Sequence.t) Fieldslib.Field.t -> t -> Base.int Base.Sequence.t -> 'acc__4) -> 'acc__4
val for_all : t -> seed:((tSeed.t) Fieldslib.Field.t -> t -> Seed.t -> Base.bool) -> test_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.bool) -> shrink_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.bool) -> sizes:((tBase.int Base.Sequence.t) Fieldslib.Field.t -> t -> Base.int Base.Sequence.t -> Base.bool) -> Base.bool
val exists : t -> seed:((tSeed.t) Fieldslib.Field.t -> t -> Seed.t -> Base.bool) -> test_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.bool) -> shrink_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.bool) -> sizes:((tBase.int Base.Sequence.t) Fieldslib.Field.t -> t -> Base.int Base.Sequence.t -> Base.bool) -> Base.bool
val to_list : t -> seed:((tSeed.t) Fieldslib.Field.t -> t -> Seed.t -> 'elem__) -> test_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> 'elem__) -> shrink_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> 'elem__) -> sizes:((tBase.int Base.Sequence.t) Fieldslib.Field.t -> t -> Base.int Base.Sequence.t -> 'elem__) -> 'elem__ Base.list
val map : t -> seed:((tSeed.t) Fieldslib.Field.t -> t -> Seed.t -> Seed.t) -> test_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.int) -> shrink_count:((tBase.int) Fieldslib.Field.t -> t -> Base.int -> Base.int) -> sizes:((tBase.int Base.Sequence.t) Fieldslib.Field.t -> t -> Base.int Base.Sequence.t -> Base.int Base.Sequence.t) -> t
val set_all_mutable_fields : t -> Base.unit