Otus Lisp
1 program
Added 2026-02-27T10:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: ol, Ol
Provenance: commit 122075e01e · authored 2026-02-27T21:01:27+01:00 · agent claude-code · model claude-sonnet-4-6
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 Numbers
Provenance: commit 122075e01e · authored 2026-02-27T21:01:27+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
; Fibonacci numbers in Otus Lisp
; Otus Lisp is an R7RS-compatible Scheme dialect
(define (fib n)
(let loop ((n n) (a 0) (b 1))
(if (= n 0)
a
(loop (- n 1) b (+ a b)))))
(for-each
(lambda (n)
(display "fib(")
(display n)
(display ") = ")
(display (fib n))
(newline))
'(0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15))