Symbol Description Uses
diagUnits local string (16c): physical units of a diagnostic field 1919



File Line number Procedure Code
./pkg/exf/exf_diagnostics_init.F 100 EXF_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/exf/exf_diagnostics_init.F 107 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 111 EXF_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/exf/exf_diagnostics_init.F 118 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 122 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 125 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 129 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 132 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 136 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 139 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 143 EXF_DIAGNOSTICS_INIT
      diagUnits = 'degK            '
./pkg/exf/exf_diagnostics_init.F 146 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 150 EXF_DIAGNOSTICS_INIT
      diagUnits = 'kg/kg           '
./pkg/exf/exf_diagnostics_init.F 153 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 157 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 160 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 164 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 167 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 171 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 174 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 178 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 181 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 185 EXF_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/exf/exf_diagnostics_init.F 188 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 192 EXF_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/exf/exf_diagnostics_init.F 195 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 199 EXF_DIAGNOSTICS_INIT
      diagUnits = 'deg C           '
./pkg/exf/exf_diagnostics_init.F 202 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 206 EXF_DIAGNOSTICS_INIT
      diagUnits = 'psu.kg/m^2/s    '
./pkg/exf/exf_diagnostics_init.F 209 EXF_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 43 EXF_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/exf/exf_diagnostics_init.F 50 EXF_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/exf/exf_diagnostics_init.F 53 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 57 EXF_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/exf/exf_diagnostics_init.F 60 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 64 EXF_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/exf/exf_diagnostics_init.F 67 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 71 EXF_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/exf/exf_diagnostics_init.F 74 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 78 EXF_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/exf/exf_diagnostics_init.F 81 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 85 EXF_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/exf/exf_diagnostics_init.F 88 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/exf/exf_diagnostics_init.F 92 EXF_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/exf/exf_diagnostics_init.F 95 EXF_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1001 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 1005 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1009 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 1012 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1017 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 1020 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1024 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 1027 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 102 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 1031 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 1034 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1039 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1042 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1046 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1049 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1054 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1057 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 105 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1061 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm              '
./pkg/fizhi/fizhi_diagnostics_init.F 1064 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1068 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm water equiv  '
./pkg/fizhi/fizhi_diagnostics_init.F 1071 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1075 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 1078 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1082 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 1085 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1089 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 1092 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1097 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/sec          '
./pkg/fizhi/fizhi_diagnostics_init.F 109 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 1100 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1104 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/sec          '
./pkg/fizhi/fizhi_diagnostics_init.F 1107 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1112 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/sec          '
./pkg/fizhi/fizhi_diagnostics_init.F 1115 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1119 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/sec          '
./pkg/fizhi/fizhi_diagnostics_init.F 1122 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1127 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 112 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1130 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1134 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1137 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1142 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1145 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1149 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1152 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1157 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1160 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1165 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1168 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 116 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 1172 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'percent         '
./pkg/fizhi/fizhi_diagnostics_init.F 1175 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1179 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'percent         '
./pkg/fizhi/fizhi_diagnostics_init.F 1182 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1187 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2/K       '
./pkg/fizhi/fizhi_diagnostics_init.F 1190 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1195 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2/K       '
./pkg/fizhi/fizhi_diagnostics_init.F 1198 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 119 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1203 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2/K       '
./pkg/fizhi/fizhi_diagnostics_init.F 1206 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1210 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1213 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1217 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1220 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1224 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1227 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1231 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1234 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1238 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 123 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm2/sec          '
./pkg/fizhi/fizhi_diagnostics_init.F 1241 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1245 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa             '
./pkg/fizhi/fizhi_diagnostics_init.F 1249 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1254 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 1257 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1261 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa             '
./pkg/fizhi/fizhi_diagnostics_init.F 1264 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1268 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 126 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1271 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1276 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 1279 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1284 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1287 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1292 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1295 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1299 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1302 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1306 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'sec-1           '
./pkg/fizhi/fizhi_diagnostics_init.F 1309 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 130 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm2/sec          '
./pkg/fizhi/fizhi_diagnostics_init.F 1314 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1317 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1322 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1325 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1330 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1333 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1338 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 133 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1341 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1346 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1349 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1354 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1357 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1361 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mg/kg           '
./pkg/fizhi/fizhi_diagnostics_init.F 1364 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1368 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1371 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1375 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1379 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 137 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1383 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 1386 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1390 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1393 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1397 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1400 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1404 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1407 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1411 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1414 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1419 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 141 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1422 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1427 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1430 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1435 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/day        '
./pkg/fizhi/fizhi_diagnostics_init.F 1438 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1442 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 1445 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1450 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mg/cm2          '
./pkg/fizhi/fizhi_diagnostics_init.F 1453 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1458 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mg/cm2          '
./pkg/fizhi/fizhi_diagnostics_init.F 145 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1461 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1466 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mg/cm2          '
./pkg/fizhi/fizhi_diagnostics_init.F 1469 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1474 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mg/cm2          '
./pkg/fizhi/fizhi_diagnostics_init.F 1477 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1481 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mb m2/sec2      '
./pkg/fizhi/fizhi_diagnostics_init.F 1484 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1488 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm2/sec2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1491 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1495 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm2/sec2         '
./pkg/fizhi/fizhi_diagnostics_init.F 1498 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 149 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1503 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1506 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1511 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/day        '
./pkg/fizhi/fizhi_diagnostics_init.F 1514 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1519 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1522 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1527 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/day        '
./pkg/fizhi/fizhi_diagnostics_init.F 1530 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1535 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1538 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1543 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/day        '
./pkg/fizhi/fizhi_diagnostics_init.F 1546 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 154 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1551 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1554 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1559 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/day        '
./pkg/fizhi/fizhi_diagnostics_init.F 1562 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1567 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1571 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1576 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 157 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1580 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1585 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/fizhi/fizhi_diagnostics_init.F 1588 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1593 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1597 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1602 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 1606 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1611 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 1615 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1620 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 1624 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1629 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec/day       '
./pkg/fizhi/fizhi_diagnostics_init.F 162 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 1633 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1638 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec/day       '
./pkg/fizhi/fizhi_diagnostics_init.F 1642 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1646 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'Fraction        '
./pkg/fizhi/fizhi_diagnostics_init.F 1649 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1653 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mb  (hPa)       '
./pkg/fizhi/fizhi_diagnostics_init.F 1656 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 165 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1661 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1665 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1670 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1674 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1679 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1682 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1687 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 1690 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1695 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1699 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 169 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1704 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1708 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1713 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1716 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1721 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 1724 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1729 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 1733 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1738 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 173 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1742 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1747 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 1750 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 1755 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 1758 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 177 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 181 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 186 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 189 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 194 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 197 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 202 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 205 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 210 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 213 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 217 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 220 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 224 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 227 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 231 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 235 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 239 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 243 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 247 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 250 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 254 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 257 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 261 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 264 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 268 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 271 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 275 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 278 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 282 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 285 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 289 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 292 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 296 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 299 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 303 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 306 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 310 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 313 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 317 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 320 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 324 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 327 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 331 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 334 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 338 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 341 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 345 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 348 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 352 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 355 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 359 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 362 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 366 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 369 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 374 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 377 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 381 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 384 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 388 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 391 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 395 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 398 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 403 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 406 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 410 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 413 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 418 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 422 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 426 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 429 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 433 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 436 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 440 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 443 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 447 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 44 FIZHI_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/fizhi/fizhi_diagnostics_init.F 450 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 454 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/fizhi/fizhi_diagnostics_init.F 458 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 462 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/fizhi/fizhi_diagnostics_init.F 466 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 470 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 473 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 478 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 481 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 485 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 488 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 492 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 496 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 500 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 504 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 508 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 511 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 515 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 518 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 51 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 522 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '(e-4 sec-1)     '
./pkg/fizhi/fizhi_diagnostics_init.F 525 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 530 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 533 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 538 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 541 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 545 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 548 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 54 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 552 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/fizhi/fizhi_diagnostics_init.F 555 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 559 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 562 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 566 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa             '
./pkg/fizhi/fizhi_diagnostics_init.F 569 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 573 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 576 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 580 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 583 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 587 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 58 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 590 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 594 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'g/m2/sec        '
./pkg/fizhi/fizhi_diagnostics_init.F 597 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 601 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 605 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 609 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 613 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 617 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 61 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 620 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 624 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 627 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 632 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 635 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 639 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa             '
./pkg/fizhi/fizhi_diagnostics_init.F 642 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 646 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mb              '
./pkg/fizhi/fizhi_diagnostics_init.F 649 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 653 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '(m/sec)2        '
./pkg/fizhi/fizhi_diagnostics_init.F 656 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 65 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 661 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 664 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 668 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 671 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 676 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 680 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 685 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 689 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 694 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K/day           '
./pkg/fizhi/fizhi_diagnostics_init.F 697 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 69 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 702 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 705 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 710 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 714 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 719 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 723 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 728 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 732 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 737 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s/day         '
./pkg/fizhi/fizhi_diagnostics_init.F 73 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 741 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 745 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 749 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 753 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 757 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 761 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 765 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 770 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'N/m2            '
./pkg/fizhi/fizhi_diagnostics_init.F 774 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 779 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mg/kg           '
./pkg/fizhi/fizhi_diagnostics_init.F 77 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 782 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 786 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s gram/kg     '
./pkg/fizhi/fizhi_diagnostics_init.F 790 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 794 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s gram/kg     '
./pkg/fizhi/fizhi_diagnostics_init.F 798 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 802 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s K           '
./pkg/fizhi/fizhi_diagnostics_init.F 806 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 810 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/s K           '
./pkg/fizhi/fizhi_diagnostics_init.F 814 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 818 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 81 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 821 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 825 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/cm2        '
./pkg/fizhi/fizhi_diagnostics_init.F 828 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 832 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 836 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 840 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 844 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 848 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 84 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 851 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 855 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 858 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 862 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 866 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 870 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'm/sec           '
./pkg/fizhi/fizhi_diagnostics_init.F 874 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 878 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/fizhi/fizhi_diagnostics_init.F 881 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 885 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg         '
./pkg/fizhi/fizhi_diagnostics_init.F 888 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 88 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 892 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'g/m2/sec        '
./pkg/fizhi/fizhi_diagnostics_init.F 895 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 899 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'gram/kg/day     '
./pkg/fizhi/fizhi_diagnostics_init.F 902 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 906 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 909 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 913 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'mm/day          '
./pkg/fizhi/fizhi_diagnostics_init.F 916 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 91 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 920 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 923 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 927 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 930 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 934 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 938 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 942 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 945 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 949 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 953 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 957 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 95 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'watt/m2         '
./pkg/fizhi/fizhi_diagnostics_init.F 960 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 964 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'non-dimensional '
./pkg/fizhi/fizhi_diagnostics_init.F 968 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 972 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 975 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 979 FIZHI_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/fizhi/fizhi_diagnostics_init.F 982 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 986 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'hPa             '
./pkg/fizhi/fizhi_diagnostics_init.F 98 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 990 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/fizhi/fizhi_diagnostics_init.F 994 FIZHI_DIAGNOSTICS_INIT
      diagUnits = 'count           '
