45 |
|
|
46 |
c IF ( useDiagnotics ) THEN |
c IF ( useDiagnotics ) THEN |
47 |
|
|
48 |
diagName = 'FRAZdTdt' |
diagName = 'FrzForcT' |
49 |
diagTitle = ' Pot.Temp. tendency from package FRAZIL' |
diagTitle = 'Frazil temperature forcing, > 0 increases theta' |
50 |
diagUnits = 'K/s ' |
diagUnits = 'W/m^2 ' |
51 |
diagCode = 'SMR MR ' |
diagCode = 'SM MR ' |
52 |
CALL DIAGNOSTICS_ADDTOLIST( diagNum, |
CALL DIAGNOSTICS_ADDTOLIST( diagNum, |
53 |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
54 |
|
|