Coalton
1 program
Added 2026-02-13T15:57:22Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 5da8672fbd · authored 2026-02-13T16:58:08+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
Quicksort
Provenance: commit 5da8672fbd · authored 2026-02-13T16:58:08+01:00 · agent claude-code · model sonnet · WebSearch disabled
(coalton-toplevel
(declare quicksort (List Integer -> List Integer))
(define (quicksort lst)
(match lst
((Cons pivot rest)
(let ((left (filter (fn (x) (<= x pivot)) rest))
(right (filter (fn (x) (> x pivot)) rest)))
(append (append (quicksort left) (make-list pivot))
(quicksort right))))
((Nil) Nil))))