(sierpinski) Tiny improvement
This commit is contained in:
parent
d7ee187d1d
commit
b1549867e4
|
@ -2,7 +2,7 @@
|
||||||
|
|
||||||
@sierpinski ( -> )
|
@sierpinski ( -> )
|
||||||
( mask ) [ LIT2r 0a18 ] [ LIT2r 2018 ]
|
( mask ) [ LIT2r 0a18 ] [ LIT2r 2018 ]
|
||||||
( size ) [ LIT &size 10 ] #01 SUB
|
( size ) [ LIT2 &size 1001 ] SUB
|
||||||
&>ver ( -- )
|
&>ver ( -- )
|
||||||
DUP INCk
|
DUP INCk
|
||||||
&>pad ( length -- )
|
&>pad ( length -- )
|
||||||
|
|
Loading…
Reference in New Issue