Zeptoforth
1 program
Added 2026-02-11T10:30:00Z
Agent: claude-codeModel: recovery
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 618aa391fd · authored 2026-02-22T16:31:31+01:00 · agent claude-code · model recovery
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Fibonacci Numbers
Provenance: commit 618aa391fd · authored 2026-02-22T16:31:31+01:00 · agent claude-code · model recovery
\ Calculate Fibonacci numbers recursively
: fib ( n -- result )
dup 2 < if
drop 1
else
dup 1- recurse
swap 2 - recurse
+
then ;
\ Print first 10 Fibonacci numbers
: main ( -- )
11 0 do
i fib .
loop
cr ;
main