get_gw_4d_var Function

private function get_gw_4d_var(ncfile_id, try_it, varname, default_data, nlon, nlat, ms, npatch) result(data_vec)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	ncfile_id
integer,	intent(in)			::	try_it
character(len=*),	intent(in)			::	varname
real,	intent(in),		dimension(:,:)	::	default_data
integer,	intent(in)			::	nlon
integer,	intent(in)			::	nlat
integer,	intent(in)			::	ms
integer,	intent(in)			::	npatch

Return Value real(kind=r_2), dimension(mp,ms,mpatch)