!7

cmodule Maybe > DynPrintLog {
  start-thread {
    dm_useLocalMechListCopies();
    
    /*L<WordTokRule> rules = map wordTokReplacerRuleOnXY(splitAtEmptyLines([[
      [heard] you must watch {this trick}
      => [implied] {this trick} is very good
      
      [heard] you must watch {this trick}
      + [fact] i have watched {this trick}
      => [say] Thanks, I've seen it already
      
      [heard] you must watch {this trick}
      + [fact] i have not watched {this trick}
      => [say] Well... I haven't seen it yet, so maybe I should
    ]]));*/
    
    L<WordTokRule> rules = ll(
      set(WordTokReplacer_es1(
        "you must watch {this trick}", "",
        "{this trick} is very good",
        type := "implied"), requiredInputType := 'heard),
        
      /*WordTokReplacer_es1(
        "you must watch {this trick}", "",
        you must watch {this trick}
      + [fact] i have watched {this trick}
      => [say] Thanks, I've seen it already*/
      
    );
    
    S s = "you must watch this trick";
    
    pnl(/*uniquifyMap tok_dropCurlyBrackets*/(iterateHull(func(ExtS s) -> L<ExtS> {
      listPlusNempties_es(
        applyAttractors_es(rules, ll(s)),
        extMap tok_dropCurlyBrackets(s),
        extMap ai_dropFillers1(s),
        extMap ai_groupTheAdjectiveNoun(s),
        printWith extToString(extMap ai_groupSimplestNounPhrases2(s)))
    }, makeExt(s, type := "heard"))));
  }
}