more StateT exercises
more StateT exercises (fix applicative)