Logo - 递归程序

在递归程序中，有程序内部的程序的重复调用。考虑以下代码 −

to spiral_recur :n
   if :n < 1 [stop]
   fd :n
   rt 20
   spiral_recur 0.95 * :n
end

过程 spiral_recur 在过程体中被调用。以下屏幕截图显示了该代码的执行输出。