!7

cprint {
  start-thread {
    S rule = "revealing secret opening preparation => he reveals his secret opening preparation";
    LS sides = splitAtDoubleArrow(rule);
    SS data = listToMapWithKeyMaker(sides, i -> str(i+1));
    
    new LineCompCompressor comp;
    comp.byteMode = true;
    comp.loadTexts(data);
    comp.run();
    
    //print(comp.asText());
    lcPrintSubstrings(comp);
  }
}