qse/ase/test/lsp/t2.lsp

171 lines
1.4 KiB
Common Lisp

;(setq x (lambda (x) (+ x 20 30 40)))
(defun x(x) (+ x 20 30 40))
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 100)
(x 200)
(x 200)
(x 200)
(x 200)
(x 200)