static L<LS> ai_applyPrefixPairs(L<Pair<LS>> pairs, final LS x) {
  ret map(func(Pair<LS> p) -> LS { ai_applyPrefixPair(p, x) },
    orderListPairsByLengthOfADesc(uniquify(
      ai_findAPrefixesInPairsListCI(ai_prefixPairs(pairs), x))));
}