Quickcheck Clone implemented in Racket