coding UTF-8;

// Load libraries
import tool.Graph3D; // Required for 3D graph handling
import Math;         // Required for mathematical functions


// Prepare arrays for plotting
int pointN = 16;             // Number of points
float xData[pointN][pointN]; // Array for X coordinates
float yData[pointN][pointN]; // Array for Y coordinates
float zData[pointN][pointN]; // Array for Z coordinates


// Set plot range
float xMax = 2.0;   // Maximum value of X range
float xMin = -2.0;  // Minimum value of X range
float yMax = 2.0;   // Maximum value of Y range
float yMin = -2.0;  // Minimum value of Y range
float zMax = 1.0;   // Maximum value of Z range
float zMin = -1.0;  // Minimum value of Z range

// Launch the 3D graph and configure settings
int graph = newGraph3D();             // Launch graph
setGraph3DRangeX(graph, xMin, xMax);  // Set X range
setGraph3DRangeY(graph, yMin, yMax);  // Set Y range
setGraph3DRangeZ(graph, zMin, zMax);  // Set Z range
setGraph3DAutoRange(graph, false, false, false);  // Disable auto-scaling
setGraph3DOption(graph, "WITH_POINTS", false);    // Disable point plots
setGraph3DOption(graph, "WITH_MESHES", true);     // Enable mesh plots
setGraph3DOption(graph, "WITH_MEMBRANES", true);  // Enable surface plots


// Animation loop (frames counted by 'frame' variable)
for (int frame=0; true; frame++) { // Limit frame count if necessary, e.g., frame<=1000
	
	// Calculate time t based on the current frame
	float t = 0.05 * frame;  // Larger coefficient = faster animation
	
	// Update coordinate arrays
	for(int yi=0; yi<pointN; yi++){
		for(int xi=0; xi<pointN; xi++){
			
			float dx = (xMax-xMin)/(pointN-1); // X interval
			float dy = (yMax-yMin)/(pointN-1); // Y interval
			float x = xMin + xi * dx;          // X coordinate at (xi, yi)
			float y = yMin + yi * dy;          // Y coordinate at (xi, yi)
			float z = cos(x + t) * sin(y + t); // Z coordinate at (xi, yi) (example function)
			
			xData[yi][xi] = x;
			yData[yi][xi] = y;
			zData[yi][xi] = z;
		}
	}
	
	// Plot the coordinate arrays on the 3D graph
	setGraph3DData(graph, xData, yData, zData);
	
	// Wait 30 milliseconds (animation delay)
	sleep(30);
	
	
	/*
	// Export graph content to sequential image files: "image_*.png" (* is the frame number)
	// (Important: limit output to avoid infinite image generation)
	if(frame <= 100) {
		exportGraph3D(graph, "image_" + frame + ".png", "PNG");
	}
	*/
}