blob: 6f4abb83ac6917b2ab0a5614e49d8aaf7a483e3a [file] [log] [blame]
swissChili8fc5e2f2021-04-22 13:45:10 -07001(defun two-plus-two ()
2 (+ 2 2))
swissChilica107a02021-04-14 12:07:30 -07003
swissChilia820dea2021-05-09 16:46:55 -07004(defun hmm-main ()
swissChili8fc5e2f2021-04-22 13:45:10 -07005 (print "64 / (2 + 2) =")
swissChili53472e82021-05-08 16:06:32 -07006 (print (/ 64 (two-plus-two)))
7 (print nil))
swissChilia820dea2021-05-09 16:46:55 -07008
9(defun main ()
10 (if t
11 (print 1)
12 (print 2)))