cfAction
  :: Member (Writer Journal) effs
  => CfAction
  -> Eff effs ()
cfAction action = tell $ def{ cfActions = [action]}
cfAction
  :: Member (Writer Journal) effs
  => CfAction
  -> Eff effs ()
cfAction action = tell $ def{ cfActions = [action]}
cfAction action = tell $ def{ cfActions = [action]}