Point
mainprogram  mpoint.f
subroutine  point3d (nx, ny, nz, x0, y0, z0, xl, yl, zl, ico, u)

Description: This program draws points by giving position and colored code of the three-dimensional point of the nx*ny*nz piece.

Input variable:
  nx : Data number of the x direction
  ny : Data number of the y direction
  nz : Data number of the z direction
  x0 : The x coordinate of the origin
  y0 : The y coordinate of the origin
  z0 : The z coordinate of the origin
  x1 : The length of the x direction
  y1 : The length of the y direction
  z1 : The length of the z direction
  ico : color code [1,7]
  u (nx*ny*nz) : They are input data, and the coordinate of 
                  the multipoint (x, y, z) is given in the order

Drawing example: mpoint.wrl