genAction
  :: Member (Writer Journal) effs
  => GenAction
  -> Eff effs ()
genAction action = tell $ def{ genActions = [action]}
genAction
  :: Member (Writer Journal) effs
  => GenAction
  -> Eff effs ()
genAction action = tell $ def{ genActions = [action]}
genAction action = tell $ def{ genActions = [action]}