pkg/kl10/KL10_TAVE.h

d8d1486ca1 Jean*0001 #ifdef ALLOW_KL10
                0002
                0003 C     *==========================================================*
                0004 C     | KL10_TAVE.h
                0005 C     | o Header for KL10 time-average output
                0006 C     *==========================================================*
                0007
                0008 #ifdef ALLOW_TIMEAVE
                0009 C----------------------------------------------------------------
                0010 C     KL_timeAve - time of temporal integration (s) for each thread
                0011 C----------------------------------------------------------------
                0012
                0013       _RL KL_timeAve(nSx,nSy)
                0014       COMMON /KL10_TAVE_COUNT/ KL_timeAve
                0015
                0016 C----------------------------------------------------------------
                0017 C     KL*tave    - Time-averaging KL variables
                0018 C----------------------------------------------------------------
                0019
                0020       _RL KLviscArtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0021       _RL KLdiffKrtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0022       COMMON /KL10_TAVE_FIELDS/
                0023      &        KLviscArtave, KLdiffKrtave
                0024
                0025 #endif /* ALLOW_TIMEAVE */
                0026
                0027 #endif /* ALLOW_KL10 */