turtle like LOGO in haskell