C
C*************** TOP OF INCLUDE MEMBER - RMPHSCON **********************
C
C   NAME- RMPHSCON
C
C   LANGUAGE- FORTRAN 77    TYPE- INCLUDE    COMPUTER- CRAY
C
C   VERSION- 1.0   DATE- 09/16/88   PROGRAMMER- SOO O. LEE (SMSRC)
C   VERSION- 3.0   DATE- 05/09/96   PROGRAMMER- FRANK TILLEY (SMSRC)
C     FOR REHOSTING TO THE CRAY, CHANGED ALL R*4 DECLARATIONS TO REAL.
C
C   FUNCTION- THIS PARAMETER FILE CONTAINS THE PHYSICAL CONSTANTS
C             USED IN THE RADIOSONDE MATCH SUBSYSTEM.
C
C   SHARED PARAMETERS-
C     VARIABLE          TYPE  DESCRIPTION
C     --------          ----  -----------
C     KELVIN            REAL  CONSTANT FOR CONVERTING TO KELVIN DEGREE.
C
C     R                 REAL  A GAS CONSTANT FOR DRY AIR,
C                             287.05 (J/KG/KELVIN).
C
C     CP                REAL  A PRESSURE CONSTANT FOR DRY AIR,
C                             1005 (J/KG/KELVIN).
C
C     EMEANR            REAL  AUTHALIC RADIUS (KM).
C                             THE AUTHALIC RADIUS IS THE RADIUS OF A
C                             SPHERE WITH THE SAME SURFACE AREA AS
C                             THE REFERENCE SPHEROID (THE EARTH).
C
C     PI                REAL  THE VALUE OF PI IN RADIANS.
C
C     D2RAD             REAL  CONSTANT FOR CONVERTING DEGREES TO
C                             RADIANS.
C
C***********************************************************************
C
      REAL    R,CP,KELVIN,EMEANR,PI,D2RAD
C
      PARAMETER (R=287.05, CP=1005.0, KELVIN=273.16, EMEANR=6371.004)
      PARAMETER (PI=3.14159265)
      PARAMETER (D2RAD=PI/180.0)
C
C*************** BOTTOM OF INCLUDE MEMBER - RMPHSCON *******************