(if (= (* 2 2) 4)
(print "if-then-else: equal")
(print "if-then-else: non equal"))
; ==> if-then-else: equal
(if (= (* 2 2) 6)
; ==> if-then-else: non equal