Oberon-0
1 program
Added 2026-02-07T18:31:25Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 50f5d2b4ad · authored 2026-02-07T19:32:00+01:00 · agent claude-code · model sonnet
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Factorial Function
Provenance: commit 50f5d2b4ad · authored 2026-02-07T19:32:00+01:00 · agent claude-code · model sonnet · WebSearch disabled
MODULE Factorial;
PROCEDURE Calculate*(n: INTEGER): INTEGER;
VAR result: INTEGER;
BEGIN
IF n <= 1 THEN
result := 1
ELSE
result := n * Calculate(n - 1)
END;
RETURN result
END Calculate;
END Factorial.