./pkg/fizhi/fizhi_diagnostics_init.F 997 FIZHI_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/frazil/frazil_diagnostics_init.F 38 FRAZIL_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/frazil/frazil_diagnostics_init.F 43 FRAZIL_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/frazil/frazil_diagnostics_init.F 46 FRAZIL_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gchem/gchem_diagnostics_init.F 41 GCHEM_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/gchem/gchem_diagnostics_init.F 71 GCHEM_DIAGNOSTICS_INIT
       diagUnits = trcUnits//'         '
./pkg/gchem/gchem_diagnostics_init.F 74 GCHEM_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 100 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 106 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 113 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 116 GAD_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trUnits, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 123 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 129 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 134 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 141 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 147 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 152 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 158 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 164 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 170 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 172 GAD_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( '('//trUnits//')^2', myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 177 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 194 GAD_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trUnits//flxUnits, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 202 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 208 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 214 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 221 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 227 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 233 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 240 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 246 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 250 GAD_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trUnits, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 257 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 263 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 268 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 275 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 281 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 286 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 292 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 298 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 304 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 306 GAD_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( '('//trUnits//')^2', myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 311 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 45 GAD_DIAGNOSTICS_INIT
      CHARACTER*16   diagUnits
./pkg/generic_advdiff/gad_diagnostics_init.F 67 GAD_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trUnits//flxUnits, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 75 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 81 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 87 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/generic_advdiff/gad_diagnostics_init.F 94 GAD_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 102 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^3/s^3         '
./pkg/ggl90/ggl90_diagnostics_init.F 105 GGL90_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 110 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^2         '
./pkg/ggl90/ggl90_diagnostics_init.F 113 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 117 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/ggl90/ggl90_diagnostics_init.F 120 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 124 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/ggl90/ggl90_diagnostics_init.F 127 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 131 GGL90_DIAGNOSTICS_INIT
        diagUnits = 's/m^2           '
./pkg/ggl90/ggl90_diagnostics_init.F 134 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 138 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/ggl90/ggl90_diagnostics_init.F 141 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 145 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^3         '
./pkg/ggl90/ggl90_diagnostics_init.F 148 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 152 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^3/s^3         '
./pkg/ggl90/ggl90_diagnostics_init.F 155 GGL90_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 159 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^3/s^3         '
./pkg/ggl90/ggl90_diagnostics_init.F 162 GGL90_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 166 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^3/s^3         '
./pkg/ggl90/ggl90_diagnostics_init.F 169 GGL90_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 45 GGL90_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/ggl90/ggl90_diagnostics_init.F 52 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^2         '
./pkg/ggl90/ggl90_diagnostics_init.F 55 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 59 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/ggl90/ggl90_diagnostics_init.F 62 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 66 GGL90_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/ggl90/ggl90_diagnostics_init.F 69 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 73 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/ggl90/ggl90_diagnostics_init.F 76 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 80 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/ggl90/ggl90_diagnostics_init.F 83 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 87 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/ggl90/ggl90_diagnostics_init.F 90 GGL90_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ggl90/ggl90_diagnostics_init.F 94 GGL90_DIAGNOSTICS_INIT
        diagUnits = 'm^3/s^3         '
./pkg/ggl90/ggl90_diagnostics_init.F 97 GGL90_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 104 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 108 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 113 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 117 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 121 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 125 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 129 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 133 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 137 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 141 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 145 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 149 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 153 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 157 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 161 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 164 GMREDI_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 168 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 172 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 176 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 180 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 184 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'degC.m^3/s      '
./pkg/gmredi/gmredi_diagnostics_init.F 188 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 192 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'degC.m^3/s      '
./pkg/gmredi/gmredi_diagnostics_init.F 196 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 200 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'degC.m^3/s      '
./pkg/gmredi/gmredi_diagnostics_init.F 203 GMREDI_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 207 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'degC.m^3/s      '
./pkg/gmredi/gmredi_diagnostics_init.F 211 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 215 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'degC.m^3/s      '
./pkg/gmredi/gmredi_diagnostics_init.F 219 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 224 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'N/m^2           '
./pkg/gmredi/gmredi_diagnostics_init.F 228 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 232 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'N/m^2           '
./pkg/gmredi/gmredi_diagnostics_init.F 236 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 242 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 246 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 250 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 254 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 260 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm**2/s          '
./pkg/gmredi/gmredi_diagnostics_init.F 264 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 268 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm**2/s          '
./pkg/gmredi/gmredi_diagnostics_init.F 272 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 276 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm**2/s          '
./pkg/gmredi/gmredi_diagnostics_init.F 280 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 285 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/m**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 289 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 293 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/m**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 297 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 301 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/m**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 305 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 310 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'dimensionless   '
./pkg/gmredi/gmredi_diagnostics_init.F 314 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 318 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 322 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 326 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 330 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 334 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/gmredi/gmredi_diagnostics_init.F 338 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 342 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s         '
./pkg/gmredi/gmredi_diagnostics_init.F 346 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 350 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s         '
./pkg/gmredi/gmredi_diagnostics_init.F 354 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 358 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/gmredi/gmredi_diagnostics_init.F 362 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 367 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/gmredi/gmredi_diagnostics_init.F 371 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 375 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/gmredi/gmredi_diagnostics_init.F 379 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 383 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/gmredi/gmredi_diagnostics_init.F 387 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 391 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'none            '
./pkg/gmredi/gmredi_diagnostics_init.F 395 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 399 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/(m*s)         '
./pkg/gmredi/gmredi_diagnostics_init.F 403 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 407 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/(m*s)         '
./pkg/gmredi/gmredi_diagnostics_init.F 411 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 415 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s*2           '
./pkg/gmredi/gmredi_diagnostics_init.F 419 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 423 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 427 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 431 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 435 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 439 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 443 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 447 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'none            '
./pkg/gmredi/gmredi_diagnostics_init.F 451 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 455 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'none            '
./pkg/gmredi/gmredi_diagnostics_init.F 459 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 463 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/(m*s)           '
./pkg/gmredi/gmredi_diagnostics_init.F 467 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 471 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/(m*s)         '
./pkg/gmredi/gmredi_diagnostics_init.F 475 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 479 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 47 GMREDI_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/gmredi/gmredi_diagnostics_init.F 483 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 487 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 491 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 495 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 499 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 503 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/gmredi/gmredi_diagnostics_init.F 507 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 511 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/s**4          '
./pkg/gmredi/gmredi_diagnostics_init.F 515 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 519 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/s**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 523 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 527 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/s**2          '
./pkg/gmredi/gmredi_diagnostics_init.F 531 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 535 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm/m             '
./pkg/gmredi/gmredi_diagnostics_init.F 539 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 543 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'none            '
./pkg/gmredi/gmredi_diagnostics_init.F 547 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 552 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm**2/s          '
./pkg/gmredi/gmredi_diagnostics_init.F 556 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 57 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 60 GMREDI_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 64 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/gmredi/gmredi_diagnostics_init.F 67 GMREDI_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 71 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/gmredi/gmredi_diagnostics_init.F 74 GMREDI_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 79 GMREDI_DIAGNOSTICS_INIT
        diagUnits = '1/m             '
./pkg/gmredi/gmredi_diagnostics_init.F 82 GMREDI_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 87 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/gmredi/gmredi_diagnostics_init.F 90 GMREDI_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/gmredi/gmredi_diagnostics_init.F 95 GMREDI_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/gmredi/gmredi_diagnostics_init.F 99 GMREDI_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/gridalt/gridalt_diagnostics_init.F 42 GRIDALT_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/gridalt/gridalt_diagnostics_init.F 49 GRIDALT_DIAGNOSTICS_INIT
      diagUnits = 'Pascal          '
./pkg/gridalt/gridalt_diagnostics_init.F 52 GRIDALT_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/icefront/icefront_diagnostics_init.F 39 ICEFRONT_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/icefront/icefront_diagnostics_init.F 46 ICEFRONT_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/icefront/icefront_diagnostics_init.F 49 ICEFRONT_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/icefront/icefront_diagnostics_init.F 53 ICEFRONT_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/icefront/icefront_diagnostics_init.F 56 ICEFRONT_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kl10/kl10_diagnostics_init.F 41 KL10_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/kl10/kl10_diagnostics_init.F 48 KL10_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/kl10/kl10_diagnostics_init.F 51 KL10_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kl10/kl10_diagnostics_init.F 55 KL10_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/kl10/kl10_diagnostics_init.F 58 KL10_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kl10/kl10_diagnostics_init.F 62 KL10_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^3           '
./pkg/kl10/kl10_diagnostics_init.F 65 KL10_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 100 KPP_DIAGNOSTICS_INIT
        diagUnits = '                '
./pkg/kpp/kpp_diagnostics_init.F 103 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 107 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/kpp/kpp_diagnostics_init.F 110 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 114 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^3         '
./pkg/kpp/kpp_diagnostics_init.F 117 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 121 KPP_DIAGNOSTICS_INIT
        diagUnits = 'non-dimensional '
./pkg/kpp/kpp_diagnostics_init.F 124 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 128 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^3         '
./pkg/kpp/kpp_diagnostics_init.F 131 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 135 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^3         '
./pkg/kpp/kpp_diagnostics_init.F 138 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 142 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/kpp/kpp_diagnostics_init.F 145 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 150 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/kpp/kpp_diagnostics_init.F 153 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 157 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/kpp/kpp_diagnostics_init.F 160 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 169 KPP_DIAGNOSTICS_INIT
        diagUnits = 'degC.m^3/s      '
./pkg/kpp/kpp_diagnostics_init.F 172 KPP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 179 KPP_DIAGNOSTICS_INIT
        diagUnits = 'psu.m^3/s       '
./pkg/kpp/kpp_diagnostics_init.F 182 KPP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 187 KPP_DIAGNOSTICS_INIT
        diagUnits = '                '
./pkg/kpp/kpp_diagnostics_init.F 190 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 194 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^3         '
./pkg/kpp/kpp_diagnostics_init.F 201 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 52 KPP_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/kpp/kpp_diagnostics_init.F 64 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/kpp/kpp_diagnostics_init.F 67 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 71 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/kpp/kpp_diagnostics_init.F 74 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 78 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/kpp/kpp_diagnostics_init.F 81 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 86 KPP_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/kpp/kpp_diagnostics_init.F 89 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/kpp/kpp_diagnostics_init.F 93 KPP_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/kpp/kpp_diagnostics_init.F 96 KPP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 105 LAND_DIAGNOSTICS_INIT
        diagUnits = 'kg/m2/s         '
./pkg/land/land_diagnostics_init.F 108 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 112 LAND_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/land/land_diagnostics_init.F 115 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 119 LAND_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/land/land_diagnostics_init.F 122 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 126 LAND_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/land/land_diagnostics_init.F 129 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 134 LAND_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/land/land_diagnostics_init.F 137 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 45 LAND_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/land/land_diagnostics_init.F 55 LAND_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/land/land_diagnostics_init.F 58 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 62 LAND_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/land/land_diagnostics_init.F 65 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 69 LAND_DIAGNOSTICS_INIT
        diagUnits = 'J/m3            '
./pkg/land/land_diagnostics_init.F 72 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 77 LAND_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/land/land_diagnostics_init.F 80 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 89 LAND_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/land/land_diagnostics_init.F 92 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/land/land_diagnostics_init.F 96 LAND_DIAGNOSTICS_INIT
        diagUnits = 's               '
./pkg/land/land_diagnostics_init.F 99 LAND_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/layers/layers_diagnostics_init.F 103 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 111 LAYERS_DIAGNOSTICS_INIT
        diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid )
