!7

concept Entry {
  S input;
}

cmodule QuestionSolver > DynCRUD<Entry> {
  S pattern;
  
  start {
    onConceptsChangeAndNow(r makePattern);
  }
  
  visualize {
    ret centerAndSouth(super.visualize(), withMargin(jSection("Combined Pattern", dm_label('pattern)));
  }
  
  void makePattern q {
    LS inputs = collect input(list(Entry));
    setField(pattern := combineToNLPattern_tryToIncludePunctuation(inputs));
  }
}