jlexer.hs : a lexer for j, in haskell