Rename 1989/jar.2/try.txt try.lisp

Updated scripts, documentation, .entry.json and manifest.
This commit is contained in:
Cody Boone Ferguson committed 2024-05-06 09:58:55 -07:00
1 parent 33aaf98d23
commit e074751f93
10 files changed
+16 -16

No files matched your search

+18
View File
@@ -0,0 +1,18 @@
(+ 2.5 3.1)
(defun fib (n)
(if (< n 2)
1
(+ (fib (- n 2)) (fib (- n 1)))))
(fib 10)
(defun ! (x) (if (equal x 0) 1 (* x (! (- x 1)))))
(! 7)
(defun fn1 (fn) (+ (fn 1 2) (fn 3 4)))
(defun fn2 (a b) (+ a b))
(fn1 (function +))
(fn1 (function fn2))
(fn1 (function (lambda (z1 z2) (+ z1 z2))))
(quote a)
(cons (quote (a b)) (quote (c d e)))
(cons (quote (f)) ())
(car (quote (a b c)))
(cdr (cdr (quote (g h i))))