let
cg () = char_of_int (
Random
.int 255)