./pkg/layers/layers_diagnostics_init.F 115 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 120 LAYERS_DIAGNOSTICS_INIT
        diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid )
./pkg/layers/layers_diagnostics_init.F 124 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 130 LAYERS_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/layers/layers_diagnostics_init.F 134 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 139 LAYERS_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/layers/layers_diagnostics_init.F 143 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 149 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/layers/layers_diagnostics_init.F 153 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 158 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/layers/layers_diagnostics_init.F 162 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 173 LAYERS_DIAGNOSTICS_INIT
        diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid )
./pkg/layers/layers_diagnostics_init.F 177 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 182 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm deg./s        '
./pkg/layers/layers_diagnostics_init.F 186 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 191 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm deg./s        '
./pkg/layers/layers_diagnostics_init.F 195 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 202 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm deg./s        '
./pkg/layers/layers_diagnostics_init.F 206 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 211 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm deg./s        '
./pkg/layers/layers_diagnostics_init.F 215 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 220 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm deg./s        '
./pkg/layers/layers_diagnostics_init.F 224 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 229 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm deg./s        '
./pkg/layers/layers_diagnostics_init.F 233 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 238 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm PSU/s        '
./pkg/layers/layers_diagnostics_init.F 242 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 247 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm PSU/s        '
./pkg/layers/layers_diagnostics_init.F 251 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 256 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm PSU/s        '
./pkg/layers/layers_diagnostics_init.F 260 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 265 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm PSU/s        '
./pkg/layers/layers_diagnostics_init.F 269 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 274 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm PSU/s        '
./pkg/layers/layers_diagnostics_init.F 278 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 283 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'm PSU/s        '
./pkg/layers/layers_diagnostics_init.F 287 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 293 LAYERS_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/layers/layers_diagnostics_init.F 297 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 45 LAYERS_DIAGNOSTICS_INIT
      CHARACTER*16   diagUnits
./pkg/layers/layers_diagnostics_init.F 78 LAYERS_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^3          '
./pkg/layers/layers_diagnostics_init.F 81 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/layers/layers_diagnostics_init.F 90 LAYERS_DIAGNOSTICS_INIT
        diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m/s', myThid )
./pkg/layers/layers_diagnostics_init.F 94 LAYERS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/layers/layers_diagnostics_init.F 99 LAYERS_DIAGNOSTICS_INIT
        diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m/s', myThid )
./pkg/longstep/longstep_diagnostics_init.F 102 LONGSTEP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 108 LONGSTEP_DIAGNOSTICS_INIT
       diagUnits = 'm^2/s           '
./pkg/longstep/longstep_diagnostics_init.F 112 LONGSTEP_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/longstep/longstep_diagnostics_init.F 116 LONGSTEP_DIAGNOSTICS_INIT
       diagUnits = 'm^2/s           '
./pkg/longstep/longstep_diagnostics_init.F 120 LONGSTEP_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/longstep/longstep_diagnostics_init.F 124 LONGSTEP_DIAGNOSTICS_INIT
       diagUnits = 'm^2/s           '
./pkg/longstep/longstep_diagnostics_init.F 127 LONGSTEP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 135 LONGSTEP_DIAGNOSTICS_INIT
       diagUnits = 'm^2/s           '
./pkg/longstep/longstep_diagnostics_init.F 138 LONGSTEP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 142 LONGSTEP_DIAGNOSTICS_INIT
       diagUnits = 's/m^2           '
./pkg/longstep/longstep_diagnostics_init.F 145 LONGSTEP_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 37 LONGSTEP_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/longstep/longstep_diagnostics_init.F 44 LONGSTEP_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/longstep/longstep_diagnostics_init.F 47 LONGSTEP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 51 LONGSTEP_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/longstep/longstep_diagnostics_init.F 55 LONGSTEP_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/longstep/longstep_diagnostics_init.F 59 LONGSTEP_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/longstep/longstep_diagnostics_init.F 63 LONGSTEP_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/longstep/longstep_diagnostics_init.F 67 LONGSTEP_DIAGNOSTICS_INIT
      diagUnits = 'degC            '
./pkg/longstep/longstep_diagnostics_init.F 70 LONGSTEP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 74 LONGSTEP_DIAGNOSTICS_INIT
      diagUnits = 'psu             '
./pkg/longstep/longstep_diagnostics_init.F 77 LONGSTEP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 82 LONGSTEP_DIAGNOSTICS_INIT
        diagUnits = 'fraction        '
