Added TestSequence monad.