!copyright (C) 2001  MSC-RPN COMM  %%%RPNPHY%%%
      REAL P0,CONF,FO3,AIRSEC,CSX,DIFBAS,REFLEX,CABSRP
      PARAMETER(P0=101325.)
      PARAMETER(CONF=60.,FO3=38.)
      PARAMETER(AIRSEC=.8721,CSX=.00125,DIFBAS=.63)
      PARAMETER(REFLEX=.12,CABSRP=3.0)