logo.pow :a :i Definition:
to logo.pow :a :i if :a=0 [output 0] if :a>0 [output :a^:i] [output 0 - (-:a)^:i] end