Alternative.Suite_right_absorbtion
module R : Model.COVARIANT_1
module F : Preface_specs.ALTERNATIVE with type 'a t = 'a R.t
module A : Model.T0
module B : Model.T0
module C : Model.T0
val tests : count:int -> QCheck2.Test.t list