Add foldM, foldM_