source: codes/icosagcm/devel/src/base/grid_param.f90 @ 830

MODULE grid_param
  IMPLICIT NONE
  SAVE
  INTEGER  :: iim_glo=40
  INTEGER  :: jjm_glo
  INTEGER, PARAMETER  :: nb_face=10
  INTEGER, PARAMETER :: grid_unst=1, grid_ico = 2
  INTEGER  :: grid_type ! unstructured or icosahedral
  INTEGER, BIND(C) :: llm=19
  INTEGER  :: nqtot ! number of tracers handled by advection scheme
  INTEGER, BIND(C) :: nqdyn ! number of dynamical tracers : 1 if dry, more if moist
END MODULE grid_param