Sorting algorithms/Quicksort: Difference between revisions

m
(Add Refal)
Line 2,896:
sort y [[0 [[[case-sort]]] case-end]]
case-sort (4 lesser) ++ (2 : (4 greater))
lesser 1 <#> (\les? 2) <#> 1
greater 1 <#> (\geq? 2) <#> 1
case-end empty
 
55

edits