use list monad notation instead of comprehension.