pow
This commit is contained in:
parent
35097d90a9
commit
9c4ecb085b
|
|
@ -73,6 +73,7 @@ popopdd [popop] dipd
|
|||
popopd [popop] dip
|
||||
popopop pop popop
|
||||
popop pop pop
|
||||
pow 1 roll> swap [*] cons times
|
||||
product 1 swap [*] step
|
||||
quoted [unit] dip
|
||||
range [0 <=] [-- dup] anamorphism
|
||||
|
|
|
|||
Loading…
Reference in New Issue