forked from altMITgcm/MITgcm
-
Notifications
You must be signed in to change notification settings - Fork 0
/
GGL90_TAVE.h
34 lines (25 loc) · 1.24 KB
/
GGL90_TAVE.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
C $Header: /u/gcmpack/MITgcm/pkg/ggl90/GGL90_TAVE.h,v 1.3 2010/08/06 18:37:05 gforget Exp $
C $Name: $
#ifdef ALLOW_GGL90
C *==========================================================*
C | GGL90_TAVE.h
C | o Header for GGL90 time-average output
C *==========================================================*
#ifdef ALLOW_TIMEAVE
C----------------------------------------------------------------
C GGL90_timeAve - time of temporal integration (s) for each thread
C----------------------------------------------------------------
_RL GGL90_timeAve(nSx,nSy)
COMMON /GGL90_TAVE_COUNT/ GGL90_timeAve
C----------------------------------------------------------------
C GGL90*tave - Time-averaging GGL90 variables
C----------------------------------------------------------------
_RL GGL90TKEtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
_RL GGL90viscArUtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
_RL GGL90viscArVtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
_RL GGL90diffKrtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
COMMON /GGL90_TAVE_FIELDS/
& GGL90TKEtave, GGL90diffKrtave,
& GGL90viscArUtave, GGL90viscArVtave
#endif /* ALLOW_TIMEAVE */
#endif /* ALLOW_GGL90 */