INTERFACE:
subroutine atm_readdata (fname, kmo, itim)DESCRIPTION:
read atmospheric forcing single level fields from netCDF file
this is done at every subsequent call to atmrd
this includes a second call at the 1st tstep of the run or of the month
Use nf_get_vara_real to read data for variable referenced by
variable id = [i]
nf_get_vara_real (ncid, i, beg, len, varval)
integer beg - a vector of integers specifying the index in the
variable where the first data value is read.
must be dimensioned same as the variable's dimension
and a starting value must be given for each dimension
integer len - a vector of integers specifying the number of data
values, for each of the variable's dimensions, to read.
must be dimensioned same as the variable's dimension
and a length must be given for each dimension
USES:
use clm_varcon , only : sb
use fileutils , only : getfil
ARGUMENTS:
implicit none
include 'netcdf.inc'
character(len=*), intent(in) :: fname !history file to open and read
integer, intent(in) :: kmo, itim !current month and time index
REVISION HISTORY:
Created by Sam Levis