cond implemented

special form, not as a macro

debug.lsp

@@ -1,5 +1,14 @@
-(defun a (aa) (print aa))
-(a 1 2)
+(define a 20)
+(cond 
+	((> a 30) (print "a > 30"))
+	((> a 20) (print "a > 20"))
+	(1 (print "a je" a)))
+
+(define a 25)
+(cond 
+	((> a 30) (print "a > 30"))
+	((> a 20) (print "a > 20"))
+	(1 (print "a je" a)))
 
 ;; (define csv_date (str-to-date "01/01/2021" "%m/%d/%Y"))
 ;; (date-to-str 3141583200 "%m/%d/%Y")