!7

cmodule ELEPrefixSuffixSplitter > DynPrintLog {
  transient LS
    prefixes = ll("un", "pre"),
    suffixes = ll("able", "like", "ology", "ing", "y", "ist");

  start {
    dm_onUserUtteranceWithoutMine(ivf1 processInput);
  }
  
  void processInput(S input) {
    print(input);
    for (S s : prefixes)
      if (swic(input, s))
        emit(joinPairWithSpace(pairOfNFirstAndRest(input, l(s))));
    for (S s : suffixes)
      if (ewic(input, s))
        emit(joinPairWithSpace(pairOfRestAndNLast(input, l(s))));
  }
}