static LS sharedPhrases_characterMode(S... strings) {
  ret stringsSortedByDecreasingLength(intersectCISets(stringsToLineCompSplits(strings)));
}