158 |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
159 |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
160 |
|
|
161 |
|
diagName = 'MOISTU ' |
162 |
|
diagTitle = 'Zonal Wind Tendency from Moist Proc (m/s/day)' |
163 |
|
diagUnits = 'm/s/day ' |
164 |
|
WRITE(diagCode,'(A,I3.3,A)') 'UM ',diagNum+2,'ML ' |
165 |
|
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
166 |
|
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
167 |
|
|
168 |
|
diagName = 'MOISTV ' |
169 |
|
diagTitle = 'Meridional Wind Tendency from Moist Proc (m/s/day)' |
170 |
|
diagUnits = 'm/s/day ' |
171 |
|
WRITE(diagCode,'(A,I3.3,A)') 'VM ', diagNum ,'ML ' |
172 |
|
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
173 |
|
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
174 |
|
|
175 |
diagName = 'MOISTT ' |
diagName = 'MOISTT ' |
176 |
diagTitle = |
diagTitle = |
177 |
. 'Temperature Tendency due to Moist Processes (K/day)' |
. 'Temperature Tendency due to Moist Processes (K/day)' |