Haskell rna transcription