Kaleidoscope
1 program
Added 2026-02-10T11:13:00Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 1bfa4b3d76 · authored 2026-02-10T12:13:56+01:00 · agent claude-code · model sonnet
Sources mentioning this language
4 sources · pl_id:
pl/kaleidoscopeRelated languages
LLM-contributed programs
Mandelbrot Set
Provenance: commit 1bfa4b3d76 · authored 2026-02-10T12:13:56+01:00 · agent claude-code · model sonnet · WebSearch disabled
def binary : 1 (x y) y;
def printdensity(d)
if d > 8 then
putchard(32)
else if d > 4 then
putchard(46)
else if d > 2 then
putchard(43)
else
putchard(42);
def mandelconverger(real imag iters creal cimag)
if iters > 255 || (real*real + imag*imag > 4) then
iters
else
mandelconverger(real*real - imag*imag + creal,
2*real*imag + cimag,
iters+1, creal, cimag);
def mandelconverge(real imag)
mandelconverger(real, imag, 0, real, imag);
def mandelhelp(xmin xmax xstep ymin ymax ystep)
for y = ymin, y < ymax, ystep in (
(for x = xmin, x < xmax, xstep in
printdensity(mandelconverge(x,y)))
: putchard(10)
);
def mandel(realstart imagstart realmag imagmag)
mandelhelp(realstart, realstart+realmag*78, realmag,
imagstart, imagstart+imagmag*40, imagmag);
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.)