pkg/kpp/KPP_TAVE.h

2fa42a6013 Alis*0001 #ifdef ALLOW_KPP
                0002
cd56dd0428 Jean*0003 C     *==========================================================*
                0004 C     | KPP_TAVE.h
                0005 C     | o Header for KPP time-average output
                0006 C     *==========================================================*
2fa42a6013 Alis*0007
edf2138f58 Jean*0008 #ifdef ALLOW_TIMEAVE
2fa42a6013 Alis*0009 C----------------------------------------------------------------
                0010 C     kpp_drctrecTave - next record to dump for KPP averaging files
                0011 C----------------------------------------------------------------
                0012
                0013       INTEGER kpp_drctrecTave
                0014       COMMON /KPP_RECORDNUM2/ kpp_drctrecTave
                0015
                0016 C----------------------------------------------------------------
8b6db0f7a7 Jean*0017 C     KPP_timeAve - Cumulated time (s) for time-average fields
2fa42a6013 Alis*0018 C----------------------------------------------------------------
                0019
8b6db0f7a7 Jean*0020       _RL KPP_timeAve(nSx,nSy)
                0021       COMMON /KPP_TAVE_COUNT/ KPP_timeAve
2fa42a6013 Alis*0022
                0023 C----------------------------------------------------------------
                0024 C     KPP*tave    - Time-averaging KPP variables
                0025 C----------------------------------------------------------------
                0026
                0027       _RL KPPviscAztave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0028       _RL KPPdiffKzTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0029       _RL KPPdiffKzStave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
141e734c73 Jean*0030       _RL KPPghatKStave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0031       _RL KPPhbltave     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,   nSx,nSy)
cd56dd0428 Jean*0032       COMMON /KPP_TAVE_FIELDS/
141e734c73 Jean*0033      &        KPPviscAztave, KPPdiffKzTtave, KPPdiffKzStave,
                0034      &        KPPghatKStave, KPPhbltave
c9c3d7103f Ed H*0035
cd56dd0428 Jean*0036 #endif /* ALLOW_TIMEAVE */
                0037 #endif /* ALLOW_KPP */
c9c3d7103f Ed H*0038
                0039 CEH3 ;;; Local Variables: ***
                0040 CEH3 ;;; mode:fortran ***
                0041 CEH3 ;;; End: ***