!7

sclass Entry {
  S text, wordsTaken;
}

module ELESentencePrefixes > DynObjectTable<Entry> {
  start { doEvery(1.0, r grab); }
  
  void grab enter {
    if (!ele_on()) ret;
    setList(mapI(countIterator_exclusive(1, countTokens(tok)+1),
      i -> Entry(text := getSentencePrefix(tok, i/2), 
        wordsTaken := i + "/" + countTokens(tok))));
  }
}