Fix bug in <<{} function.
This commit is contained in:
+1
-1
@@ -5,7 +5,7 @@
|
|||||||
|| nulco [nullary] dip [true] branch
|
|| nulco [nullary] dip [true] branch
|
||||||
!- 0 >=
|
!- 0 >=
|
||||||
<{} [] swap
|
<{} [] swap
|
||||||
<<{} [] rolldown
|
<<{} [] rollup
|
||||||
abs dup 0 < [] [neg] branch
|
abs dup 0 < [] [neg] branch
|
||||||
anamorphism [pop []] swap [dip swons] genrec
|
anamorphism [pop []] swap [dip swons] genrec
|
||||||
app1 grba infrst
|
app1 grba infrst
|
||||||
|
|||||||
Reference in New Issue
Block a user