Topaz
1 program
Added 2026-02-28T11:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: GemStone Topaz
Provenance: commit c1061253ad · authored 2026-02-28T16:29:00+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
2 sources · pl_id:
pl/topazRelated languages
LLM-contributed programs
Fibonacci Sequence
Provenance: commit c1061253ad · authored 2026-02-28T16:29:00+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
! GemStone/S Topaz script - Fibonacci sequence
! To run: topaz -l topaz.ini < fibonacci.tpz
login
run
| fib result |
fib := [:n |
n <= 1
ifTrue: [n]
ifFalse: [(fib value: n - 1) + (fib value: n - 2)]
].
result := OrderedCollection new.
0 to: 9 do: [:i | result add: (fib value: i)].
Transcript showCr: 'Fibonacci sequence (first 10 terms):'.
result do: [:each | Transcript showCr: each printString].
%
logout
commit
Real programs from Software Heritage
No SWH evidence indexed yet for this language. (Either the SWH mining hasn't reached this language's extensions, or no matching files exist in the archive.)