343 |
CALL DIAGNOSTICS_ADDTOLIST( diagNum, |
CALL DIAGNOSTICS_ADDTOLIST( diagNum, |
344 |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
345 |
|
|
346 |
c diagName = 'PsiVEL ' |
diagName = 'PsiVEL ' |
347 |
c diagTitle = 'Horizontal Velocity Stream-Function' |
diagTitle = 'Horizontal Velocity Stream-Function' |
348 |
c diagUnits = 'm^2/s ' |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m^2/s', myThid ) |
349 |
c diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m^2/s', myThid ) |
diagCode = 'SZ P MR ' |
|
c diagCode = 'SZ P MR ' |
|
350 |
C- use 'PhiVEL' as mate. |
C- use 'PhiVEL' as mate. |
351 |
c diagMate = diagNum |
diagMate = diagNum |
352 |
c CALL DIAGNOSTICS_ADDTOLIST( diagNum, |
CALL DIAGNOSTICS_ADDTOLIST( diagNum, |
353 |
c I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
354 |
|
|
355 |
diagName = 'UTHMASS ' |
diagName = 'UTHMASS ' |
356 |
diagTitle = 'Zonal Mass-Weight Transp of Pot Temp' |
diagTitle = 'Zonal Mass-Weight Transp of Pot Temp' |