Try to foldM