427 |
diagName = 'UAVE ' |
diagName = 'UAVE ' |
428 |
diagTitle = 'Average Zonal Wind (m/s)' |
diagTitle = 'Average Zonal Wind (m/s)' |
429 |
diagUnits = 'm/s ' |
diagUnits = 'm/s ' |
430 |
WRITE(diagCode,'(A,I3.3,A)') 'UM ',diagNum+2,'MR ' |
WRITE(diagCode,'(A,I3.3,A)') 'UM ',diagNum+2,'ML ' |
431 |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
432 |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
433 |
|
|
441 |
diagName = 'TAVE ' |
diagName = 'TAVE ' |
442 |
diagTitle = 'Average Potential Temperature (K)' |
diagTitle = 'Average Potential Temperature (K)' |
443 |
diagUnits = 'K ' |
diagUnits = 'K ' |
444 |
diagCode = 'SM MR ' |
diagCode = 'SM ML ' |
445 |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
446 |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
447 |
|
|
449 |
diagTitle = |
diagTitle = |
450 |
. 'Average Specific Humidity (g/kg)' |
. 'Average Specific Humidity (g/kg)' |
451 |
diagUnits = 'gram/kg ' |
diagUnits = 'gram/kg ' |
452 |
diagCode = 'SM MR ' |
diagCode = 'SM ML ' |
453 |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
454 |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
455 |
|
|