The Code-Bin
Links
Home
Add your code!
All Listings
About
Latest Entry
Featured Scripts
Author's Website
Latest Entries
FFMPEG Thumbnail Scr...
PHP, 0.8KB
Jul. 29, 10:24pm
John
Z80 Assembler, 190 bytes
Feb. 17, 3:36am
John
Z80 Assembler, 176 bytes
Sep. 13, 2:19am
John
Z80 Assembler, 77 bytes
Sep. 13, 2:18am
John
Z80 Assembler, 209 bytes
Sep. 13, 2:17am
untitled Lisp Code
Posted by: testingmy | June 4, 2010 @ 7:56am
Lisp Code
[
Download
]
(defun f (N) "Compute the factorial of N." (if (= N 1) 1 (* N (factorial (- N 1))))) (setq a 18) (setq b 64) (setq c 22) (setq y 14) (defun g (m n) (if (> m n) m n)) (+(+ a b)(*(+(g a c)(+(g a b)(*(+(+(* b c)a)c)c)c)c)(f y)))
Syntax Highlighting
[
Open in new window
]
Author Comments
none
Rating
4.50 / 8
62 Votes
http://codebin.yi.org/671
page generated in 0.00 seconds