I am a terrible person. Need to leark Haskell