clmpar_module.f90

来自「CLM集合卡曼滤波数据同化算法」· F90 代码 · 共 22 行

  MODULE clmpar_module

!=======================================================================
!      Source file: clmpar_module.f90
! Original version: Yongjiu Dai, September 15, 1999
!
!=======================================================================

      IMPLICIT NONE

! land surface 2-d grid and 1-d vector length

      integer lpt    ! number of land points on clmlon x clmlat grid
      integer kpt    ! total number of clm land points, including subgrid points

! define CLM spatial difference parameters

      integer, parameter :: msl = 10      ! number of soil layers
      integer, parameter :: maxsnl = -5   ! max number of snow layers

  END MODULE clmpar_module