Indexed_selective.Suitemodule R : Model.COVARIANT_2module F : Preface_specs.INDEXED_SELECTIVE with type ('a, 'index) t = ('a, 'index) R.tmodule Laws : sig ... endmodule Applicative : sig ... endval print : (Format.formatter -> 'a -> unit) -> ('a, Index.t) R.t -> stringval selective_1 : int -> QCheck2.Test.tval selective_2 : int -> QCheck2.Test.tval selective_3 : int -> QCheck2.Test.tval selective_4 : int -> QCheck2.Test.tval selective_5 : int -> QCheck2.Test.tval selective_6 : int -> QCheck2.Test.tval selective_7 : int -> QCheck2.Test.tval tests : count:int -> QCheck2.Test.t list