2 lines
46 B
Text
2 lines
46 B
Text
|
: pow ( bp-n ) 1 swap [ over * ] times nip ;
|
|
|
: pow ( bp-n ) 1 swap [ over * ] times nip ;
|