pkg/land/LAND_VARS.h

e0a2f8aec4 Jean*0001 #ifdef ALLOW_LAND
                0002
                0003 C     *==========================================================*
                0004 C     | LAND_VARS.h
                0005 C     | o Land model variables:
                0006 C     |   - prognostic variables
                0007 C     |   - forcing fields
                0008 C     |   - diagnostic variables
                0009 C     *==========================================================*
                0010
                0011
                0012 C---  COMMON /LAND_VARS_R/
                0013 C     land_groundT :: ground Temperature (oC) of each layer
89992793c5 Jean*0014 C     land_enthalp :: enthalpy of each layer (J/m3) = Cp.T
e0a2f8aec4 Jean*0015 C     land_groundW :: soil moisture [0-1] (= water content / field capacity)
89992793c5 Jean*0016 C     land_skinT   :: surface skin Temperature (oC)
                0017 C     land_hSnow   :: thickness of snow over land (m)
                0018 C     land_snowAge :: snow age (s)
4922beda30 Jean*0019 C     land_runOff  :: run-Off per surface unit [kg/m2/s]
                0020 C     land_enRnOf  :: energy flux associated with run-Off [W/m2]
                0021 C
e0a2f8aec4 Jean*0022       COMMON /LAND_VARS_R/
89992793c5 Jean*0023      &   land_groundT, land_enthalp, land_groundW,
                0024      &   land_skinT, land_hSnow, land_snowAge,
                0025      &   land_runOff, land_enRnOf
4922beda30 Jean*0026
e0a2f8aec4 Jean*0027       _RL land_groundT(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy)
89992793c5 Jean*0028       _RL land_enthalp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy)
e0a2f8aec4 Jean*0029       _RL land_groundW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy)
89992793c5 Jean*0030       _RL land_skinT  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0031       _RL land_hSnow  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0032       _RL land_snowAge(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0033       _RL land_runOff (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0034       _RL land_enRnOf (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
e0a2f8aec4 Jean*0035
                0036 C---  COMMON /LAND_FORCFIELDS/
1cd785a34e Jean*0037 C     land_HeatFlx :: net surface downward Heat flux  [W/m2]
89992793c5 Jean*0038 C     land_Pr_m_Ev :: Precipitation minus Evaporation [kg/m2/s]
                0039 C     land_EnWFlux :: Energy flux associated with Precip [W/m2] (snow, T_rain)
e0a2f8aec4 Jean*0040       COMMON /LAND_FORCFIELDS/
1cd785a34e Jean*0041      &  land_HeatFlx, land_Pr_m_Ev, land_EnWFlux
e0a2f8aec4 Jean*0042
1cd785a34e Jean*0043       _RL land_HeatFlx(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
e0a2f8aec4 Jean*0044       _RL land_Pr_m_Ev(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
89992793c5 Jean*0045       _RL land_EnWFlux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
e0a2f8aec4 Jean*0046
                0047 C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
4922beda30 Jean*0048
e0a2f8aec4 Jean*0049 #endif /* ALLOW_LAND */