INTERFACE:
subroutine init_2d_ncdf(fn,title,starttime)DESCRIPTION:
USES:
use netcdf
use exceptions
use ncdf_common
use ncdf_2d
use domain, only: imin,imax,jmin,jmax
use domain, only: ioff,joff
use meteo, only: metforcing,calc_met
use meteo, only: fwf_method
use m2d, only: residual
use getm_version
IMPLICIT NONE
INPUT PARAMETERS:
character(len=*), intent(in) :: fn,title,starttimeDEFINED PARAMETERS:
logical, parameter :: init3d=.false.REVISION HISTORY:
LOCAL VARIABLES:
integer :: err
integer :: scalar(1),f2_dims(2),f3_dims(3)
REALTYPE :: fv,mv,vr(2)
character(len=80) :: history,ts