Function:s2qwin

void s2qwin(float *x1, float *x2, float *y1, float *y2, float *z1, float *z2);

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

int main(int argc, char *argv[])
{
   float dx1, dx2, dy1, dy2, dz1, dz2;		/* Viewport ranges */
   float cx1, cx2, cy1, cy2, cz1, cz2;		/* Coordiante ranges */

   srand48((long)time(NULL));			/* Seed random numbers */
   cx1 = -ceil(drand48()*5.0)-2.05; cx2 = -cx1;	/* Random coordinates */
   cy1 = -ceil(drand48()*5.0)-2.05; cy2 = -cy1;
   cz1 = -ceil(drand48()*5.0)-2.05; cz2 = -cz1;

   s2opend("/?",argc, argv);			/* Open the display */
   s2svp(-1.,1., -1.,1., -1.,1.);		/* First view port */
   s2swin(cx1,cx2, cy1,cy2, cz1,cz2);		/* Set the window coordinates */
   s2box("BCDETMNO",2.0,0,"BCDETMNO",2.0,0,"BCDETMNO",2.0,0);	
						/* Draw coordinate box */

   s2qvp(&dx1,&dx2, &dy1,&dy2, &dz1,&dz2);	/* Query viewport coordinates */
   dx1 /= 2.0; dx2 /= 2.0;			/* Halve the coordintes */
   dy1 /= 2.0; dy2 /= 2.0;
   dz1 /= 2.0; dz2 /= 2.0;

   s2qwin(&cx1,&cx2, &cy1,&cy2, &cz1,&cz2);	/* Query window coordinates */
   cx1 /= 2.0; cx2 /= 2.0;			/* Halve the coordintes */
   cy1 /= 2.0; cy2 /= 2.0;
   cz1 /= 2.0; cz2 /= 2.0;

   s2sci(S2_PG_RED);
   s2svp(dx1,dx2, dy1,dy2, dz1,dz2);		/* Create a half-size viewport */
   s2swin(cx1,cx2, cy1,cy2, cz1,cz2);		/* Set the window coordinates */
   s2box("BCDETMNO",2.0,0,"BCDETMNO",2.0,0,"BCDETMNO",2.0,0);	
						/* Draw coordinate box */

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