./pkg/longstep/longstep_diagnostics_init.F 85 LONGSTEP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 91 LONGSTEP_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/longstep/longstep_diagnostics_init.F 94 LONGSTEP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/longstep/longstep_diagnostics_init.F 99 LONGSTEP_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/mom_common/mom_diagnostics_init.F 101 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 105 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 108 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 112 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 115 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 119 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 122 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 126 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 129 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 133 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 136 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 140 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 143 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 147 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 150 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 154 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 157 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 161 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 164 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 168 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 171 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 175 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 178 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 182 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 185 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 189 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 192 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 196 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 199 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 203 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 206 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 210 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 213 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 217 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 220 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 224 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 227 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 234 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s^2         '
./pkg/mom_common/mom_diagnostics_init.F 236 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 242 MOM_DIAGNOSTICS_INIT
      diagUnits = 's^-1            '
./pkg/mom_common/mom_diagnostics_init.F 244 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 249 MOM_DIAGNOSTICS_INIT
      diagUnits = 's^-1            '
./pkg/mom_common/mom_diagnostics_init.F 251 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 256 MOM_DIAGNOSTICS_INIT
      diagUnits = 's^-1            '
./pkg/mom_common/mom_diagnostics_init.F 258 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 263 MOM_DIAGNOSTICS_INIT
      diagUnits = 's^-1            '
./pkg/mom_common/mom_diagnostics_init.F 265 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 269 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm/s^2           '
./pkg/mom_common/mom_diagnostics_init.F 276 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 282 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 288 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 294 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 301 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 307 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 314 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 320 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 327 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 333 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 340 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 346 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 353 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 359 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 367 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 373 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 381 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 388 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 395 MOM_DIAGNOSTICS_INIT
        diagUnits = 'Pa/s^2          '
./pkg/mom_common/mom_diagnostics_init.F 397 MOM_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/mom_common/mom_diagnostics_init.F 39 MOM_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/mom_common/mom_diagnostics_init.F 403 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 409 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 415 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 420 MOM_DIAGNOSTICS_INIT
        diagUnits = 'Pa.m^3/s^2      '
./pkg/mom_common/mom_diagnostics_init.F 422 MOM_DIAGNOSTICS_INIT
        diagUnits = 'm^4/s^2         '
./pkg/mom_common/mom_diagnostics_init.F 432 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 438 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 444 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 460 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 466 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 472 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 488 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 494 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 49 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 500 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 507 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 516 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 522 MOM_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mom_common/mom_diagnostics_init.F 528 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 52 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 535 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 56 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 59 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 63 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 66 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 70 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 73 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 77 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 80 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 84 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/mom_common/mom_diagnostics_init.F 87 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 91 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/mom_common/mom_diagnostics_init.F 94 MOM_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mom_common/mom_diagnostics_init.F 98 MOM_DIAGNOSTICS_INIT
      diagUnits = 'm^4/s           '
./pkg/my82/my82_diagnostics_init.F 42 MY82_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/my82/my82_diagnostics_init.F 49 MY82_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/my82/my82_diagnostics_init.F 52 MY82_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/my82/my82_diagnostics_init.F 56 MY82_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/my82/my82_diagnostics_init.F 59 MY82_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/my82/my82_diagnostics_init.F 63 MY82_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/my82/my82_diagnostics_init.F 66 MY82_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 103 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'psu/s           '
./pkg/mypackage/mypackage_diagnostics_init.F 106 MYPACKAGE_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 110 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/mypackage/mypackage_diagnostics_init.F 115 MYPACKAGE_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 119 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/mypackage/mypackage_diagnostics_init.F 124 MYPACKAGE_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 129 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/mypackage/mypackage_diagnostics_init.F 132 MYPACKAGE_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 41 MYPACKAGE_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/mypackage/mypackage_diagnostics_init.F 50 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/mypackage/mypackage_diagnostics_init.F 53 MYPACKAGE_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 57 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/mypackage/mypackage_diagnostics_init.F 60 MYPACKAGE_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 64 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/mypackage/mypackage_diagnostics_init.F 69 MYPACKAGE_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 73 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/mypackage/mypackage_diagnostics_init.F 78 MYPACKAGE_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 82 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/mypackage/mypackage_diagnostics_init.F 85 MYPACKAGE_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 89 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/mypackage/mypackage_diagnostics_init.F 92 MYPACKAGE_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/mypackage/mypackage_diagnostics_init.F 96 MYPACKAGE_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/mypackage/mypackage_diagnostics_init.F 99 MYPACKAGE_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 100 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 104 CPL_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2          '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 107 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 112 CPL_DIAGNOSTICS_INIT
        diagUnits = 'g/m^2/s         '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 115 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 121 CPL_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 124 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 128 CPL_DIAGNOSTICS_INIT
        diagUnits = 'ppm             '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 131 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 135 CPL_DIAGNOSTICS_INIT
        diagUnits = 'm/s             '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 138 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 144 CPL_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 147 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 154 CPL_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 157 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 162 CPL_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 165 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 169 CPL_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 172 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 176 CPL_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 179 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 42 CPL_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 54 CPL_DIAGNOSTICS_INIT
        diagUnits = 'Pa              '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 57 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 61 CPL_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 64 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 68 CPL_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 71 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 75 CPL_DIAGNOSTICS_INIT
        diagUnits = 'N/m^2           '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 79 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 83 CPL_DIAGNOSTICS_INIT
        diagUnits = 'N/m^2           '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 86 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 90 CPL_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 93 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ocn_compon_interf/cpl_diagnostics_init.F 97 CPL_DIAGNOSTICS_INIT
        diagUnits = 'g/m^2/s         '
./pkg/pp81/pp81_diagnostics_init.F 41 PP81_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/pp81/pp81_diagnostics_init.F 48 PP81_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/pp81/pp81_diagnostics_init.F 51 PP81_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/pp81/pp81_diagnostics_init.F 55 PP81_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s           '
./pkg/pp81/pp81_diagnostics_init.F 58 PP81_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 102 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 104 PTRACERS_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trcUnits//'.m/s', myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 111 PTRACERS_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 119 PTRACERS_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 121 PTRACERS_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trcUnits//wUnits, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 127 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 132 PTRACERS_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trcUnits//'/s', myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 138 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 145 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 150 PTRACERS_DIAGNOSTICS_INIT
       diagUnits = DIAGS_MK_UNITS( trcUnits//flxUnits, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 158 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 165 PTRACERS_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 172 PTRACERS_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 180 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 187 PTRACERS_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 194 PTRACERS_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 201 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 211 PTRACERS_DIAGNOSTICS_INIT
        diagUnits = DIAGS_MK_UNITS( trcUnits//flxUnits, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 213 PTRACERS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 221 PTRACERS_DIAGNOSTICS_INIT
        diagUnits = DIAGS_MK_UNITS( trcUnits//'/s', myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 223 PTRACERS_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 231 PTRACERS_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/ptracers/ptracers_diagnostics_init.F 234 PTRACERS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/ptracers/ptracers_diagnostics_init.F 47 PTRACERS_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/ptracers/ptracers_diagnostics_init.F 99 PTRACERS_DIAGNOSTICS_INIT
       WRITE(diagUnits,'(A)') trcUnits
./pkg/salt_plume/salt_plume_diagnostics_init.F 102 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 107 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'g/m^2/s         '
./pkg/salt_plume/salt_plume_diagnostics_init.F 110 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 115 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'unitless        '
./pkg/salt_plume/salt_plume_diagnostics_init.F 118 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 123 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'unitless        '
./pkg/salt_plume/salt_plume_diagnostics_init.F 126 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 131 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/salt_plume/salt_plume_diagnostics_init.F 134 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 139 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/salt_plume/salt_plume_diagnostics_init.F 142 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 37 SALT_PLUME_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/salt_plume/salt_plume_diagnostics_init.F 42 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = '                '
./pkg/salt_plume/salt_plume_diagnostics_init.F 45 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 50 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'g/m^2/s         '
./pkg/salt_plume/salt_plume_diagnostics_init.F 53 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 60 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'g/m^2/s         '
./pkg/salt_plume/salt_plume_diagnostics_init.F 63 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 67 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/salt_plume/salt_plume_diagnostics_init.F 70 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 76 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/salt_plume/salt_plume_diagnostics_init.F 79 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 83 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = '                '
./pkg/salt_plume/salt_plume_diagnostics_init.F 86 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 91 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/salt_plume/salt_plume_diagnostics_init.F 94 SALT_PLUME_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/salt_plume/salt_plume_diagnostics_init.F 99 SALT_PLUME_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 101 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/seaice/seaice_diagnostics_init.F 104 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 109 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/seaice/seaice_diagnostics_init.F 112 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 117 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/seaice/seaice_diagnostics_init.F 120 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 124 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/seaice/seaice_diagnostics_init.F 127 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 131 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'g/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 134 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 172 SEAICE_DIAGNOSTICS_INIT
       diagUnits = locUnitTr//'        '
./pkg/seaice/seaice_diagnostics_init.F 175 SEAICE_DIAGNOSTICS_INIT
     I      diagCode, diagUnits, diagTitle, numMateTr, myThid )
./pkg/seaice/seaice_diagnostics_init.F 180 SEAICE_DIAGNOSTICS_INIT
       diagUnits = locUnitTr//'        '
./pkg/seaice/seaice_diagnostics_init.F 183 SEAICE_DIAGNOSTICS_INIT
     I      diagCode, diagUnits, diagTitle, numMateTrPreTh, myThid )
./pkg/seaice/seaice_diagnostics_init.F 190 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/seaice/seaice_diagnostics_init.F 193 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numArea, myThid )
./pkg/seaice/seaice_diagnostics_init.F 197 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 205 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 209 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 217 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 247 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 251 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 255 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 259 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 263 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 267 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 271 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 275 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 299 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 302 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 308 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 311 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 315 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 318 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 322 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 325 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 330 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 333 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 338 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 341 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 345 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 348 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 352 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 355 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 362 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/seaice/seaice_diagnostics_init.F 365 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 369 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/seaice/seaice_diagnostics_init.F 372 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 376 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/seaice/seaice_diagnostics_init.F 379 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 383 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/seaice/seaice_diagnostics_init.F 386 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 390 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/seaice/seaice_diagnostics_init.F 393 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 397 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/seaice/seaice_diagnostics_init.F 400 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 404 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 407 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 411 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/seaice/seaice_diagnostics_init.F 414 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 420 SEAICE_DIAGNOSTICS_INIT
       WRITE(diagUnits,'(A)') 'kg/m^2/s'
