mainprogram@cylinder1.f subroutine cylinder1(rd, h, r, g, b) Description: This program draws a column that it gives value of the color and radius of the basal plane, the height. Input variable: rd : The radius of the basal plane h : The height r : The red value [0,1] g : The green value [0,1] b : The blue value [0,1] Drawing example: cylinder1.wrl