aboutsummaryrefslogtreecommitdiffhomepage
path: root/samples/rosetta/sorting_quicksort.bruijn
diff options
context:
space:
mode:
Diffstat (limited to 'samples/rosetta/sorting_quicksort.bruijn')
-rw-r--r--samples/rosetta/sorting_quicksort.bruijn4
1 files changed, 2 insertions, 2 deletions
diff --git a/samples/rosetta/sorting_quicksort.bruijn b/samples/rosetta/sorting_quicksort.bruijn
index 0413024..6e57bd9 100644
--- a/samples/rosetta/sorting_quicksort.bruijn
+++ b/samples/rosetta/sorting_quicksort.bruijn
@@ -4,8 +4,8 @@
sort y [[0 [[[case-sort]]] case-end]]
case-sort (4 lesser) ++ (2 : (4 greater))
- lesser (\les? 2) <#> 1
- greater (\geq? 2) <#> 1
+ lesser (\lt? 2) <#> 1
+ greater (\ge? 2) <#> 1
case-end empty
:test (sort ((+3) : ((+2) : {}(+1)))) ((+1) : ((+2) : {}(+3)))