./pkg/seaice/seaice_diagnostics_init.F 424 SEAICE_DIAGNOSTICS_INIT
         WRITE(diagUnits,'(2A)') SItrUnit(iTr)(1:ilnb),'.kg/m^2/s'
./pkg/seaice/seaice_diagnostics_init.F 432 SEAICE_DIAGNOSTICS_INIT
     I      diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 442 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 445 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 449 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 452 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 456 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 459 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 463 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 466 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 470 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 473 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 477 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 480 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 484 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 487 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 491 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 494 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 498 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/seaice/seaice_diagnostics_init.F 501 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 506 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/seaice/seaice_diagnostics_init.F 509 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 516 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2/s       '
./pkg/seaice/seaice_diagnostics_init.F 519 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 523 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2/s       '
./pkg/seaice/seaice_diagnostics_init.F 526 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 530 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2/s       '
./pkg/seaice/seaice_diagnostics_init.F 533 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 537 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2/s       '
./pkg/seaice/seaice_diagnostics_init.F 540 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 547 SEAICE_DIAGNOSTICS_INIT
      WRITE(diagUnits,'(2A)') 'm',flxUnits
./pkg/seaice/seaice_diagnostics_init.F 556 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 55 SEAICE_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/seaice/seaice_diagnostics_init.F 563 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 571 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 578 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 582 SEAICE_DIAGNOSTICS_INIT
      WRITE(diagUnits,'(2A)') 'm^2/m^2',flxUnits
./pkg/seaice/seaice_diagnostics_init.F 591 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 598 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 606 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 613 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 617 SEAICE_DIAGNOSTICS_INIT
      WRITE(diagUnits,'(2A)') 'm',flxUnits
./pkg/seaice/seaice_diagnostics_init.F 626 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 633 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 641 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 648 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 652 SEAICE_DIAGNOSTICS_INIT
      WRITE(diagUnits,'(2A)') 'psu',flxUnits
./pkg/seaice/seaice_diagnostics_init.F 661 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 668 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 676 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 683 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 688 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/seaice/seaice_diagnostics_init.F 692 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 696 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/seaice/seaice_diagnostics_init.F 700 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/seaice/seaice_diagnostics_init.F 706 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s^2         '
./pkg/seaice/seaice_diagnostics_init.F 709 SEAICE_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 713 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/seaice/seaice_diagnostics_init.F 716 SEAICE_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 720 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s           '
./pkg/seaice/seaice_diagnostics_init.F 723 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 727 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'no units        '
./pkg/seaice/seaice_diagnostics_init.F 730 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 734 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'no units        '
./pkg/seaice/seaice_diagnostics_init.F 737 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 741 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 's^{-1}          '
./pkg/seaice/seaice_diagnostics_init.F 744 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 748 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 's^{-1}          '
./pkg/seaice/seaice_diagnostics_init.F 751 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 755 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/s^2         '
./pkg/seaice/seaice_diagnostics_init.F 758 SEAICE_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 765 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/seaice/seaice_diagnostics_init.F 768 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 774 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2         '
./pkg/seaice/seaice_diagnostics_init.F 777 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 782 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm               '
./pkg/seaice/seaice_diagnostics_init.F 785 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 78 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2         '
./pkg/seaice/seaice_diagnostics_init.F 81 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 86 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2         '
./pkg/seaice/seaice_diagnostics_init.F 89 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/seaice/seaice_diagnostics_init.F 93 SEAICE_DIAGNOSTICS_INIT
      diagUnits = 'm^2/m^2         '
./pkg/seaice/seaice_diagnostics_init.F 96 SEAICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shap_filt/shap_filt_diagnostics_init.F 50 SHAP_FILT_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/shap_filt/shap_filt_diagnostics_init.F 62 SHAP_FILT_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/shap_filt/shap_filt_diagnostics_init.F 65 SHAP_FILT_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shap_filt/shap_filt_diagnostics_init.F 71 SHAP_FILT_DIAGNOSTICS_INIT
        diagUnits =  DIAGS_MK_UNITS( trUnits//'/s', myThid )
./pkg/shap_filt/shap_filt_diagnostics_init.F 74 SHAP_FILT_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shap_filt/shap_filt_diagnostics_init.F 78 SHAP_FILT_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/shap_filt/shap_filt_diagnostics_init.F 82 SHAP_FILT_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/shap_filt/shap_filt_diagnostics_init.F 86 SHAP_FILT_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/shap_filt/shap_filt_diagnostics_init.F 90 SHAP_FILT_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/shap_filt/shap_filt_diagnostics_init.F 95 SHAP_FILT_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^3         '
./pkg/shap_filt/shap_filt_diagnostics_init.F 98 SHAP_FILT_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 204 SHELFICE_INIT_FIXED
       diagUnits = 'kg/m^2/s        '
./pkg/shelfice/shelfice_init_fixed.F 207 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 211 SHELFICE_INIT_FIXED
       diagUnits = 'W/m^2           '
./pkg/shelfice/shelfice_init_fixed.F 214 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 218 SHELFICE_INIT_FIXED
       diagUnits = 'm/s^2           '
./pkg/shelfice/shelfice_init_fixed.F 222 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/shelfice/shelfice_init_fixed.F 226 SHELFICE_INIT_FIXED
       diagUnits = 'm/s^2           '
./pkg/shelfice/shelfice_init_fixed.F 230 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/shelfice/shelfice_init_fixed.F 234 SHELFICE_INIT_FIXED
       diagUnits = 'W/m^2           '
./pkg/shelfice/shelfice_init_fixed.F 237 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 241 SHELFICE_INIT_FIXED
       diagUnits = 'g/m^2/s         '
./pkg/shelfice/shelfice_init_fixed.F 244 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 248 SHELFICE_INIT_FIXED
       diagUnits = 'm/s             '
./pkg/shelfice/shelfice_init_fixed.F 251 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 255 SHELFICE_INIT_FIXED
       diagUnits = 'm/s             '
./pkg/shelfice/shelfice_init_fixed.F 258 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 262 SHELFICE_INIT_FIXED
       diagUnits = 'm/s             '
./pkg/shelfice/shelfice_init_fixed.F 265 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 269 SHELFICE_INIT_FIXED
       diagUnits = 'kg/m^2          '
./pkg/shelfice/shelfice_init_fixed.F 272 SHELFICE_INIT_FIXED
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/shelfice/shelfice_init_fixed.F 45 SHELFICE_INIT_FIXED
      CHARACTER*16  diagUnits
./pkg/streamice/streamice_init_diagnostics.F 100 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 103 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 107 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 110 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 114 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 117 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 121 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 124 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 128 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 131 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 135 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 138 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 39 STREAMICE_INIT_DIAGNOSTICS
      CHARACTER*16  diagUnits
./pkg/streamice/streamice_init_diagnostics.F 44 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'm/a        '
./pkg/streamice/streamice_init_diagnostics.F 47 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 51 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'm/a        '
./pkg/streamice/streamice_init_diagnostics.F 54 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 58 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'm          '
./pkg/streamice/streamice_init_diagnostics.F 61 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 65 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'm^2        '
./pkg/streamice/streamice_init_diagnostics.F 68 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 72 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 75 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 79 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 82 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 86 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 89 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/streamice/streamice_init_diagnostics.F 93 STREAMICE_INIT_DIAGNOSTICS
      diagUnits = 'none       '
./pkg/streamice/streamice_init_diagnostics.F 96 STREAMICE_INIT_DIAGNOSTICS
     I      diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 101 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/thsice/thsice_diagnostics_init.F 104 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/thsice/thsice_diagnostics_init.F 108 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/thsice/thsice_diagnostics_init.F 111 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/thsice/thsice_diagnostics_init.F 115 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/thsice/thsice_diagnostics_init.F 118 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/thsice/thsice_diagnostics_init.F 122 THSICE_DIAGNOSTICS_INIT
        diagUnits = 's               '
./pkg/thsice/thsice_diagnostics_init.F 125 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 130 THSICE_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/thsice/thsice_diagnostics_init.F 133 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 139 THSICE_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/thsice/thsice_diagnostics_init.F 142 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFrcFx, myThid )
./pkg/thsice/thsice_diagnostics_init.F 146 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/thsice/thsice_diagnostics_init.F 149 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFrcFx, myThid )
./pkg/thsice/thsice_diagnostics_init.F 153 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/thsice/thsice_diagnostics_init.F 156 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 160 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/thsice/thsice_diagnostics_init.F 163 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 167 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/thsice/thsice_diagnostics_init.F 170 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 174 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/thsice/thsice_diagnostics_init.F 177 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 181 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'psu.kg/m^2/s    '
./pkg/thsice/thsice_diagnostics_init.F 184 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 188 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/thsice/thsice_diagnostics_init.F 191 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 195 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'psu             '
./pkg/thsice/thsice_diagnostics_init.F 198 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 204 THSICE_DIAGNOSTICS_INIT
          diagUnits = 'm^2/s           '
