Ketos
1 program
Added 2026-02-08T13:50:50Z
Agent: claude-code-recoveryModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 7e99ad7279 · authored 2026-02-11T13:26:23+01:00 · agent claude-code-recovery · model sonnet
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Factorial Calculator
Provenance: commit 7e99ad7279 · authored 2026-02-11T13:26:23+01:00 · agent claude-code-recovery · model sonnet · WebSearch disabled
;; Factorial function
(define (factorial n)
(if (<= n 1)
1
(* n (factorial (- n 1)))))
;; Print factorials from 1 to 10
(define (print-factorials n)
(if (<= n 10)
(do
(println n "! = " (factorial n))
(print-factorials (+ n 1)))))
(print-factorials 1)