Module clm_varctl
(Source File: clm_varctl.F90)

   Module containing run control variables

USES:

   use shr_kind_mod, only: r8 => shr_kind_r8

PUBLIC TYPES:

   implicit none
   save
   Run control variables
   character(len=256) :: caseid                  ! case id
   character(len=256) :: ctitle                  ! case title
   integer :: nsrest                             ! 0: initial run. 1: restart:
   logical, public :: brnch_retain_casename = .false. ! true => allow case nam
                                                      ! by default this is not
   Initial file variables
   character(len= 8) :: hist_crtinic             ! if set to 'MONTHLY' or 'YEA
   Long term archive variables
   character(len=256) :: archive_dir             ! long term archive directory
   character(len=  8) :: mss_wpass               ! mass store write password f
   integer            :: mss_irt                 ! mass store retention period
   Run input files
   character(len=256) :: finidat                 ! initial conditions file nam
   character(len=256) :: fsurdat                 ! surface data file name
   character(len=256) :: fpftcon                 ! ASCII data file with PFT ph
   character(len=256) :: nrevsn                  ! restart data file name for 
   character(len=256) :: frivinp_rtm             ! RTM input data file name
   character(len=256) :: offline_atmdir          ! directory for input offline
   Files and logical variables for generating surface dataset
   logical            :: mksrf_all_pfts           ! true => surface dataset wi
   real(r8)           :: mksrf_offline_edgen      ! northern edge of grid (deg
   real(r8)           :: mksrf_offline_edgee      ! eastern edge of grid (degr
   real(r8)           :: mksrf_offline_edges      ! southern edge of grid (deg
   real(r8)           :: mksrf_offline_edgew      ! western edge of grid (degr
   character(len=256) :: mksrf_offline_fgrid      ! land grid file name to use
   character(len=256) :: mksrf_offline_fnavyoro   ! directory for 20 min navy 
   character(len=256) :: mksrf_fvegtyp            ! when making [fsurdat]: veg
   character(len=256) :: mksrf_fsoitex            ! when making [fsurdat]: soi
   character(len=256) :: mksrf_fsoicol            ! when making [fsurdat]: soi
   character(len=256) :: mksrf_flanwat            ! when making [fsurdat]: inl
   character(len=256) :: mksrf_furban             ! when making [fsurdat]: urb
   character(len=256) :: mksrf_fglacier           ! when making [fsurdat]: gla
   character(len=256) :: mksrf_flai               ! when making [fsurdat]: lai
   Physics
   integer :: irad         ! solar radiation frequency (iterations)
   logical :: wrtdia       ! true => write global average diagnostics to std o
   logical :: csm_doflxave ! true => only communicate with flux coupler on alb
   Rtm control variables
   integer :: rtm_nsteps   ! if > 1, average rtm over rtm_nsteps time steps
   Derived variables (run, history and restart file)
   character(len=256) :: rpntdir          ! directory name for local restart p
   character(len=256) :: rpntfil          ! file name for local restart pointe
   character(len=256) :: version          ! model version number
   Error growth perturbation limit
   real(r8) :: pertlim                    ! perturbation limit when doing erro

REVISION HISTORY:

   Created by Mariana Vertenstein and Gordon Bonan