./pkg/thsice/thsice_diagnostics_init.F 207 THSICE_DIAGNOSTICS_INIT
          diagUnits = 'm^3/s           '
./pkg/thsice/thsice_diagnostics_init.F 210 THSICE_DIAGNOSTICS_INIT
          diagUnits = 'm^3/s           '
./pkg/thsice/thsice_diagnostics_init.F 213 THSICE_DIAGNOSTICS_INIT
          diagUnits = 'J/kg.m^3/s      '
./pkg/thsice/thsice_diagnostics_init.F 217 THSICE_DIAGNOSTICS_INIT
          diagUnits = 'J/kg.m^3/s      '
./pkg/thsice/thsice_diagnostics_init.F 229 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/thsice/thsice_diagnostics_init.F 235 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/thsice/thsice_diagnostics_init.F 248 THSICE_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/thsice/thsice_diagnostics_init.F 251 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 256 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/thsice/thsice_diagnostics_init.F 259 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/thsice/thsice_diagnostics_init.F 264 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/thsice/thsice_diagnostics_init.F 267 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/thsice/thsice_diagnostics_init.F 271 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/thsice/thsice_diagnostics_init.F 274 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/thsice/thsice_diagnostics_init.F 278 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/thsice/thsice_diagnostics_init.F 281 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/thsice/thsice_diagnostics_init.F 48 THSICE_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/thsice/thsice_diagnostics_init.F 63 THSICE_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/thsice/thsice_diagnostics_init.F 66 THSICE_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/thsice/thsice_diagnostics_init.F 72 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/thsice/thsice_diagnostics_init.F 75 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/thsice/thsice_diagnostics_init.F 80 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/thsice/thsice_diagnostics_init.F 83 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/thsice/thsice_diagnostics_init.F 87 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/thsice/thsice_diagnostics_init.F 90 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/thsice/thsice_diagnostics_init.F 94 THSICE_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/thsice/thsice_diagnostics_init.F 97 THSICE_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 102 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 106 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/s          '
./pkg/aim_v23/aim_diagnostics_init.F 109 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 114 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/s          '
./pkg/aim_v23/aim_diagnostics_init.F 117 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 122 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/s          '
./pkg/aim_v23/aim_diagnostics_init.F 125 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 129 AIM_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/aim_v23/aim_diagnostics_init.F 132 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 136 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 139 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 143 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 146 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 150 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 153 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 157 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 160 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 164 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 167 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 171 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/m^2/s         '
./pkg/aim_v23/aim_diagnostics_init.F 174 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 178 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/m^2/s         '
./pkg/aim_v23/aim_diagnostics_init.F 181 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 185 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/m^2/s         '
./pkg/aim_v23/aim_diagnostics_init.F 188 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 193 AIM_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/aim_v23/aim_diagnostics_init.F 196 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 201 AIM_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/aim_v23/aim_diagnostics_init.F 204 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 208 AIM_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/aim_v23/aim_diagnostics_init.F 212 AIM_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 216 AIM_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/aim_v23/aim_diagnostics_init.F 219 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 223 AIM_DIAGNOSTICS_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/aim_v23/aim_diagnostics_init.F 226 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 230 AIM_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/aim_v23/aim_diagnostics_init.F 233 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 237 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/aim_v23/aim_diagnostics_init.F 240 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 244 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/kg            '
./pkg/aim_v23/aim_diagnostics_init.F 247 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 251 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 254 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 258 AIM_DIAGNOSTICS_INIT
      diagUnits = '0-1             '
./pkg/aim_v23/aim_diagnostics_init.F 261 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 266 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 269 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 274 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 277 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 281 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/aim_v23/aim_diagnostics_init.F 284 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 288 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/aim_v23/aim_diagnostics_init.F 291 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 295 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 298 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 302 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 305 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 310 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 313 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 318 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 321 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 326 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 329 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 333 AIM_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 337 AIM_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 341 AIM_DIAGNOSTICS_INIT
      diagUnits = 'N/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 345 AIM_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 350 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 354 AIM_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 359 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 363 AIM_DIAGNOSTICS_INIT
     I     diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 367 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K               '
./pkg/aim_v23/aim_diagnostics_init.F 370 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 375 AIM_DIAGNOSTICS_INIT
      diagUnits = 'ppm             '
./pkg/aim_v23/aim_diagnostics_init.F 378 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 384 AIM_DIAGNOSTICS_INIT
      diagUnits = 'W/m^2           '
./pkg/aim_v23/aim_diagnostics_init.F 387 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 44 AIM_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/aim_v23/aim_diagnostics_init.F 52 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/aim_v23/aim_diagnostics_init.F 55 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 60 AIM_DIAGNOSTICS_INIT
      diagUnits = 'g/kg/s          '
./pkg/aim_v23/aim_diagnostics_init.F 63 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 68 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/aim_v23/aim_diagnostics_init.F 71 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 76 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/aim_v23/aim_diagnostics_init.F 79 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 83 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/aim_v23/aim_diagnostics_init.F 86 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 91 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/aim_v23/aim_diagnostics_init.F 94 AIM_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/aim_v23/aim_diagnostics_init.F 99 AIM_DIAGNOSTICS_INIT
      diagUnits = 'K/s             '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 101 CPL_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 104 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 109 CPL_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 112 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numFract, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 116 CPL_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 119 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 123 CPL_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 126 CPL_DIAGNOSTICS_INIT
     I    diagName, diagCode, diagUnits, diagTitle, numThick, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 42 CPL_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/atm_compon_interf/cpl_diagnostics_init.F 54 CPL_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 57 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 61 CPL_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 64 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 68 CPL_DIAGNOSTICS_INIT
        diagUnits = 'g/kg            '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 71 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 76 CPL_DIAGNOSTICS_INIT
        diagUnits = 'm^2/s^2         '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 79 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 84 CPL_DIAGNOSTICS_INIT
        diagUnits = 'mol/m^2/s       '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 87 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_compon_interf/cpl_diagnostics_init.F 93 CPL_DIAGNOSTICS_INIT
        diagUnits = '0-1             '
./pkg/atm_compon_interf/cpl_diagnostics_init.F 96 CPL_DIAGNOSTICS_INIT
     I           diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 100 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/atm_phys/atm_phys_diagnostics_init.F 103 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 106 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/atm_phys/atm_phys_diagnostics_init.F 109 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 112 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 115 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 120 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 123 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 126 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 129 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 133 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 136 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 140 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 143 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 147 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 150 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 154 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 157 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 160 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 163 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 166 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 169 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 172 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 175 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 178 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 181 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 184 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 187 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 190 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 193 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 196 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'W/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 199 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 202 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'kg/m^2/s        '
./pkg/atm_phys/atm_phys_diagnostics_init.F 205 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 208 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'N/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 212 ATM_PHYS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 215 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'N/m^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 219 ATM_PHYS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 224 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'J/kg            '
./pkg/atm_phys/atm_phys_diagnostics_init.F 227 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 230 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/atm_phys/atm_phys_diagnostics_init.F 233 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 236 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/atm_phys/atm_phys_diagnostics_init.F 239 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 243 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = '1               '
./pkg/atm_phys/atm_phys_diagnostics_init.F 246 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 249 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = '1/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 252 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 255 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = '1/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 258 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 261 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K               '
./pkg/atm_phys/atm_phys_diagnostics_init.F 264 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 267 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'kg/kg           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 270 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 273 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 276 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 280 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 283 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 286 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = '1/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 289 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 292 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 295 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 41 ATM_PHYS_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/atm_phys/atm_phys_diagnostics_init.F 50 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K               '
./pkg/atm_phys/atm_phys_diagnostics_init.F 53 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 57 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 60 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 64 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = '1/s             '
./pkg/atm_phys/atm_phys_diagnostics_init.F 67 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 71 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 75 ATM_PHYS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 79 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'm/s^2           '
./pkg/atm_phys/atm_phys_diagnostics_init.F 83 ATM_PHYS_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 87 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/atm_phys/atm_phys_diagnostics_init.F 90 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/atm_phys/atm_phys_diagnostics_init.F 93 ATM_PHYS_DIAGNOSTICS_INIT
        diagUnits = 'unit            '
