seqno in Haskell.