#include <misc.h>
#include <params.h>
module ppgrid 114
!-----------------------------------------------------------------------
!
! Purpose:
! Initialize physics grid resolution parameters
! for a chunked data structure
!
! Author:
!
!-----------------------------------------------------------------------
! Grid point resolution parameters
integer pcols ! number of columns (max)
integer pver ! number of vertical levels
integer pvermx ! number of subsurface levels
integer pverp ! pver + 1
parameter (pcols = PCOLS)
parameter (pver = PLEV)
parameter (pvermx = 4)
parameter (pverp = pver + 1 )
!
! start, end indices for chunks owned by a given MPI task
! (set in phys_grid_init).
!
integer :: begchunk = 0 !
integer :: endchunk = -1 !
end module ppgrid