Fix bug in `<<{}` function.
This commit is contained in:
parent
54d7fc5e21
commit
656009e1ff
|
|
@ -5,7 +5,7 @@
|
|||
|| nulco [nullary] dip [true] branch
|
||||
!- 0 >=
|
||||
<{} [] swap
|
||||
<<{} [] rolldown
|
||||
<<{} [] rollup
|
||||
abs dup 0 < [] [neg] branch
|
||||
anamorphism [pop []] swap [dip swons] genrec
|
||||
app1 grba infrst
|
||||
|
|
|
|||
Loading…
Reference in New Issue