1-35 in both racket and haskell