|(defun abcd(y)
| (if(= y 10) (print (abc y))
| (progn
| (defun abc(x)
| (if(= x (* y 10)) nil
| (cons x (abc (+ x y)))
| )
| )
| (print (abc y))
| (abcd (+ y 1))
| )
| )
|)
|(print (abcd 1))
|(defun abcd(y)
| (if(= y 10) (print (abc y))
| (progn
| (defun abc(x)
| (if(= x (* y 10)) nil
| (cons x (abc (+ x y)))
| )
| )
| (print (abc y))
| (abcd (+ y 1))
| )
| )
|)
|(print (abcd 1))