added monad test: for-expression to flatMap/map