MODULE PHYCON
!>--------------------------------------------------------------------------------------------------
!> MODULE PHYCON
!>
!> USE MODULES: F77KINDS
!> 
!> DRIVER     : CLO89
!>              E1E290
!>              E290
!>              E2SPEC
!>              E3V88
!>              FST88
!>              GFDLRD
!>              HCONST
!>              LWR88
!>              RADFS
!>              SPA88
!>              SWR93
!>              TABLE
!>--------------------------------------------------------------------------------------------------
    USE F77KINDS
!
    IMPLICIT NONE
!
    SAVE
!
    REAL   (KIND=R4KIND)                                                                        ::&
    & AMOLWT  , CSUBP   , DIFFCTR , G       , GRAVDR  , O3DIFCTR, P0      , P0XZP2  , P0XZP8  ,   &
    & P0X2    , RADCON  , RGAS    , RGASSP  , SECPDA  ,                                           &
    & RATCO2MW, RATH2OMW,                                                                         &
    & RADCON1 ,                                                                                   &
    & GINV    , P0INV   , GP0INV
!------------
! FROM GFDLRD
!------------	
    DATA G /980.665/
!
    END MODULE PHYCON