./pkg/atm_phys/atm_phys_diagnostics_init.F 96 ATM_PHYS_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bbl/bbl_diagnostics_init.F 41 BBL_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/bbl/bbl_diagnostics_init.F 48 BBL_DIAGNOSTICS_INIT
        diagUnits = 'degC            '
./pkg/bbl/bbl_diagnostics_init.F 51 BBL_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bbl/bbl_diagnostics_init.F 55 BBL_DIAGNOSTICS_INIT
        diagUnits = 'psu             '
./pkg/bbl/bbl_diagnostics_init.F 58 BBL_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bbl/bbl_diagnostics_init.F 62 BBL_DIAGNOSTICS_INIT
        diagUnits = 'm               '
./pkg/bbl/bbl_diagnostics_init.F 65 BBL_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bbl/bbl_diagnostics_init.F 69 BBL_DIAGNOSTICS_INIT
        diagUnits = 'degC/s          '
./pkg/bbl/bbl_diagnostics_init.F 72 BBL_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bbl/bbl_diagnostics_init.F 76 BBL_DIAGNOSTICS_INIT
        diagUnits = 'psu/s           '
./pkg/bbl/bbl_diagnostics_init.F 79 BBL_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 102 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3/s      '
./pkg/bling/bling_diagnostics_init.F 105 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 109 BLING_DIAGNOSTICS_INIT
      diagUnits = '1/s      '
./pkg/bling/bling_diagnostics_init.F 112 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 116 BLING_DIAGNOSTICS_INIT
      diagUnits = '1/s      '
./pkg/bling/bling_diagnostics_init.F 119 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 123 BLING_DIAGNOSTICS_INIT
      diagUnits = '1/s      '
./pkg/bling/bling_diagnostics_init.F 126 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 130 BLING_DIAGNOSTICS_INIT
      diagUnits = 'W/m2   '
./pkg/bling/bling_diagnostics_init.F 133 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 137 BLING_DIAGNOSTICS_INIT
      diagUnits = '-      '
./pkg/bling/bling_diagnostics_init.F 140 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 144 BLING_DIAGNOSTICS_INIT
      diagUnits = '-      '
./pkg/bling/bling_diagnostics_init.F 147 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 151 BLING_DIAGNOSTICS_INIT
      diagUnits = '-      '
./pkg/bling/bling_diagnostics_init.F 154 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 158 BLING_DIAGNOSTICS_INIT
      diagUnits = '-      '
./pkg/bling/bling_diagnostics_init.F 161 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 167 BLING_DIAGNOSTICS_INIT
      diagUnits = 'atm             '
./pkg/bling/bling_diagnostics_init.F 170 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 174 BLING_DIAGNOSTICS_INIT
      diagUnits = 'dimensionless   '
./pkg/bling/bling_diagnostics_init.F 177 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 181 BLING_DIAGNOSTICS_INIT
      diagUnits = 'dimensionless   '
./pkg/bling/bling_diagnostics_init.F 184 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 188 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol/m2/sec      '
./pkg/bling/bling_diagnostics_init.F 191 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 196 BLING_DIAGNOSTICS_INIT
      diagUnits = '10^-6 ppm       '
./pkg/bling/bling_diagnostics_init.F 199 BLING_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 206 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol/m2/sec   '
./pkg/bling/bling_diagnostics_init.F 209 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 213 BLING_DIAGNOSTICS_INIT
      diagUnits = 'percent      '
./pkg/bling/bling_diagnostics_init.F 216 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 222 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol/m2/sec   '
./pkg/bling/bling_diagnostics_init.F 225 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 229 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 232 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 236 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 239 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 243 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 246 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 250 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 253 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 257 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 260 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 264 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 267 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 271 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 274 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 278 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 281 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 285 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/s     '
./pkg/bling/bling_diagnostics_init.F 288 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 294 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 297 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 301 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 304 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 308 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 30 BLING_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/bling/bling_diagnostics_init.F 311 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 315 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 318 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 322 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 325 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 329 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 332 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 336 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 339 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 343 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 346 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 350 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 353 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 357 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 360 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 364 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 367 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 373 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 376 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 380 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 383 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 387 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 390 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 394 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 397 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 39 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3        '
./pkg/bling/bling_diagnostics_init.F 401 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 404 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 408 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 411 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 415 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 418 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 424 BLING_DIAGNOSTICS_INIT
      diagUnits = 'W/m2   '
./pkg/bling/bling_diagnostics_init.F 427 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 42 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 431 BLING_DIAGNOSTICS_INIT
      diagUnits = 'W/m2   '
./pkg/bling/bling_diagnostics_init.F 434 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 438 BLING_DIAGNOSTICS_INIT
      diagUnits = 'W/m2   '
./pkg/bling/bling_diagnostics_init.F 441 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 445 BLING_DIAGNOSTICS_INIT
      diagUnits = 'W/m2   '
./pkg/bling/bling_diagnostics_init.F 448 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 454 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3/sec    '
./pkg/bling/bling_diagnostics_init.F 457 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 461 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol alk/m3/sec    '
./pkg/bling/bling_diagnostics_init.F 464 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 468 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol O/m3/sec    '
./pkg/bling/bling_diagnostics_init.F 46 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3        '
./pkg/bling/bling_diagnostics_init.F 471 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 475 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/sec    '
./pkg/bling/bling_diagnostics_init.F 478 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 482 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/sec    '
./pkg/bling/bling_diagnostics_init.F 485 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 489 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Fe/m3/sec    '
./pkg/bling/bling_diagnostics_init.F 492 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 496 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol N/m3/s      '
./pkg/bling/bling_diagnostics_init.F 499 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 49 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 503 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol P/m3/s      '
./pkg/bling/bling_diagnostics_init.F 506 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 510 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol O/m3/s      '
./pkg/bling/bling_diagnostics_init.F 513 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 517 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3/s      '
./pkg/bling/bling_diagnostics_init.F 520 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 524 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3/s      '
./pkg/bling/bling_diagnostics_init.F 527 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 53 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3        '
./pkg/bling/bling_diagnostics_init.F 56 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 60 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mg/m3           '
./pkg/bling/bling_diagnostics_init.F 63 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 67 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol Chl/mol C   '
./pkg/bling/bling_diagnostics_init.F 70 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 74 BLING_DIAGNOSTICS_INIT
      diagUnits = 'g C/g Chl       '
./pkg/bling/bling_diagnostics_init.F 77 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 81 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3        '
./pkg/bling/bling_diagnostics_init.F 84 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 88 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3/s      '
./pkg/bling/bling_diagnostics_init.F 91 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/bling/bling_diagnostics_init.F 95 BLING_DIAGNOSTICS_INIT
      diagUnits = 'mol C/m3/s      '
./pkg/bling/bling_diagnostics_init.F 98 BLING_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 100 CHEAPAML_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagmate, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 104 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'W/m2            '
./pkg/cheapaml/cheapaml_diagnostics_init.F 107 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 111 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'W/m2            '
./pkg/cheapaml/cheapaml_diagnostics_init.F 114 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 118 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'kg/m2/s         '
./pkg/cheapaml/cheapaml_diagnostics_init.F 121 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 125 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'kg/kg           '
./pkg/cheapaml/cheapaml_diagnostics_init.F 128 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 132 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'kg/kg           '
./pkg/cheapaml/cheapaml_diagnostics_init.F 135 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 46 CHEAPAML_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/cheapaml/cheapaml_diagnostics_init.F 53 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'degres C        '
./pkg/cheapaml/cheapaml_diagnostics_init.F 56 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 60 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'W/m2            '
./pkg/cheapaml/cheapaml_diagnostics_init.F 63 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 67 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'kg/kg           '
./pkg/cheapaml/cheapaml_diagnostics_init.F 70 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 74 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'kg/m2/s         '
./pkg/cheapaml/cheapaml_diagnostics_init.F 77 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 81 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'Depend on Tracer'
./pkg/cheapaml/cheapaml_diagnostics_init.F 84 CHEAPAML_DIAGNOSTICS_INIT
     I            diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 88 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'm/s           '
./pkg/cheapaml/cheapaml_diagnostics_init.F 92 CHEAPAML_DIAGNOSTICS_INIT
     I      diagName, diagCode, diagUnits, diagTitle, diagmate, myThid )
./pkg/cheapaml/cheapaml_diagnostics_init.F 96 CHEAPAML_DIAGNOSTICS_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_addtolist.F 110 DIAGNOSTICS_ADDTOLIST
        udiag(diagNum) = diagUnits
./pkg/diagnostics/diagnostics_addtolist.F 13 DIAGNOSTICS_ADDTOLIST
     I     diagName, diagCode, diagUnits, diagTitle, diagMate,
