INTERFACE:
subroutine ncd_io_real_var3(varname, data, dim1name, & flag, ncid, nt, readvar)DESCRIPTION:
Netcdf i/o of 2d initial integer field out to netCDF file
USES:
ARGUMENTS:
implicit none type(file_desc_t), intent(inout) :: ncid ! netcdf file id character(len=*) , intent(in) :: flag ! 'read' or 'write' character(len=*) , intent(in) :: varname ! variable name real(r8) , pointer :: data(:,:,:) ! local decomposition input data character(len=*) , intent(in) :: dim1name ! dimension 1 name integer, optional, intent(in) :: nt ! time sample index logical, optional, intent(out) :: readvar ! true => variable is on initial dataset (read only)REVISION HISTORY:
LOCAL VARIABLES: