#include <chplot.h>
#include <math.h>

int main() {
    double x[16], y[16], z[256];
    double r;
    int i, j;
    class CPlot subplot, *spl;

    linspace(x, -10, 10);
    linspace(y, -10, 10);
    for(i=0; i<16; i++) {
        for(j=0; j<16; j++) {
            r = sqrt(x[i]*x[i]+y[j]*y[j]);
            z[16*i+j] = sin(r)/r;
        }
    }
    subplot.subplot(2,3);
    spl = subplot.getSubplot(0,0);
    spl->data3D(x, y, z);
    spl->plotType(PLOT_PLOTTYPE_LINES, 0);
    spl->contourMode(PLOT_CONTOUR_BASE);
    spl->removeHiddenLine(PLOT_OFF);
    spl->label(PLOT_AXIS_XYZ, NULL);
    spl->title("PLOT_CONTOUR_BASE");

    spl = subplot.getSubplot(0,1);
    spl->data3D(x, y, z);
    spl->plotType(PLOT_PLOTTYPE_LINES, 0);
    spl->contourMode(PLOT_CONTOUR_SURFACE);
    spl->removeHiddenLine(PLOT_OFF);
    spl->label(PLOT_AXIS_XYZ, NULL);
    spl->title("PLOT_CONTOUR_SURFACE");

    spl = subplot.getSubplot(0,2);
    spl->data3D(x, y, z);
    spl->plotType(PLOT_PLOTTYPE_LINES, 0);
    spl->contourMode(PLOT_CONTOUR_BASE|PLOT_CONTOUR_SURFACE);
    spl->removeHiddenLine(PLOT_OFF);
    spl->label(PLOT_AXIS_XYZ, NULL);
    spl->title("PLOT_CONTOUR_BASE|PLOT_CONTOUR_SURFACE");

    spl = subplot.getSubplot(1,0);
    spl->data3D(x, y, z);
    spl->contourMode(PLOT_CONTOUR_SURFACE);
    spl->label(PLOT_AXIS_XYZ, NULL);
    spl->title("PLOT_CONTOUR_SURFACE");

    spl = subplot.getSubplot(1,1);
    spl->data3D(x, y, z);
    spl->contourMode(PLOT_CONTOUR_BASE);
    spl->label(PLOT_AXIS_XYZ, NULL);
    spl->title("PLOT_CONTOUR_BASE");
    subplot.plotting();
}