Module QCheck.Print

module Print: sig .. end

type 'a t = 'a -> string 

val int : int t

val bool : bool t

val float : float t

val char : char t

val string : string t

val option : 'a t -> 'a option t

val pair : 'a t -> 'b t -> ('a * 'b) t

val triple : 'a t ->
       'b t -> 'c t -> ('a * 'b * 'c) t

val quad : 'a t ->
       'b t ->
       'c t -> 'd t -> ('a * 'b * 'c * 'd) t

val list : 'a t -> 'a list t

val array : 'a t -> 'a array t

val comap : ('a -> 'b) -> 'b t -> 'a t