Solid : It is composed of the triangular mesh
mainprogram@defusem1.f
subroutine defusem (nx, ny, u, p, x1, y1, z1, x2, y2, z2, r, n)
Description: This program draws a solid by the plane made from the data of the point by the triangular mesh gradually moving.
Input variable:
nx : Data number of the x direction
ny : Data number of the y direction
u : Color (r, g, b) of the point is given in the order
p : The coordinate of the point (x, y, z) is given in the order
x1 : Parallel translation quantity of the x direction
y1 : Parallel translation quantity of the y direction
z1 : Parallel translation quantity of the z direction
x2 : x coordinate of the rotating shaft
y2 : y coordinate of the rotating shaft
z2 : z coordinate of the rotating shaft
r : The transfer rotation angle ( radian )
n : The processing frequency
Drawing example: defusem1.wrl