Initialise mean netCDF variables (Source File: save_mean_ncdf.F90)

INTERFACE:

    subroutine save_mean_ncdf(secs)

DESCRIPTION:

USES:

    use netcdf
    use exceptions
    use grid_ncdf,    only: xlen,ylen,zlen
    use ncdf_mean
    use diagnostic_variables
    use domain,       only: ioff,joff,imin,imax,jmin,jmax,kmax
    use domain,       only: H,az
    use domain,       only: min_depth
    use variables_3d, only: kmin
    use variables_3d, only: Dn
    use m3d, only: calc_temp,calc_salt
 #ifdef GETM_BIO
    use bio_var, only: numc
 #endif
 #ifdef _FABM_
    use getm_fabm, only: model
 #endif
 
    IMPLICIT NONE

INPUT PARAMETERS:

    REALTYPE, intent(in) :: secs
   !DEFINED PARAMTERS:
    logical, parameter   :: save3d=.true.

REVISION HISTORY:

    Original author(s): Adolf Stips & Karsten Bolding

LOCAL VARIABLES:

    integer                   :: n
    integer                   :: err
    integer                   :: start(4),edges(4)
    integer, save             :: n3d=0
    REALTYPE                  :: dum(1)
    REALTYPE,dimension(E2DFIELD) :: ws2d
    REALTYPE,dimension(I3DFIELD) :: ws3d