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,h_missing
    use ncdf_2d, only: ws2d => ws
    use ncdf_3d, only: ws3d => ws
    use ncdf_mean
    use diagnostic_variables
    use domain,       only: ioff,joff,imin,imax,jmin,jmax,kmax
    use domain,       only: H,az
    use variables_3d, only: kmin
    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)



kklingbe 2017-10-02