From d13df6b34ebdc6a2d3dd01b081617fe6e88feda8 Mon Sep 17 00:00:00 2001
From: Marvin Borner
Date: Mon, 25 Mar 2024 22:30:20 +0100
Subject: Renamed number comparison functions

---
 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 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)))
-- 
cgit v1.2.3