Module Cgr.Run_tests


module Run_tests: Cgr_run_tests
Running tests.

type test = string * (Cgr_types.sequence -> bool) 
type generator = string * (int -> Cgr_types.sequence) 
type test_matrix = (test, generator, float) Cgr_matrix.matrix 
val run_tests : ?cols:int ->
Pervasives.out_channel ->
(string * ('a -> bool)) list ->
(string * (int -> 'a)) list ->
int ->
int list ->
(int * (string * ('a -> bool), string * (int -> 'a), float) Cgr_matrix.matrix)
list