nsubst-if (nsubst-if new predicate tree &key key) subst-if と同じです。木は変更されません(nsubst を参照)。 Run(nsubst-if 0 #'numberp (list 1 (list 2 'x))) ; => (0 (0 X))