Routines to create land model gridUSES:
use shr_kind_mod, only: r8 => shr_kind_r8 use clm_varpar use clm_varsur use clm_varctl use areaMod use fileutils , only : getfil use spmdMod , only : masterproc use ncdio use abortutils, only : endrunPUBLIC TYPES:
implicit none savePUBLIC MEMBER FUNCTIONS:
#if (defined OFFLINE) public :: mkgrid_offline ! Obtain land model grid when mode is offline #else public :: mkgrid_cam ! Generate land model grid when mode is CAM or CS #endif !PRIVATE MEMBER FUNCTIONS: #if (defined OFFLINE) private :: read_grid_offline ! Read land model grid when mode is offline private :: create_grid_offline ! Generate land model grid when mode is off #endifREVISION HISTORY:
Author: Mariana Vertenstein