wk8 lab - mapM' , filterM'
wk8 lab - foldLeftM
wk8 lab - foldRightM