!7

cmodule Maybe > DynPrintLog {

  start-thread {

    dm_useLocalMechListCopies();

    L<WordTokRule> rules = map wordTokReplacerRuleOnXY(tlftj([[

      I'm drinking X => I drink X

      I drink the wrong stuff => {I drink X} and {it is wrong to drink X}

      X and Y => X

      X and Y => Y

      {I drink X} and {it is wrong to drink X} => I do {something wrong}

      I do something wrong => bad

      I do something good => good

    ]]));

    S s = "maybe i'm drinking the wrong stuff";

    pnl(uniquifyMap tok_dropCurlyBrackets(iterateHull(func(S s) -> LS {

      listPlusNempties(

        applyWordTokRules(rules, s),

        tok_dropCurlyBrackets(s),

        ai_dropFillers1(s),

        ai_groupTheAdjectiveNoun(s))

    }, s)));

  }

}