Write a process with parameters as follows: r is the radius and h is the column height. And > no input required.

To yz :r :h

> repeat 36 [FD (:r) * 0.174 rt10]

& gtbk (:h)

& gt repeat18 [bk (:r) * 0.174lt10]

& gtbk (:h)

& gt end

If you need to draw a cylinder with a radius of 50 and a height of 100, run the following command, and these parameters can be modified by yourself.

yz 50 100