naive: use lte to emphasize parent equality

This commit is contained in:
yosoyubik 2021-06-24 16:40:53 +02:00
parent 5b317acca5
commit 1e7e2e1193

View File

@ -465,7 +465,7 @@
|- |-
?: =(i 2) ?: =(i 2)
:: second two bytes :: second two bytes
(lth a b) (lte a b)
:: first two bytes :: first two bytes
=+ [c=(end 3 a) d=(end 3 b)] =+ [c=(end 3 a) d=(end 3 b)]
?: =(c d) ?: =(c d)