Function Tree-Substitute

Part of:

package cl-perec
( tree-substitute < new > < old > < list > &key < from-end > (test #'eql) (test-not nil) (end nil) (count nil) (key nil) (start 0) )
Starting from LIST non-destructively replaces OLD with NEW.