/*
FILENAME GRAPH 'c:\papers\khuru\onefact.eps';
GOPTIONS HSIZE=3IN VSIZE=3.5IN
GSFNAME=GRAPH
GSFLEN=132
GSFMODE=REPLACE
DEVICE=PSEPSF;
*/
* GOPTIONS FTEXT=SWISSB HTEXT=.25CM;

*****************************;
*** MAKING A CONTOUR PLOT ***;
*****************************;

DATA CONT;
   DO X = -1 TO 1 BY .1; 
      SPV1 = 1 +  1.5*X**2 ;
      SPV2 = 1 +  2.4*X**2 ;
      OUTPUT;
   END; 


SYMBOL1 WIDTH=1 H=1.5 VALUE=DOT    I=SPLINE LINE=1 COLOR=BLACK;
SYMBOL2 WIDTH=1 H=1.5 VALUE=CIRCLE I=SPLINE LINE=1 COLOR=BLACK;

AXIS1 ORDER=(-1 TO 1 BY .5)
      VALUE=(HEIGHT=.4 CM FONT=SWISSB)
      LABEL=(HEIGHT=.4 CM FONT=SWISSB 'X')
      WIDTH=1
      MAJOR=(HEIGHT=.25 CM WIDTH=1.5)
      MINOR=(HEIGHT=.1  CM WIDTH=1.0);
AXIS2 ORDER=(1 TO 4 BY 1)
      VALUE=(HEIGHT=.4 CM FONT=SWISSB)
      LABEL=(HEIGHT=.4 CM FONT=SWISSB ANGLE=90 'V(x)') 
      WIDTH=1
      MAJOR=(HEIGHT=.25 CM WIDTH=1.5)
      MINOR=(HEIGHT=.1  CM WIDTH=1.0);

PROC GPLOT DATA=CONT; 
    PLOT SPV1*X=1 SPV2*X=2
         / OVERLAY FRAME HAXIS=AXIS1 VAXIS=AXIS2 HM=4 VM=1;
RUN;