подставлять строки во вложенном списке в commonlisp

Question

У меня есть вложенный список ((«H», «E», «L», «L», «O») («T», «H», «I», «S») («I», «S») («A") (" T "" E "" S "" T ")) Я хочу заменить каждую строку в списке другой строкой, используя замену, но это не работает, мой код:

(substitute "H" "W" paragraph)

абзацимя вложенного списка.

Answer 1

Используйте SUBST:

(setq new-list (subst "W" "H" old-list :test #'string=))

Если вам нужно изменить список на месте, используйте NSUBST и присвойте результат исходной переменной:

(setq old-list (nsubst "W" "H" old-list :test #'string=))