1 |
|
C $Header$ |
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 INCLUDE_DIAGNOSTICS_INTERFACE_CODE |
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 /* INCLUDE_DIAGNOSTICS_INTERFACE_CODE */ |
49 |
|
|
50 |
|
|
51 |
|
#endif /* ALLOW_AIM */ |