Sorting algorithms/Quicksort: Difference between revisions

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