Doing some stuff to actually into Haskell