diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp
index 6f4abb8..08b96ba 100644
--- a/src/lisp/test.lisp
+++ b/src/lisp/test.lisp
@@ -1,12 +1,7 @@
-(defun two-plus-two ()
-  (+ 2 2))
-
-(defun hmm-main ()
-  (print "64 / (2 + 2) =")
-  (print (/ 64 (two-plus-two)))
-  (print nil))
+(defun add-two (a)
+  (+ a 2))
 
 (defun main ()
   (if t
-    (print 1)
-    (print 2)))
+    (print (add-two (* 4 3)))
+    (print (- 3 6))))