Polygonal line : monochrome

mainprogram@lineset1.f
subroutine  line1 (ln, po, r, g, b)

Description: This program draws a polygonal line in giving double end coordinate and color of the segment, and in connecting the coordinate in one stroke in the order.

Input variable:
  ln : The data number. 
  po(3*ln) : The coordinate of the point (x, y, z) is given in the order.
  r : The red value. [0,1]
  g : The green value. [0,1]
  b : The blue value. [0,1]

Drawing example: lineset1.wrl