Ionosphere by three-dimensional lattice
mainprogram  denline3d.f
subroutine   lat3d3 (ic,aa) < (re1,re2,r,g,b)

Description: This program draws the ionosphere by three-dimensional lattice.

Input variable:
      re1 = aa(1) : The radius of inner circle
      re2 = aa(2) : The radius of outer circle
      r = aa(3) : The red value [ 0,1 ]
      g = aa(4) : The green value [ 0,1 ]
      b = aa(5) : The blue value [ 0,1 ]

  
Drawin example: denline3d.wrl