Porting Teensy Pass to haskell