512 |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
513 |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
514 |
|
|
|
#ifdef ATMOSPHERIC_LOADING |
|
515 |
diagName = 'atmPload' |
diagName = 'atmPload' |
516 |
diagTitle = 'Atmospheric pressure loading' |
diagTitle = 'Atmospheric pressure loading' |
517 |
diagUnits = 'Pa ' |
diagUnits = 'Pa ' |
525 |
diagCode = 'SM U1 ' |
diagCode = 'SM U1 ' |
526 |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
527 |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
|
#endif /* ATMOSPHERIC_LOADING */ |
|
528 |
|
|
529 |
diagName = 'oceFWflx' |
diagName = 'oceFWflx' |
530 |
diagTitle = 'net surface Fresh-Water flux into the ocean' |
diagTitle = 'net surface Fresh-Water flux into the ocean' |