include file: C_EPSLON 73
C*L------------------COMDECK C_EPSLON-----------------------------------   C_EPSLON.2      
C EPSILON IS RATIO OF MOLECULAR WEIGHTS OF WATER AND DRY AIR               C_EPSLON.3      
      REAL EPSILON,C_VIRTUAL                                               C_EPSLON.4      
                                                                           C_EPSLON.5      
      PARAMETER(EPSILON=0.62198,                                           C_EPSLON.6      
     &          C_VIRTUAL=1./EPSILON-1.)                                   C_EPSLON.7      
C*----------------------------------------------------------------------   C_EPSLON.8      
                                                                           C_EPSLON.9