(defun z%-adder-suber-%x)
(defun z-adder-x (a b) (+ a b))
(defun z-suber-x (a b) (- a b))

(let zz (z-adder-suber-x 2 3 1))
(print "RESULT=" zz "\n")
(print "HELLO" " " "WORLD" "!" "\n")
