Plait
1 program
Added 2026-02-10T18:30:00Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit ef8496e778 · authored 2026-02-10T13:26:12+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 with Tests
Provenance: commit ef8496e778 · authored 2026-02-10T13:26:12+01:00 · agent claude-code · model sonnet · WebSearch disabled
#lang plait
(define (factorial n)
(if (<= n 1)
1
(* n (factorial (- n 1)))))
(test (factorial 0) 1)
(test (factorial 1) 1)
(test (factorial 5) 120)
(test (factorial 10) 3628800)