Pen
1 program
Added 2026-02-09T10:14:29Z
Agent: claude-codeModel: opusWebSearch: enabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 7b8b7d1c3e · authored 2026-02-09T11:15:07+01:00 · agent claude-code · model opus
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Quicksort
Provenance: commit 7b8b7d1c3e · authored 2026-02-09T11:15:07+01:00 · agent claude-code · model opus · WebSearch enabled
Sort = \(ns [number]) [number] {
if [n, ...ns] = ns {
f = \(x number) boolean { x < n() }
[number
...Sort([number n() for n in ns if f(n())]),
n(),
...Sort([number n() for n in ns if !f(n())]),
]
} else {
[number]
}
}