valeri/example.vli

15 lines
193 B
Text
Raw Normal View History

;;((fn (f y) (f y))
;;(fn (x) (* x x))
;;2)
;;(((fn (x)
;;(fn () (* x x 2)))
;;2))
(fn fact (n)
(if (<= n 0)
1
(* n (fact (- n 1)))))
(println "12! =" (fact 12))