Production of Isosurfaces by Marching-Cubes Method

    main program:  mcube001.c
    subroutine:    mcube000.h
    
    Explanation: Program to draw the isosurfaces by getting 3-dimensional 
                 scalar physical data, v[nX][nY][nZ]
    
    Input parameters:

       header file: mcube000.h
          NX:  number of grid in x-direction
          NY:  number of grid in y-direction
          NZ:  number of grid in z-direction
          nX =NX+1: number of data in x-direction
          nY =NY+1: number of data in y-direction
          nZ =NZ+1: number of data in z-direction

       main program: mcube001.c
          Viewpoint(fp): function to determine view point
            fp: output file name
          dr_grid(fp, gc): function to draw the grid
            fp: output file name
            gc[3]: color of line
          dr_scale(fp, gc): function to draw the scale
            fp: output file name
            gc[3]: color of line
          mk_equ_face001(fp, th, v, c, tr): function to draw an isosurface
            fp: output file name
            th: level of isosurface
            c:  color of isosurface
            v:  3-dimensional input data
            tr: degree of transparency

Example: