hist_restart_ncd

INTERFACE:

   subroutine hist_restart_ncd (ncid, flag, rdate)

DESCRIPTION:

Read/write history file restart data. If the current history file(s) are not full, file(s) are opened so that subsequent time samples are added until the file is full. A new history file is used on a branch run.

USES:

     use clm_varctl, only : nsrest, caseid, nsrStartup, nsrBranch
     use fileutils , only : set_filename, getfil
     use domainMod , only : ldomain,llatlon,adomain,alatlon
     use clm_varpar, only : nlevgrnd, nlevlak, numrad, rtmlon, rtmlat
 #if (defined CASA)
     use CASAMod,    only : nlive, npools, npool_types
 #endif

ARGUMENTS:

     implicit none
     type(file_desc_t), intent(inout) :: ncid     ! netcdf file
     character(len=*) , intent(in)    :: flag     !'read' or 'write'
     character(len=*) , intent(in), optional :: rdate    ! restart file time stamp for name

REVISION HISTORY:

   Created by Mariana Vertenstein

LOCAL VARIABLES: