Writes variables to a GETM NetCDF hotstart file (Source File: write_restart_ncdf.F90)

INTERFACE:

    subroutine write_restart_ncdf(runtype,secs,loop,julianday,secondsofday)

DESCRIPTION:

Writes to a NetCDF file previously created using the create_restart_ncdf() subroutine all variables necessary to make a correct GETM hotstart. The Fortran variables are written directly into the corresponding NetCDF variable. USES:

    use netcdf
    use ncdf_restart
    use domain, only: xcord,ycord
    use domain, only: imin,imax,jmin,jmax,kmax
    use variables_2d
 #ifndef NO_3D
    use variables_3d
 #ifdef GETM_BIO
    use bio, only: bio_calc
    use bio_var, only: numc
 #endif
 #ifdef _FABM_
    use getm_fabm, only: fabm_pel,fabm_ben
 #endif
 #endif
 #ifdef SPM
    use suspended_matter
 #endif
    IMPLICIT NONE

INPUT PARAMETERS:

    integer, intent(in)       :: runtype
    REALTYPE, intent(in)      :: secs ! not used now
    integer, intent(in)       :: loop,julianday,secondsofday

REVISION HISTORY:

    Original author(s): Karsten Bolding

LOCAL VARIABLES:

    integer         :: k,n, rc
    REALTYPE, allocatable :: zax(:)