1 |
C $Header: /u/gcmpack/models/MITgcmUV/pkg/aim/AIM_DIAGS.h,v 1.2 2001/02/02 21:36:29 adcroft Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
#ifdef ALLOW_AIM |
5 |
|
6 |
C /==========================================================\ |
7 |
C | AIM_DIAGS.h | |
8 |
C | o Header for AIM diagnostic output | |
9 |
C |==========================================================| |
10 |
C | Declares global arrays used for holding/accumulating | |
11 |
C | diagnostic output from AIM. | |
12 |
C \==========================================================/ |
13 |
|
14 |
#ifdef ALLOW_TIMEAVE |
15 |
|
16 |
C Timer for AIM diags |
17 |
_RL AIM_TimeAve(Nr,nSx,nSy) |
18 |
COMMON /AIM_TAVE/ AIM_TimeAve |
19 |
|
20 |
C USTRtave - u-stress (Pa) |
21 |
C VSTRtave - v-stress (Pa) |
22 |
C TSRtave - top-of-atm. shortwave radiation (W/m2) |
23 |
C OLRtave - outgoing longwave radiation (W/m2) |
24 |
C SSRtave - surface shortwave radiation (W/m2) |
25 |
C SLRtave - surface longwave radiation (W/m2) |
26 |
C SHFtave - sensible heat flux (W/m2) |
27 |
C EVAPtave - evaporation [g/ (m2 s)] |
28 |
C PRECNVtave- convective precipitation [g/ (m2 s)] |
29 |
C PRECLStave- large-scale precipitation [g/ (m2 s)] |
30 |
C CLOUDCtave- total cloud cover (fraction) |
31 |
C |
32 |
COMMON /AIM_TAVE_A/ |
33 |
& USTRTave,VSTRtave, |
34 |
& TSRtave,OLRtave,SSRtave,SLRtave,SHFtave, |
35 |
& EVAPtave,PRECNVtave,PRECLStave,CLOUDCtave |
36 |
_RL USTRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
37 |
_RL VSTRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
38 |
_RL TSRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
39 |
_RL OLRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
40 |
_RL SSRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
41 |
_RL SLRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
42 |
_RL SHFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
43 |
_RL EVAPtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
44 |
_RL PRECNVtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
45 |
_RL PRECLStave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
46 |
_RL CLOUDCtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
47 |
|
48 |
#endif /* ALLOW_TIMEAVE */ |
49 |
|
50 |
|
51 |
#endif /* ALLOW_AIM */ |