INTERFACE:
subroutine open_restart_ncdf(fname,runtype)DESCRIPTION:
Opens a NetCDF formatted GETM hotstart file. All NetCDF variable id's necessary for making a correct GETM hotstart are read. The id's are shared with the reading routine using the ncdf_restart module. USES:
use netcdf
use ncdf_restart
#ifndef NO_3D
use domain, only: vert_cord
#ifdef GETM_BIO
use bio, only: bio_calc
use getm_bio, only: bio_init_method
#endif
#ifdef _FABM_
use getm_fabm, only: fabm_calc,fabm_init_method
#endif
#endif
IMPLICIT NONE
INPUT PARAMETERS:
character(len=*), intent(in) :: fname
integer, intent(in) :: runtype
REVISION HISTORY:
Original author(s): Karsten BoldingLOCAL VARIABLES:
integer :: dimids(3)
character(len=20) :: varnam