From e4dc5918cdfc231bee29ca5808e37ee23f33712e Mon Sep 17 00:00:00 2001
From: Marvin Borner
Date: Sun, 10 Mar 2024 14:18:17 +0100
Subject: Samples and std additions

---
 samples/rosetta/sorting_quicksort.bruijn | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'samples/rosetta/sorting_quicksort.bruijn')

diff --git a/samples/rosetta/sorting_quicksort.bruijn b/samples/rosetta/sorting_quicksort.bruijn
index f55f128..0413024 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 1 <#> (\les? 2)
-		greater 1 <#> (\geq? 2)
+		lesser (\les? 2) <#> 1
+		greater (\geq? 2) <#> 1
 	case-end empty
 
 :test (sort ((+3) : ((+2) : {}(+1)))) ((+1) : ((+2) : {}(+3)))
-- 
cgit v1.2.3