!-----------------------------------------------------------------------
!   INCLUDE 'dimphys.h'

      INTEGER, PARAMETER :: ngridmx = (2+(jjm-1)*iim - 1/jjm)   
      integer, parameter :: nlayermx = llm 
      integer, parameter :: nsoilmx = 10

!-----------------------------------------------------------------------