Funkcia vráti zoznam, ktorý vznikne zámenou všetkých výskytov prvku1 za prvok2 v zadanom zozname na najvyššej úrovni.
Príklady:
(zmen 'X 'Y '(1 X 2 X)) ; -> (1 Y 2 Y) (zmen 'X '(X) '(1 X 2 X)) ; -> (1 (X) 2 (X))