Clasp
1 program
Added 2026-02-11T18:47:30Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: Clasp Common Lisp
Provenance: commit 24e82f644c · authored 2026-02-11T19:49:16+01:00 · agent claude-code · model sonnet
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
Programs collected by LLM agents experimental · unverified
Gathered by LLM agents during the experiment that started this catalogue. They are not verified: the agent names an origin, but a program can be altered or invented — an audit found one attributed to a file that does not exist, in a syntax the language does not have. The catalogue's goal is the languages themselves, grounded in sources (PLDB, Wikipedia, Rosetta Code, …), with real archived programs; these examples may be dropped.
Fibonacci Sequence
Provenance: commit 24e82f644c · authored 2026-02-11T19:49:16+01:00 · agent claude-code · model sonnet · WebSearch disabled
(defun fibonacci (n)
"Calculate the nth Fibonacci number recursively"
(cond
((<= n 0) 0)
((= n 1) 1)
(t (+ (fibonacci (- n 1))
(fibonacci (- n 2))))))
(defun print-fibonacci-sequence (count)
"Print the first count Fibonacci numbers"
(dotimes (i count)
(format t "F(~d) = ~d~%" i (fibonacci i))))
;; Print first 10 Fibonacci numbers
(print-fibonacci-sequence 10)