1 |
C $Header: /u/gcmpack/models/MITgcmUV/pkg/mitphys/MITPHYS_DIAGS.h,v 1.3 2001/05/02 17:50:32 sb Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
#ifdef ALLOW_MITPHYS |
5 |
|
6 |
C /==========================================================\ |
7 |
C | MITPHYS_DIAGS.h | |
8 |
C | o Header for MITPHYS diagnostic output | |
9 |
C |==========================================================| |
10 |
C | Declares global arrays used for holding/accumulating | |
11 |
C | diagnostic output from MITPHYS. | |
12 |
C \==========================================================/ |
13 |
|
14 |
#ifdef ALLOW_TIMEAVE |
15 |
|
16 |
C Timer for MITPHYS diags |
17 |
_RL MITPHYS_TimeAve(Nr,nSx,nSy) |
18 |
COMMON /MITPHYS_TAVE/ MITPHYS_TimeAve |
19 |
|
20 |
C 2D fields: |
21 |
C TSWtave - top-of-atm. shortwave radiation (W/m2) |
22 |
C TLWtave - outgoing longwave radiation (W/m2) |
23 |
C TSW0tave - clear-sky top-of-atm. shortwave radiation (W/m2) |
24 |
C TLW0tave - clear-sky outgoing longwave radiation (W/m2) |
25 |
C SSWtave - surface shortwave radiation (W/m2) |
26 |
C SLWtave - surface longwave radiation (W/m2) |
27 |
C SINStave - insolation (W/m2) |
28 |
C BKTtave - bucket water content (cm) |
29 |
C SHFtave - sensible heat flux (W/m2) |
30 |
C LHFtave - latent heat flux (W/m2) |
31 |
C USTRtave - zonal surface stress (N/m2) |
32 |
C VSTRtave - meridional surface (N/m2) |
33 |
C PRECNVtave- convective precipitation [mm/day] |
34 |
C PRECLStave- large-scale precipitation [mm/day] |
35 |
C CLOUDCtave- total cloud cover (fraction) |
36 |
C SSTtave - sea surface temperature (K) |
37 |
C QFLUXtave - QFLUX (W m-2) |
38 |
C PRWtave - precipitable water (kg/m2) |
39 |
C CBMFtave - cloud base mass flux (kg/m2/s) |
40 |
C PLCLtave - cloud base pressure (mb) |
41 |
C 3D fields: |
42 |
C RHtave - relative humidity profile (0-1) |
43 |
C CLDFtave - cloud fraction profile (0-1) |
44 |
C CLDQtave - in-cloud water content (kg/kg) |
45 |
C CLDQCtave - convective in-cloud water content (kg/kg) |
46 |
C RCtave - NET radiative heating (K/day) |
47 |
C CRLWtave - LW cloud radiative forcing (K/day) |
48 |
C CRSWtave - SW cloud radiative forcing (K/day) |
49 |
C MUPtave - upward convective mass flux (kg/m2/s) |
50 |
C MDNtave - downward saturated conv mass flux (kg/m2/s) |
51 |
C MDN0tave - downward unsaturated conv mass flux (kg/m2/s) |
52 |
C ENTtave - convective entrainment rate (kg/m2/s) |
53 |
C DETtave - convective detrainment rate (kg/m2/s) |
54 |
C Utave - meridional wind (m/s) |
55 |
C Vtave - meridional wind (m/s) |
56 |
C Wtave - vertical velocity (m/s) |
57 |
C Ttave - absolute temperature (K) |
58 |
C Qtave - total water mixing ratio (kg/kg) |
59 |
C PHItave - geopotential |
60 |
C SXtave - dry static energy (kJ/kg) |
61 |
C HXtave - moist static energy (kJ/kg) |
62 |
C DTCNVtave - temp tendency due to convection (K/day) |
63 |
C DQCNVtave - hum tendency due to convection (kg/kg/day) |
64 |
C DTLSCtave - temp tendency due to LS condensation (K/day) |
65 |
C DTPBLtave - temp tendency due to PBL and diffusion (K/day) |
66 |
C UT_PBLtave - Zon. wind tendency due to PBL and diffusion (m/s/day) |
67 |
C VT_PBLtave - Mer. wind tendency due to PBL and diffusion (m/s/day |
68 |
C UT_CNVtave - Zon. wind tendency due to convection (m/s/day) |
69 |
C VT_CNVtave - Mer. wind tendency due to convection (m/s/day) |
70 |
C UT_ADJtave - Zon. wind tendency due to dry adjustment (m/s/day) |
71 |
C VT_ADJtave - Mer. wind tendency due to dry adjustment (m/s/day) |
72 |
C TT_ADJtave - temp. tendency due to dry adjustment (K/day) |
73 |
C QT_ADJtave - hum. tendency due to dry adjustment (kg/kg/day) |
74 |
C Zonal averages |
75 |
C RHzav - relative humidity profile (0-1) |
76 |
C CLDFzav - cloud fraction profile (0-1) |
77 |
C CLDQzav - in-cloud water content (kg/kg) |
78 |
C CLDQCzav - convective in-cloud water content (kg/kg) |
79 |
C RCzav - NET radiative heating (K/day) |
80 |
C CRLWzav - LW cloud radiative forcing (K/day) |
81 |
C CRSWzav - SW cloud radiative forcing (K/day) |
82 |
C MUPzav - upward convective mass flux (kg/m2/s) |
83 |
C MDNzav - downward saturated conv mass flux (kg/m2/s) |
84 |
C MDN0zav - downward unsaturated conv mass flux (kg/m2/s) |
85 |
C ENTzav - convective entrainment rate (kg/m2/s) |
86 |
C DETzav - convective detrainment rate (kg/m2/s) |
87 |
C Uzav - meridional wind (m/s) |
88 |
C Vzav - meridional wind (m/s) |
89 |
C Wzav - vertical velocity (m/s) |
90 |
C Tzav - absolute temperature (K) |
91 |
C Qzav - total water mixing ratio (kg/kg) |
92 |
C PHIzav - geopotential |
93 |
C SXzav - dry static energy (kJ/kg) |
94 |
C HXzav - moist static energy (kJ/kg) |
95 |
C DTCNVzav - temp tendency due to convection (K/day) |
96 |
C DQCNVzav - hum tendency due to convection (kg/kg/day) |
97 |
C DTLSCzav - temp tendency due to LS condensation (K/day) |
98 |
C DTPBLzav - temp tendency due to PBL and diffusion (K/day) |
99 |
C UT_PBLzav - Zon. wind tendency due to PBL and diffusion (m/s/day) |
100 |
C VT_PBLzav - Mer. wind tendency due to PBL and diffusion (m/s/day |
101 |
C UT_CNVzav - Zon. wind tendency due to convection (m/s/day) |
102 |
C VT_CNVzav - Mer. wind tendency due to convection (m/s/day) |
103 |
C UT_ADJzav - Zon. wind tendency due to dry adjustment (m/s/day) |
104 |
C VT_ADJzav - Mer. wind tendency due to dry adjustment (m/s/day) |
105 |
C TT_ADJzav - temp. tendency due to dry adjustment (K/day) |
106 |
C QT_ADJzav - hum. tendency due to dry adjustment (kg/kg/day) |
107 |
C UVzav - meridional transport of ang. mom. (m2/s2) |
108 |
C VTzav - meridional transport of abs. Temp. (mK/s) |
109 |
C VQzav - meridional transport of spec. humidity (m kg/kg s) |
110 |
C UWzav - vertical transport of ang. mom. (Pa m/s2) |
111 |
C WTzav - vertical transport of abs. temp. (Pa K/s) |
112 |
C WQav - vertical transport of spec. hum. (Pa kg /kg s) |
113 |
|
114 |
|
115 |
COMMON /MITPHYS_TAVE_A/ |
116 |
& TSWtave,TLWtave,SSWtave,SLWtave,SINStave,SHFtave, |
117 |
& BKTtave, LHFtave, USTRtave, VSTRtave, |
118 |
& PRECNVtave,PRECLStave,CLOUDCtave, |
119 |
& SSTtave,PRWtave,TSW0tave,TLW0tave, |
120 |
& QFLUXtave,CBMFtave, PLCLtave, |
121 |
& RHtave,CLDFtave,CLDQtave,CLDQCtave, |
122 |
& RCtave,CRLWtave,CRSWtave, |
123 |
& MUPtave,MDNtave,MDN0tave, |
124 |
& ENTtave,DETtave, |
125 |
& Utave,Vtave,Wtave, |
126 |
& Ttave,Qtave,PHItave,SXtave,HXtave, |
127 |
& DTCNVtave,DTLSCtave,DTPBLtave, |
128 |
& DQCNVtave, UT_PBLtave, VT_PBLtave, |
129 |
& UT_CNVtave, VT_CNVtave, |
130 |
& UT_ADJtave, VT_ADJtave, |
131 |
& TT_ADJtave, QT_ADJtave, |
132 |
& RHzav,CLDFzav,CLDQzav,CLDQCzav, |
133 |
& RCzav,CRLWzav,CRSWzav, |
134 |
& MUPzav,MDNzav,MDN0zav, |
135 |
& ENTzav,DETzav, |
136 |
& Uzav,Vzav,Wzav, |
137 |
& Tzav,Qzav,PHIzav,SXzav,HXzav, |
138 |
& DTCNVzav,DTLSCzav,DTPBLzav, |
139 |
& DQCNVzav, UT_PBLzav, VT_PBLzav, |
140 |
& UT_CNVzav, VT_CNVzav, |
141 |
& UT_ADJzav, VT_ADJzav, |
142 |
& TT_ADJzav, QT_ADJzav, |
143 |
& UVzav,VTzav,VQzav, |
144 |
& UWzav,WTzav,WQzav |
145 |
|
146 |
_RL TSWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
147 |
_RL TLWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
148 |
_RL SSWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
149 |
_RL SLWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
150 |
_RL SINStave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
151 |
_RL BKTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
152 |
_RL SHFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
153 |
_RL LHFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
154 |
_RL USTRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
155 |
_RL VSTRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
156 |
_RL PRECNVtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
157 |
_RL PRECLStave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
158 |
_RL CLOUDCtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
159 |
_RL SSTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
160 |
_RL QFLUXtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
161 |
_RL PRWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
162 |
_RL TSW0tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
163 |
_RL TLW0tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
164 |
_RL CBMFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
165 |
_RL PLCLtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
166 |
_RL RHtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
167 |
_RL CLDFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
168 |
_RL CLDQtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
169 |
_RL CLDQCtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
170 |
_RL RCtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
171 |
_RL CRLWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
172 |
_RL CRSWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
173 |
_RL MUPtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
174 |
_RL MDNtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
175 |
_RL MDN0tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
176 |
_RL ENTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
177 |
_RL DETtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
178 |
_RL Utave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
179 |
_RL Vtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
180 |
_RL Wtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
181 |
_RL Ttave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
182 |
_RL Qtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
183 |
_RL PHItave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
184 |
_RL SXtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
185 |
_RL HXtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
186 |
_RL DTCNVtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
187 |
_RL DTLSCtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
188 |
_RL DTPBLtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
189 |
_RL UT_PBLtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
190 |
_RL VT_PBLtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
191 |
_RL UT_CNVtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
192 |
_RL VT_CNVtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
193 |
_RL UT_ADJtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
194 |
_RL VT_ADJtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
195 |
_RL TT_ADJtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
196 |
_RL QT_ADJtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
197 |
_RL DQCNVtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
198 |
|
199 |
_RL RHzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
200 |
_RL CLDFzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
201 |
_RL CLDQzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
202 |
_RL CLDQCzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
203 |
_RL RCzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
204 |
_RL CRLWzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
205 |
_RL CRSWzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
206 |
_RL MUPzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
207 |
_RL MDNzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
208 |
_RL MDN0zav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
209 |
_RL ENTzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
210 |
_RL DETzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
211 |
_RL Uzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
212 |
_RL Vzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
213 |
_RL Wzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
214 |
_RL Tzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
215 |
_RL Qzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
216 |
_RL PHIzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
217 |
_RL SXzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
218 |
_RL HXzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
219 |
_RL DTCNVzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
220 |
_RL DTLSCzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
221 |
_RL DTPBLzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
222 |
_RL UT_PBLzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
223 |
_RL VT_PBLzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
224 |
_RL UT_CNVzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
225 |
_RL VT_CNVzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
226 |
_RL UT_ADJzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
227 |
_RL VT_ADJzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
228 |
_RL TT_ADJzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
229 |
_RL QT_ADJzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
230 |
_RL DQCNVzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
231 |
_RL UVzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
232 |
_RL VTzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
233 |
_RL VQzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
234 |
_RL UWzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
235 |
_RL WTzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
236 |
_RL WQzav (1-OLy:sNy+OLy,Nr,nSx,nSy) |
237 |
|
238 |
#endif /* ALLOW_TIMEAVE */ |
239 |
|
240 |
|
241 |
#endif /* ALLOW_MITPHYS */ |