Function:s2funyzr

From S2PLOT

Revision as of 01:53, 28 October 2007; view current revision
←Older revision | Newer revision→
Jump to: navigation, search

s2funyzr

Draw surface as per s2funyz, but with explicit settings for the colour range mapping.

Prototype

void s2funyzr(float(*fyz)(float*,float*), int ny, int nz, float ymin, float ymax, float zmin, float zmax, int ctl, float rmin, float rmax);

Description

Draw surface as per s2funyz, but with explicit settings for the colour range mapping between rmin and rmax.

See Also

s2funxyr Draw surface as per s2funxy, but with explicit settings for the colour range mapping.
s2funxzr Draw surface as per s2funxz, but with explicit settings for the colour range mapping.
s2funyz Draw the surface described by the provided function fyz.


Code Example

#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include "s2plot.h"

#define XLIMIT 1.0
#define YLIMIT 1.0
#define ZLIMIT 1.0

float fxy(float *x, float *y)
{
   return ((*x)*(*x) + 0.25*(*y)*(*y));         /* Function to evaluate */
}

float fxz(float *x, float *z)
{
   return (0.1*(*x)*(*x) + 0.1*(*z)*(*z));      /* Function to evaluate */
}

float fyz(float *y, float *z)
{
   return (-0.3*(*y)*(*y) - 0.3*(*z)*(*z));     /* Function to evaluate */
}

int main(int argc, char *argv[])
{
   int nx = 64, ny = 64, nz = 64;
                                /* Resolution of grids to plot function on */
   int ctl = 0;                 /* User responsible for setting environ */

   float x1 = -XLIMIT*1.5, x2 = +XLIMIT*1.5;    /* World coordinates */
   float y1 = -YLIMIT*1.5, y2 = +YLIMIT*1.5;
   float z1 = -ZLIMIT*1.5, z2 = +ZLIMIT*1.5;
   float d1, d2;				/* Dummy variables */
   float rmin;                                  /* Minimum range value */
   float rmax;                                  /* Maximum range value */

   s2opend("/?",argc,argv);                     /* Open the display */
   s2swin(x1,x2,y1,y2,z1,z2);                   /* Set the window coordinates */
   s2box("BCDET",0,0,"BCDET",0,0,"BCDET",0,0);  /* Draw coordinate box */

   s2icm("rainbow",1000,2000);
   s2scir(1000,2000);

   d1 = 0.0; d2 = 0.0;                          /* Dummy variables */
   rmin = fxy(&d1,&d2);                         /* Minimum at centre */
   d1 = XLIMIT; d2 = YLIMIT;
   rmax = 2.0*fxy(&d1, &d2);            /* Maximum at edge */
   s2funxyr(fxy, nx, ny, -XLIMIT,XLIMIT, -YLIMIT,YLIMIT, ctl, rmin, rmax);
                                /* Functional surface in X-Y plane */

   d1 = XLIMIT; d2 = ZLIMIT;                    /* Dummy variables */
   rmax = fxz(&d1, &d2);                        /* Maximum at edge */
   rmin = -rmax;
   s2funxzr(fxz, nx, nz, -XLIMIT,XLIMIT, -ZLIMIT,ZLIMIT, ctl, rmin, rmax);
                                /* Functional surface in X-Z plane */

   d1 = 0.0; d2 = 0.0;                          /* Dummy variables */
   rmax = fyz(&d1, &d2);                        /* Maximum at centre */
   d1 = YLIMIT; d2 = ZLIMIT;                    /* Dummy variables */
   rmin = fyz(&d1, &d2);                        /* Minimum at edge */
   s2funyzr(fyz, ny, nz, -YLIMIT,YLIMIT, -ZLIMIT,ZLIMIT, ctl, rmin, rmax);
                                /* Functional surface in Y-Y plane */

   s2show(1);                   /* Open the s2plot window */

   return 1;
}

Back to S2PLOT function list.


Personal tools