Как-то было обсуждение с Onix, можно ли использовать индекс для LIKE. Он предложил использовать индексацию по фрагментам слова, я предложил выборку по ним по zig-zag.
LIKE использует в шаблонах метасимволы
* - любая последовательность
? - один символ

Вот что получилось:
like.zip
Для теста берется несколько слов прошитых в коде, подпрограммка test проводит поиск и вывод найденного. Отдельные функции ADDWORD и DELWORD добавляют и удаляют.
Функция DEPTHS() возвращает число букв для подслов. Если увеличить - то индекс займет больше места но теоретически может и ускорить поиск.

Нужна поддержка со стороны прикладников, у кого есть большая база слов - хотелось бы узнать, стоит ли овчинка выделки и есть ли выигрыш по времени на больших базах.

Не, там код в общем на MUMPS с расширениями MiniM. По инерции уже ставлю new с инициализацией.
n a=expr заменяемо на n a s a=expr.