347 |
cdiag(283) = 'TRAC3 ' |
cdiag(283) = 'TRAC3 ' |
348 |
cdiag(284) = 'TRAC4 ' |
cdiag(284) = 'TRAC4 ' |
349 |
cdiag(285) = 'TRAC5 ' |
cdiag(285) = 'TRAC5 ' |
350 |
|
cdiag(286) = 'DICBIOA ' |
351 |
|
cdiag(287) = 'DICCARB ' |
352 |
|
cdiag(288) = 'DICTFLX ' |
353 |
|
cdiag(289) = 'DICOFLX ' |
354 |
|
cdiag(290) = 'DICCFLX ' |
355 |
|
cdiag(291) = 'DICPCO2 ' |
356 |
|
cdiag(292) = 'DICPHAV ' |
357 |
|
|
358 |
c Diagnostic Descriptions |
c Diagnostic Descriptions |
359 |
c ---------------------------------------------------------------------- |
c ---------------------------------------------------------------------- |
710 |
tdiag(278) = 'Zonal Mass-Weighted Transp of Tracer 5 (m-kg/s-kg)' |
tdiag(278) = 'Zonal Mass-Weighted Transp of Tracer 5 (m-kg/s-kg)' |
711 |
tdiag(279) = 'Merid Mass-Weighted Transp of Tracer 5 (m-kg/s-kg)' |
tdiag(279) = 'Merid Mass-Weighted Transp of Tracer 5 (m-kg/s-kg)' |
712 |
tdiag(280) = 'Vert Mass-Weighted Transp of Tracer 5 (m-kg/s-kg)' |
tdiag(280) = 'Vert Mass-Weighted Transp of Tracer 5 (m-kg/s-kg)' |
713 |
tdiag(281) = 'Mass-Weighted Tracer 1 (kgkg)' |
tdiag(281) = 'Mass-Weighted Tracer 1 ()' |
714 |
tdiag(282) = 'Mass-Weighted Tracer 2 (kgkg)' |
tdiag(282) = 'Mass-Weighted Tracer 2 ()' |
715 |
tdiag(283) = 'Mass-Weighted Tracer 3 (kgkg)' |
tdiag(283) = 'Mass-Weighted Tracer 3 ()' |
716 |
tdiag(284) = 'Mass-Weighted Tracer 4 (kgkg)' |
tdiag(284) = 'Mass-Weighted Tracer 4 ()' |
717 |
tdiag(285) = 'Mass-Weighted Tracer 5 (kgkg)' |
tdiag(285) = 'Mass-Weighted Tracer 5 ()' |
718 |
|
tdiag(286) = 'Biological Productivity (mol/m3/s)' |
719 |
|
tdiag(287) = 'Carbonate chg-biol prod and remin (mol eq/m3/s)' |
720 |
|
tdiag(288) = 'Tendency of DIC due to air-sea exch (mol/m3/s)' |
721 |
|
tdiag(289) = 'Tendency of O2 due to air-sea exch (mol/m3/s)' |
722 |
|
tdiag(290) = 'Flux of CO2 - air-sea exch (mol/m2/s)' |
723 |
|
tdiag(291) = 'Partial Pressure of CO2 (atm)' |
724 |
|
tdiag(292) = 'pH (dimensionless)' |
725 |
|
|
726 |
c Diagnostic Units |
c Diagnostic Units |
727 |
c ---------------- |
c ---------------- |
1010 |
udiag(283) = 'kg/kg ' |
udiag(283) = 'kg/kg ' |
1011 |
udiag(284) = 'kg/kg ' |
udiag(284) = 'kg/kg ' |
1012 |
udiag(285) = 'kg/kg ' |
udiag(285) = 'kg/kg ' |
1013 |
|
udiag(286) = 'mol/m3/sec ' |
1014 |
|
udiag(287) = 'mol eq/m3/sec ' |
1015 |
|
udiag(288) = 'mol/m3/sec ' |
1016 |
|
udiag(289) = 'mol/m3/sec ' |
1017 |
|
udiag(290) = 'mol/m2/sec ' |
1018 |
|
udiag(291) = 'atm ' |
1019 |
|
udiag(292) = 'dimensionless ' |
1020 |
|
|
1021 |
c Diagnostic Parms |
c Diagnostic Parms |
1022 |
c ---------------- |
c ---------------- |
1269 |
gdiag(247) = 'UU 248M ' |
gdiag(247) = 'UU 248M ' |
1270 |
gdiag(248) = 'VV 247M ' |
gdiag(248) = 'VV 247M ' |
1271 |
gdiag(249) = 'WM L ' |
gdiag(249) = 'WM L ' |
1272 |
gdiag(250) = 'UZ M ' |
gdiag(250) = 'UZ 250M ' |
1273 |
gdiag(251) = 'UU 252M ' |
gdiag(251) = 'UU 252M ' |
1274 |
gdiag(252) = 'VV 251M ' |
gdiag(252) = 'VV 251M ' |
1275 |
gdiag(253) = 'WM M ' |
gdiag(253) = 'WM M ' |
1305 |
gdiag(283) = 'SM P M ' |
gdiag(283) = 'SM P M ' |
1306 |
gdiag(284) = 'SM P M ' |
gdiag(284) = 'SM P M ' |
1307 |
gdiag(285) = 'SM P M ' |
gdiag(285) = 'SM P M ' |
1308 |
|
gdiag(286) = 'SM P M ' |
1309 |
|
gdiag(287) = 'SM P M ' |
1310 |
|
gdiag(288) = 'SM P L ' |
1311 |
|
gdiag(289) = 'SM P L ' |
1312 |
|
gdiag(290) = 'SM P L ' |
1313 |
|
gdiag(291) = 'SM P M ' |
1314 |
|
gdiag(292) = 'SM P M ' |
1315 |
|
|
1316 |
c Diagnostic Levels |
c Diagnostic Levels |
1317 |
c ----------------- |
c ----------------- |
1600 |
KDIAG(283)= Nr |
KDIAG(283)= Nr |
1601 |
KDIAG(284)= Nr |
KDIAG(284)= Nr |
1602 |
KDIAG(285)= Nr |
KDIAG(285)= Nr |
1603 |
|
KDIAG(286)= Nr |
1604 |
|
KDIAG(287)= Nr |
1605 |
|
KDIAG(288)= 1 |
1606 |
|
KDIAG(289)= 1 |
1607 |
|
KDIAG(290)= 1 |
1608 |
|
KDIAG(291)= 1 |
1609 |
|
KDIAG(292)= 1 |
1610 |
|
|
1611 |
do n=1,ndiagt |
do n=1,ndiagt |
1612 |
idiag (n) = 0 |
idiag (n) = 0 |