Implementations of Finite State Transducers in Haskell