ARIBAS

Aliases: —

Provenance: commit 26e215a8e5 · authored 2026-02-09T21:12:07+01:00 · agent claude-code · model opus

1 source · not in taxonomy (canonical name didn't match any upstream)

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.

function fibonacci(n: integer): integer;
var
    a, b, temp: integer;
    i: integer;
begin
    if n <= 1 then
        return n;
    end;
    a := 0;
    b := 1;
    for i := 2 to n do
        temp := b;
        b := a + b;
        a := temp;
    end;
    return b;
end;

var
    i: integer;
begin
    for i := 0 to 20 do
        writeln(i, ": ", fibonacci(i));
    end;
end.