./pkg/diagnostics/diagnostics_addtolist.F 41 DIAGNOSTICS_ADDTOLIST
      CHARACTER*16  diagUnits
./pkg/diagnostics/diagnostics_addtolist.F 82 DIAGNOSTICS_ADDTOLIST
          udiag(diagNum) = diagUnits
./pkg/diagnostics/diagnostics_main_init.F 139 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid )
./pkg/diagnostics/diagnostics_main_init.F 142 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 147 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c//'^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 150 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 155 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c//'^2/s^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 158 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 162 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c, myThid )
./pkg/diagnostics/diagnostics_main_init.F 165 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 176 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c, myThid )
./pkg/diagnostics/diagnostics_main_init.F 179 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 183 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'percent         '
./pkg/diagnostics/diagnostics_main_init.F 186 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 198 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c, myThid )
./pkg/diagnostics/diagnostics_main_init.F 201 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 206 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 210 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 214 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 218 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 222 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 225 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 229 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 232 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 236 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( '('//sUnit5c//')^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 239 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 244 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( '('//sUnit5c//')^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 247 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 252 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 256 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 260 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 264 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 268 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c//'^2/s^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 271 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 275 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 279 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 283 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 287 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 291 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 295 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 299 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 303 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 307 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( 'm.'//rUnit2c//'/s^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 310 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 314 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( 'm.'//rUnit2c//'/s^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 317 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 321 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 325 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 329 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 333 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 337 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 340 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 344 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s           '
./pkg/diagnostics/diagnostics_main_init.F 348 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 352 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m^2/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 357 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 361 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 365 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 369 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 373 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 377 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS(tUnit4c//'.'//rUnit2c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 380 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 385 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS(sUnit5c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 389 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 394 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS(sUnit5c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 398 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 403 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS(sUnit5c//'.'//rUnit2c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 406 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 410 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 414 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 418 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 422 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 426 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS(tUnit4c//'.'//rUnit2c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 429 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 434 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 438 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 443 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c//'.m/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 447 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 452 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS(sUnit5c//'.'//rUnit2c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 455 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 460 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^3/s^3         '
./pkg/diagnostics/diagnostics_main_init.F 464 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 469 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^3/s^3         '
./pkg/diagnostics/diagnostics_main_init.F 473 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 479 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^3          '
./pkg/diagnostics/diagnostics_main_init.F 482 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 486 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg^2/m^6        '
./pkg/diagnostics/diagnostics_main_init.F 489 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 493 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/diagnostics/diagnostics_main_init.F 497 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 501 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/diagnostics/diagnostics_main_init.F 505 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 509 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/diagnostics/diagnostics_main_init.F 512 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 516 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/diagnostics/diagnostics_main_init.F 519 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 523 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/diagnostics/diagnostics_main_init.F 526 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 531 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 534 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 539 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^4/s^4         '
./pkg/diagnostics/diagnostics_main_init.F 542 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 548 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 551 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 557 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^4/s^4         '
./pkg/diagnostics/diagnostics_main_init.F 560 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 564 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 567 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 573 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 576 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 582 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm^2/s^2         '
./pkg/diagnostics/diagnostics_main_init.F 585 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 590 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm               '
./pkg/diagnostics/diagnostics_main_init.F 593 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 597 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^4          '
./pkg/diagnostics/diagnostics_main_init.F 598 DIAGNOSTICS_MAIN_INIT
      IF ( usingPCoords ) diagUnits = 's^2/m^2         '
./pkg/diagnostics/diagnostics_main_init.F 601 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 605 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'fraction        '
./pkg/diagnostics/diagnostics_main_init.F 608 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 613 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'N/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 617 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 621 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'N/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 625 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 629 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'Pa              '
./pkg/diagnostics/diagnostics_main_init.F 632 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 636 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^2          '
./pkg/diagnostics/diagnostics_main_init.F 639 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 644 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'kg/m^2/s        '
./pkg/diagnostics/diagnostics_main_init.F 647 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 652 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'g/m^2/s         '
./pkg/diagnostics/diagnostics_main_init.F 655 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 660 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 663 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 668 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 671 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 675 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 678 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 682 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 685 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 689 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'g/m^2/s         '
./pkg/diagnostics/diagnostics_main_init.F 692 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 697 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 700 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 705 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'g/m^2/s         '
./pkg/diagnostics/diagnostics_main_init.F 708 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 713 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 716 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 721 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'g/m^2/s         '
./pkg/diagnostics/diagnostics_main_init.F 724 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 731 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid )
./pkg/diagnostics/diagnostics_main_init.F 734 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 739 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid )
./pkg/diagnostics/diagnostics_main_init.F 742 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 746 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s/day         '
./pkg/diagnostics/diagnostics_main_init.F 750 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 754 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s/day         '
./pkg/diagnostics/diagnostics_main_init.F 758 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 762 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'/day', myThid )
./pkg/diagnostics/diagnostics_main_init.F 765 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 769 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c//'/day', myThid )
./pkg/diagnostics/diagnostics_main_init.F 76 DIAGNOSTICS_MAIN_INIT
      CHARACTER*16   diagUnits
./pkg/diagnostics/diagnostics_main_init.F 772 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 776 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 779 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 784 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'W/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 787 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 793 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 796 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 801 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 804 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 808 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 811 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 816 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 819 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 823 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( tUnit4c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 826 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 831 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( sUnit5c//'/s', myThid )
./pkg/diagnostics/diagnostics_main_init.F 834 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 839 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s^2           '
./pkg/diagnostics/diagnostics_main_init.F 843 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 847 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s^2           '
./pkg/diagnostics/diagnostics_main_init.F 851 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 856 DIAGNOSTICS_MAIN_INIT
      diagUnits = DIAGS_MK_UNITS( rUnit2c//'/s^2', myThid )
./pkg/diagnostics/diagnostics_main_init.F 859 DIAGNOSTICS_MAIN_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/diagnostics/diagnostics_main_init.F 865 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'N/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 869 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 873 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'N/m^2           '
./pkg/diagnostics/diagnostics_main_init.F 877 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 882 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 886 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/diagnostics/diagnostics_main_init.F 890 DIAGNOSTICS_MAIN_INIT
      diagUnits = 'm/s             '
./pkg/diagnostics/diagnostics_main_init.F 894 DIAGNOSTICS_MAIN_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/dic/dic_diagnostics_init.F 29 DIC_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/dic/dic_diagnostics_init.F 37 DIC_DIAGNOSTICS_INIT
      diagUnits = 'mol/m3/sec      '
./pkg/dic/dic_diagnostics_init.F 40 DIC_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/dic/dic_diagnostics_init.F 44 DIC_DIAGNOSTICS_INIT
      diagUnits = 'mol eq/m3/sec   '
./pkg/dic/dic_diagnostics_init.F 47 DIC_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/dic/dic_diagnostics_init.F 51 DIC_DIAGNOSTICS_INIT
      diagUnits = 'mol/m3/sec      '
./pkg/dic/dic_diagnostics_init.F 54 DIC_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/dic/dic_diagnostics_init.F 58 DIC_DIAGNOSTICS_INIT
      diagUnits = 'mol/m3/sec      '
./pkg/dic/dic_diagnostics_init.F 61 DIC_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/dic/dic_diagnostics_init.F 65 DIC_DIAGNOSTICS_INIT
      diagUnits = 'mol/m2/sec      '
./pkg/dic/dic_diagnostics_init.F 68 DIC_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/dic/dic_diagnostics_init.F 72 DIC_DIAGNOSTICS_INIT
      diagUnits = 'atm             '
./pkg/dic/dic_diagnostics_init.F 75 DIC_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/dic/dic_diagnostics_init.F 79 DIC_DIAGNOSTICS_INIT
      diagUnits = 'dimensionless   '
./pkg/dic/dic_diagnostics_init.F 82 DIC_DIAGNOSTICS_INIT
     I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/down_slope/dwnslp_diagnostics_init.F 102 DWNSLP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/down_slope/dwnslp_diagnostics_init.F 45 DWNSLP_DIAGNOSTICS_INIT
      CHARACTER*16  diagUnits
./pkg/down_slope/dwnslp_diagnostics_init.F 69 DWNSLP_DIAGNOSTICS_INIT
        diagUnits = 'm^3/s           '
./pkg/down_slope/dwnslp_diagnostics_init.F 73 DWNSLP_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/down_slope/dwnslp_diagnostics_init.F 77 DWNSLP_DIAGNOSTICS_INIT
        diagUnits = 'm^3/s           '
./pkg/down_slope/dwnslp_diagnostics_init.F 81 DWNSLP_DIAGNOSTICS_INIT
     I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
./pkg/down_slope/dwnslp_diagnostics_init.F 89 DWNSLP_DIAGNOSTICS_INIT
        diagUnits = 'K/s             '
./pkg/down_slope/dwnslp_diagnostics_init.F 92 DWNSLP_DIAGNOSTICS_INIT
     I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
./pkg/down_slope/dwnslp_diagnostics_init.F 99 DWNSLP_DIAGNOSTICS_INIT
        diagUnits = 'psu/s           '