Page 1 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 1 BLOCK DATA POSTDATA 2 3 INCLUDE "parmeta" 21 INCLUDE "parmout" 25 INCLUDE "OPTIONS.comm" 29 INCLUDE "IOUNIT.comm" 37 INCLUDE "RQSTFLD.comm" 38 C 39 C 40 C COMMON BLOCK OPTIONS CONTAINS USER OPTIONS 41 C SPVAL : FLAG FOR MISSING DATA ON OUTPUT GRID. THIS 42 C CAN ARISE IF OUTPUT GRID EXTENDS BEYOND THE 43 C FILLED E-GRID. 44 C IBESSL: SWITCH FOR TYPE OF HORIZONTAL INTERPOLATION 45 C FROM FILLED E-GRID TO OUTPUT GRID. 46 C -1 = 4-POINT LINEAR INTERPOLATION SCHEME 47 C WITH GRADIENT CORRECTION. THIS OPTION 48 C IS NOT AVAILABLE 49 C 0 = 4-POINT LINEAR INTERPOLATION SCHEME 50 C 1 = 16-POINT BESSEL INTERPOLATION SCHEME 51 C THIS OPTION IS NOT AVAILABLE. 52 C KSB : SQUARE ROOT OF THE NUMBER OF SUB-BOXES WHICH 53 C SUBROUTINE CETLIH USES. SUBROUTINE CETLIH 54 C INTERPOLATES A H-POINT ETA GRID FIELD TO AN 55 C OUTPUT GRID CONSERVING THE AREA INTEGRAL OF 56 C THE E-GRID FIELD. WHEN INTERPOLATING PRECIP 57 C AMOUNT TO A COARSER RESOLUTION GRID, KSB=3 58 C IS A GOOD CHOICE. IF INTERPOLATING TO A 59 C FINER RESOLUTION GRID, KSB=8 IS A GOOD CHOICE. 60 C IOFFS : PLUS/MINUS NUMBER OF POINTS ABOUT SOUTHWEST 61 C CORNER OUTPUT GRID POINT OVER WHICH CETLIH4.F 62 C SEARCHES THE CLOSEST OUTPUT GRID POINT TO 63 C EACH SUB-BOX. WHEN INTERPOLATING TO A COARSER 64 C RESOLUTION GRID, IOFFS=2 OR 3 IS A GOOD CHOICE. 65 C IF INTERPOLATING TO A FINER RESOLUTION GRID, 66 C IOFFS=5 OR 6 IS A GOOD CHOICE. 67 C IFLAG : CONTROLS OUTPUT FROM FILLV 68 C IFLAG=0 -> TAKE WHAT INTERPOLATION GIVES 69 C IFLAG=1 -> TRUNCATE OUTPUT AT ZERO 70 C IFLAG=2 -> TRUNCATE AT A VERY SMALL 71 C POSITIVE NUMBER (EPS) 72 C SATDEL: FRACTIONAL VARIATION OF SATURATION. SUBROUTINE 73 C NLYLI (N-LAYER LIFTED INDEX) LIFTS A MODIFIED 74 C PARCEL. PARCEL SPECIFIC HUMIDITY IS MODIFIED 75 C ACCORDING TO THE FORMULA QMOD = (1+SATDEL)*QGIVEN. 76 C THE NGM USES SATDEL=0.05 77 C 78 91 DATA SPVAL / 999999./ 92 DATA IBESSL / 0 / 93 DATA KSB / 3 / 94 DATA IOFFS / 2 / 95 DATA IFLAG / 0 / 96 DATA SATDEL / 0.05 / 97 C 98 DATA RITEHD,RITE2 / .TRUE., .TRUE. / 99 C Page 2 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 100 DATA STDOUT,LCNTRL / 6, 14 / 101 DATA LUNCO, LUNLL / 19, 29 / 102 DATA LUNOUT / 60 / 103 C 104 C 105 C THIS FILE CONTAINS ALL THE UNIQUE FIELDS THE 106 C ETA POST PROCESSOR CAN CURRENTLY GENERATE. 107 C 108 C IFILV IS SWITCH FOR FILLING MASS OR VELOCITY POINT E-GRID 109 C =0 DATA IS VELOCITY POINT AND MUST FILL MASS POINTS 110 C =1 DATA IS MASS POINT AND MUST FILL VELOCITY POINTS 111 C AVBL IS CHARACTER STRING IDENTIFYING THE FIELD. 112 C IQ IS THE GRIB PDS OCTET 9 - PARAMETER (TABLE 2) 113 C IS IS THE GRIB PDS OCTET 10 - LEVEL TYPE (TABLE 3 & 3a) 114 C 115 C WANT MORE/DIFFERENT FIELDS? 116 C (1) ADD CODE TO CALCULATE FIELD(S) IN APPROPRIATE ROUTINE(S), 117 C (2) ADD FIELD(S) TO THIS LIST WITH A UNIQUE ITAG TAG, 118 C (3) EDIT INPUT (CONTROL) FILE ACCORDINGLY, 119 C (3) INCREASE PARAMETER MXFLD IN INCLUDE FILE "PARMOUT". 120 C 121 C CURRENT NUMBER OF FIELDS LISTED: 180 122 C 123 C0 1 2 3 4 5 6 7 124 C234567890123456789012345678901234567890123456789012345678901234567890 125 DATA IFILV(001),AVBL(001),IQ(001),IS(001) 126 & /1,'PRESS ON ETA SFCS ',001,119/ 127 DATA IFILV(077),AVBL(077),IQ(077),IS(077) 128 & /1,'HEIGHT ON ETA SFCS ',007,119/ 129 DATA IFILV(002),AVBL(002),IQ(002),IS(002) 130 & /1,'TEMP ON ETA SFCS ',011,119/ 131 DATA IFILV(003),AVBL(003),IQ(003),IS(003) 132 & /1,'POT TEMP ON ETA SFCS',013,119/ 133 DATA IFILV(004),AVBL(004),IQ(004),IS(004) 134 & /1,'DWPT TEMP ON ETA SFC',017,119/ 135 DATA IFILV(005),AVBL(005),IQ(005),IS(005) 136 & /1,'SPEC HUM ON ETA SFCS',051,119/ 137 DATA IFILV(006),AVBL(006),IQ(006),IS(006) 138 & /1,'REL HUM ON ETA SFCS ',052,119/ 139 DATA IFILV(083),AVBL(083),IQ(083),IS(083) 140 & /1,'MST CNVG ON ETA SFCS',135,119/ 141 DATA IFILV(007),AVBL(007),IQ(007),IS(007) 142 & /0,'U WIND ON ETA SFCS ',033,119/ 143 DATA IFILV(008),AVBL(008),IQ(008),IS(008) 144 & /0,'V WIND ON ETA SFCS ',034,119/ 145 DATA IFILV(009),AVBL(009),IQ(009),IS(009) 146 & /1,'OMEGA ON ETA SFCS ',039,119/ 147 DATA IFILV(010),AVBL(010),IQ(010),IS(010) 148 & /1,'ABS VORT ON ETA SFCS',041,119/ 149 DATA IFILV(084),AVBL(084),IQ(084),IS(084) 150 & /1,'STRMFUNC ON ETA SFCS',035,119/ 151 DATA IFILV(011),AVBL(011),IQ(011),IS(011) 152 & /1,'TRBLNT KE ON ETA SFC',158,119/ 153 DATA IFILV(111),AVBL(111),IQ(111),IS(111) 154 & /1,'RCHDSN NO ON ETA SFC',254,119/ 155 DATA IFILV(146),AVBL(146),IQ(146),IS(146) 156 & /1,'MASTER LENGTH SCALE ',226,119/ Page 3 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 157 DATA IFILV(147),AVBL(147),IQ(147),IS(147) 158 & /1,'ASYMPT MSTR LEN SCL ',227,001/ 159 DATA IFILV(012),AVBL(012),IQ(012),IS(012) 160 & /1,'HEIGHT OF PRESS SFCS',007,100/ 161 DATA IFILV(013),AVBL(013),IQ(013),IS(013) 162 & /1,'TEMP ON PRESS SFCS ',011,100/ 163 DATA IFILV(014),AVBL(014),IQ(014),IS(014) 164 & /1,'POT TEMP ON P SFCS ',013,100/ 165 DATA IFILV(015),AVBL(015),IQ(015),IS(015) 166 & /1,'DWPT TEMP ON P SFCS ',017,100/ 167 DATA IFILV(016),AVBL(016),IQ(016),IS(016) 168 & /1,'SPEC HUM ON P SFCS ',051,100/ 169 DATA IFILV(017),AVBL(017),IQ(017),IS(017) 170 & /1,'REL HUMID ON P SFCS ',052,100/ 171 DATA IFILV(085),AVBL(085),IQ(085),IS(085) 172 & /1,'MST CNVG ON P SFCS ',135,100/ 173 DATA IFILV(018),AVBL(018),IQ(018),IS(018) 174 & /0,'U WIND ON PRESS SFCS',033,100/ 175 DATA IFILV(019),AVBL(019),IQ(019),IS(019) 176 & /0,'V WIND ON PRESS SFCS',034,100/ 177 DATA IFILV(020),AVBL(020),IQ(020),IS(020) 178 & /1,'OMEGA ON PRESS SFCS ',039,100/ 179 DATA IFILV(021),AVBL(021),IQ(021),IS(021) 180 & /1,'ABS VORT ON P SFCS ',041,100/ 181 DATA IFILV(086),AVBL(086),IQ(086),IS(086) 182 & /1,'STRMFUNC ON P SFCS ',035,100/ 183 DATA IFILV(022),AVBL(022),IQ(022),IS(022) 184 & /1,'TRBLNT KE ON P SFCS ',158,100/ 185 DATA IFILV(153),AVBL(153),IQ(153),IS(153) 186 & /1,'CLOUD WATR ON P SFCS',153,100/ 187 DATA IFILV(166),AVBL(166),IQ(166),IS(166) 188 & /1,'CLOUD ICE ON P SFCS ',178,100/ 189 DATA IFILV(023),AVBL(023),IQ(023),IS(023) 190 & /1,'MESINGER MEAN SLP ',130,102/ 191 DATA IFILV(105),AVBL(105),IQ(105),IS(105) 192 & /1,'SHUELL MEAN SLP ',002,102/ 193 DATA IFILV(138),AVBL(138),IQ(138),IS(138) 194 & /1,'SHELTER PRESSURE ',001,105/ 195 DATA IFILV(106),AVBL(106),IQ(106),IS(106) 196 & /1,'SHELTER TEMPERATURE ',011,105/ 197 DATA IFILV(112),AVBL(112),IQ(112),IS(112) 198 & /1,'SHELTER SPEC HUMID ',051,105/ 199 DATA IFILV(113),AVBL(113),IQ(113),IS(113) 200 & /1,'SHELTER DEWPOINT ',017,105/ 201 DATA IFILV(114),AVBL(114),IQ(114),IS(114) 202 & /1,'SHELTER REL HUMID ',052,105/ 203 DATA IFILV(064),AVBL(064),IQ(064),IS(064) 204 & /0,'U WIND AT ANEMOM HT ',033,105/ 205 DATA IFILV(065),AVBL(065),IQ(065),IS(065) 206 & /0,'V WIND AT ANEMOM HT ',034,105/ 207 DATA IFILV(158),AVBL(158),IQ(158),IS(158) 208 & /1,'POT TEMP AT 10 M ',013,105/ 209 DATA IFILV(159),AVBL(159),IQ(159),IS(159) 210 & /1,'SPEC HUM AT 10 M ',051,105/ 211 DATA IFILV(024),AVBL(024),IQ(024),IS(024) 212 & /1,'SURFACE PRESSURE ',001,001/ 213 DATA IFILV(025),AVBL(025),IQ(025),IS(025) Page 4 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 214 & /1,'SURFACE HEIGHT ',007,001/ 215 DATA IFILV(027),AVBL(027),IQ(027),IS(027) 216 & /1,'SURFACE POT TEMP ',013,001/ 217 DATA IFILV(028),AVBL(028),IQ(028),IS(028) 218 & /1,'SURFACE SPEC HUMID ',051,001/ 219 DATA IFILV(029),AVBL(029),IQ(029),IS(029) 220 & /1,'SURFACE DEWPOINT ',017,001/ 221 DATA IFILV(076),AVBL(076),IQ(076),IS(076) 222 & /1,'SURFACE REL HUMID ',052,001/ 223 DATA IFILV(026),AVBL(026),IQ(026),IS(026) 224 & /1,'SFC (SKIN) TEMPRATUR',011,001/ 225 DATA IFILV(115),AVBL(115),IQ(115),IS(115) 226 & /1,'BOTTOM SOIL TEMP ',085,111/ 227 DATA IFILV(116),AVBL(116),IQ(116),IS(116) 228 & /1,'SOIL TEMPERATURE ',085,112/ 229 DATA IFILV(117),AVBL(117),IQ(117),IS(117) 230 & /1,'SOIL MOISTURE ',144,112/ 231 DATA IFILV(036),AVBL(036),IQ(036),IS(036) 232 & /1,'TOTAL SOIL MOISTURE ',086,112/ 233 DATA IFILV(118),AVBL(118),IQ(118),IS(118) 234 & /1,'PLANT CANOPY SFC WTR',223,001/ 235 DATA IFILV(119),AVBL(119),IQ(119),IS(119) 236 & /1,'SNOW WATER EQUIVALNT',065,001/ 237 DATA IFILV(120),AVBL(120),IQ(120),IS(120) 238 & /1,'PERCENT SNOW COVER ',238,001/ 239 DATA IFILV(169),AVBL(169),IQ(169),IS(169) 240 & /1,'SFC EXCHANGE COEF ',208,001/ 241 DATA IFILV(170),AVBL(170),IQ(170),IS(170) 242 & /1,'GREEN VEG COVER ',087,001/ 243 DATA IFILV(171),AVBL(171),IQ(171),IS(171) 244 & /1,'SOIL MOISTURE AVAIL ',207,112/ 245 DATA IFILV(152),AVBL(152),IQ(152),IS(152) 246 & /1,'INST GROUND HEAT FLX',155,001/ 247 DATA IFILV(030),AVBL(030),IQ(030),IS(030) 248 & /1,'LIFTED INDEX--SURFCE',131,101/ 249 DATA IFILV(031),AVBL(031),IQ(031),IS(031) 250 & /1,'LIFTED INDEX--BEST ',132,116/ 251 DATA IFILV(075),AVBL(075),IQ(075),IS(075) 252 & /1,'LIFTED INDEX--BNDLYR',024,116/ 253 DATA IFILV(032),AVBL(032),IQ(032),IS(032) 254 & /1,'CNVCT AVBL POT ENRGY',157,001/ 255 DATA IFILV(107),AVBL(107),IQ(107),IS(107) 256 & /1,'CNVCT INHIBITION ',156,001/ 257 DATA IFILV(080),AVBL(080),IQ(080),IS(080) 258 & /1,'PRECIPITABLE WATER ',054,200/ 259 DATA IFILV(162),AVBL(162),IQ(162),IS(162) 260 & /0,'STORM REL HELICITY ',190,106/ 261 DATA IFILV(163),AVBL(163),IQ(163),IS(163) 262 & /0,'U COMP STORM MOTION ',196,106/ 263 DATA IFILV(164),AVBL(164),IQ(164),IS(164) 264 & /0,'V COMP STORM MOTION ',197,106/ 265 DATA IFILV(087),AVBL(087),IQ(087),IS(087) 266 & /1,'ACM TOTAL PRECIP ',061,001/ 267 DATA IFILV(033),AVBL(033),IQ(033),IS(033) 268 & /1,'ACM CONVCTIVE PRECIP',063,001/ 269 DATA IFILV(034),AVBL(034),IQ(034),IS(034) 270 & /1,'ACM GRD SCALE PRECIP',062,001/ Page 5 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 271 DATA IFILV(035),AVBL(035),IQ(035),IS(035) 272 & /1,'ACM SNOWFALL ',065,001/ 273 DATA IFILV(121),AVBL(121),IQ(121),IS(121) 274 & /1,'ACM SNOW TOTAL/MELT ',099,001/ 275 DATA IFILV(122),AVBL(122),IQ(122),IS(122) 276 & /1,'ACM STORM SFC RNOFF ',235,001/ 277 DATA IFILV(123),AVBL(123),IQ(123),IS(123) 278 & /1,'ACM BSFL-GDWR RNOFF ',234,001/ 279 DATA IFILV(160),AVBL(160),IQ(160),IS(160) 280 & /1,'INSTANT PRECIP TYPE ',140,001/ 281 DATA IFILV(167),AVBL(167),IQ(167),IS(167) 282 & /1,'INSTANT PRECIP RATE ',059,001/ 283 DATA IFILV(172),AVBL(172),IQ(172),IS(172) 284 & /1,'FROZEN FRAC CLD SCHM',194,001/ 285 DATA IFILV(124),AVBL(124),IQ(124),IS(124) 286 & /1,'CLD WTR ON ETA SFCS ',153,119/ 287 DATA IFILV(125),AVBL(125),IQ(125),IS(125) 288 & /1,'CLD ICE ON ETA SFCS ',178,119/ 289 DATA IFILV(145),AVBL(145),IQ(145),IS(145) 290 & /1,'CLD FRAC ON ETA SFCS',071,119/ 291 DATA IFILV(037),AVBL(037),IQ(037),IS(037) 292 & /1,'LOW CLOUD FRACTION ',073,214/ 293 DATA IFILV(038),AVBL(038),IQ(038),IS(038) 294 & /1,'MID CLOUD FRACTION ',074,224/ 295 DATA IFILV(039),AVBL(039),IQ(039),IS(039) 296 & /1,'HIGH CLOUD FRACTION ',075,234/ 297 DATA IFILV(161),AVBL(161),IQ(161),IS(161) 298 & /1,'TOTAL CLD FRACTION ',071,200/ 299 DATA IFILV(144),AVBL(144),IQ(144),IS(144) 300 & /1,'AVG TOTAL CLD FRAC ',071,200/ 301 DATA IFILV(139),AVBL(139),IQ(139),IS(139) 302 & /1,'AVG STRAT CLD FRAC ',213,200/ 303 DATA IFILV(143),AVBL(143),IQ(143),IS(143) 304 & /1,'AVG CNVCT CLD FRAC ',072,200/ 305 DATA IFILV(148),AVBL(148),IQ(148),IS(148) 306 & /1,'CLOUD BOT PRESSURE ',001,002/ 307 DATA IFILV(149),AVBL(149),IQ(149),IS(149) 308 & /1,'CLOUD TOP PRESSURE ',001,003/ 309 DATA IFILV(109),AVBL(109),IQ(109),IS(109) 310 & /1,'LCL AGL HEIGHT ',007,005/ 311 DATA IFILV(110),AVBL(110),IQ(110),IS(110) 312 & /1,'LCL PRESSURE ',001,005/ 313 DATA IFILV(078),AVBL(078),IQ(078),IS(078) 314 & /1,'AVE GRDSCL RN TMPTDY',241,119/ 315 DATA IFILV(079),AVBL(079),IQ(079),IS(079) 316 & /1,'AVE CNVCT RN TMPTDY ',242,119/ 317 DATA IFILV(168),AVBL(168),IQ(168),IS(168) 318 & /1,'CLOUD TOP TEMPS ',011,003/ 319 DATA IFILV(140),AVBL(140),IQ(140),IS(140) 320 & /1,'RADFLX CNVG TMP TNDY',216,119/ 321 DATA IFILV(040),AVBL(040),IQ(040),IS(040) 322 & /1,'SW RAD TEMP TNDY ',250,119/ 323 DATA IFILV(041),AVBL(041),IQ(041),IS(041) 324 & /1,'LW RAD TEMP TNDY ',251,119/ 325 DATA IFILV(141),AVBL(141),IQ(141),IS(141) 326 & /1,'INSTN OUT SFC SW RAD',211,001/ 327 DATA IFILV(142),AVBL(142),IQ(142),IS(142) Page 6 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 328 & /1,'INSTN OUT SFC LW RAD',212,001/ 329 DATA IFILV(126),AVBL(126),IQ(126),IS(126) 330 & /1,'AVE INCMG SFC SW RAD',204,001/ 331 DATA IFILV(127),AVBL(127),IQ(127),IS(127) 332 & /1,'AVE INCMG SFC LW RAD',205,001/ 333 DATA IFILV(128),AVBL(128),IQ(128),IS(128) 334 & /1,'AVE OUTGO SFC SW RAD',211,001/ 335 DATA IFILV(129),AVBL(129),IQ(129),IS(129) 336 & /1,'AVE OUTGO SFC LW RAD',212,001/ 337 DATA IFILV(130),AVBL(130),IQ(130),IS(130) 338 & /1,'AVE OUTGO TOA SW RAD',211,008/ 339 DATA IFILV(131),AVBL(131),IQ(131),IS(131) 340 & /1,'AVE OUTGO TOA LW RAD',212,008/ 341 DATA IFILV(156),AVBL(156),IQ(156),IS(156) 342 & /1,'INSTN INC SFC SW RAD',204,001/ 343 DATA IFILV(157),AVBL(157),IQ(157),IS(157) 344 & /1,'INSTN INC SFC LW RAD',205,001/ 345 DATA IFILV(044),AVBL(044),IQ(044),IS(044) 346 & /1,'ROUGHNESS LENGTH ',083,001/ 347 DATA IFILV(045),AVBL(045),IQ(045),IS(045) 348 & /1,'FRICTION VELOCITY ',253,001/ 349 DATA IFILV(132),AVBL(132),IQ(132),IS(132) 350 & /1,'SFC DRAG COEFFICIENT',252,001/ 351 DATA IFILV(133),AVBL(133),IQ(133),IS(133) 352 & /0,'SFC U WIND STRESS ',124,001/ 353 DATA IFILV(134),AVBL(134),IQ(134),IS(134) 354 & /0,'SFC V WIND STRESS ',125,001/ 355 DATA IFILV(043),AVBL(043),IQ(043),IS(043) 356 & /1,'AVE SFC SENHEAT FX ',122,001/ 357 DATA IFILV(135),AVBL(135),IQ(135),IS(135) 358 & /1,'AVE GROUND HEAT FX ',155,001/ 359 DATA IFILV(136),AVBL(136),IQ(136),IS(136) 360 & /1,'AVE SNO PHSCNG HT FX',229,001/ 361 DATA IFILV(042),AVBL(042),IQ(042),IS(042) 362 & /1,'AVE SFC LATHEAT FX ',121,001/ 363 DATA IFILV(046),AVBL(046),IQ(046),IS(046) 364 & /1,'AVE SFC MOMENTUM FX ',172,001/ 365 DATA IFILV(047),AVBL(047),IQ(047),IS(047) 366 & /1,'ACC SFC EVAPORATION ',057,001/ 367 DATA IFILV(137),AVBL(137),IQ(137),IS(137) 368 & /1,'ACC POT EVAPORATION ',228,001/ 369 DATA IFILV(154),AVBL(154),IQ(154),IS(154) 370 & /1,'INST SFC SENHEAT FX ',122,001/ 371 DATA IFILV(155),AVBL(155),IQ(155),IS(155) 372 & /1,'INST SFC LATHEAT FX ',121,001/ 373 DATA IFILV(048),AVBL(048),IQ(048),IS(048) 374 & /1,'LATITUDE ',176,001/ 375 DATA IFILV(049),AVBL(049),IQ(049),IS(049) 376 & /1,'LONGITUDE ',177,001/ 377 DATA IFILV(050),AVBL(050),IQ(050),IS(050) 378 & /1,'LAND/SEA MASK ',081,001/ 379 DATA IFILV(051),AVBL(051),IQ(051),IS(051) 380 & /1,'SEA ICE MASK ',091,001/ 381 DATA IFILV(052),AVBL(052),IQ(052),IS(052) 382 & /1,'MASS POINT ETA SFC ',173,001/ 383 DATA IFILV(053),AVBL(053),IQ(053),IS(053) 384 & /1,'VEL POINT ETA SFC ',174,001/ Page 7 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 385 DATA IFILV(150),AVBL(150),IQ(150),IS(150) 386 & /1,'SFC MIDDAY ALBEDO ',084,001/ 387 DATA IFILV(151),AVBL(151),IQ(151),IS(151) 388 & /1,'SEA SFC TEMPERATURE ',080,001/ 389 DATA IFILV(054),AVBL(054),IQ(054),IS(054) 390 & /1,'PRESS AT TROPOPAUSE ',001,007/ 391 DATA IFILV(055),AVBL(055),IQ(055),IS(055) 392 & /1,'TEMP AT TROPOPAUSE ',011,007/ 393 DATA IFILV(108),AVBL(108),IQ(108),IS(108) 394 & /1,'POTENTL TEMP AT TROP',013,007/ 395 DATA IFILV(056),AVBL(056),IQ(056),IS(056) 396 & /0,'U WIND AT TROPOPAUSE',033,007/ 397 DATA IFILV(057),AVBL(057),IQ(057),IS(057) 398 & /0,'V WIND AT TROPOPAUSE',034,007/ 399 DATA IFILV(058),AVBL(058),IQ(058),IS(058) 400 & /1,'SHEAR AT TROPOPAUSE ',136,007/ 401 DATA IFILV(059),AVBL(059),IQ(059),IS(059) 402 & /1,'TEMP AT FD HEIGHTS ',011,103/ 403 DATA IFILV(060),AVBL(060),IQ(060),IS(060) 404 & /0,'U WIND AT FD HEIGHTS',033,103/ 405 DATA IFILV(061),AVBL(061),IQ(061),IS(061) 406 & /0,'V WIND AT FD HEIGHTS',034,103/ 407 DATA IFILV(062),AVBL(062),IQ(062),IS(062) 408 & /1,'HEIGHT OF FRZ LVL ',007,004/ 409 DATA IFILV(063),AVBL(063),IQ(063),IS(063) 410 & /1,'REL HUMID AT FRZ LVL',052,004/ 411 DATA IFILV(165),AVBL(165),IQ(165),IS(165) 412 & /1,'HIGHEST FREEZE LVL ',007,204/ 413 DATA IFILV(067),AVBL(067),IQ(067),IS(067) 414 & /1,'PRESS IN BNDRY LYR ',001,116/ 415 DATA IFILV(068),AVBL(068),IQ(068),IS(068) 416 & /1,'TEMP IN BNDRY LYR ',011,116/ 417 DATA IFILV(069),AVBL(069),IQ(069),IS(069) 418 & /1,'POT TMP IN BNDRY LYR',013,116/ 419 DATA IFILV(070),AVBL(070),IQ(070),IS(070) 420 & /1,'DWPT IN BNDRY LYR ',017,116/ 421 DATA IFILV(071),AVBL(071),IQ(071),IS(071) 422 & /1,'SPC HUM IN BNDRY LYR',051,116/ 423 DATA IFILV(072),AVBL(072),IQ(072),IS(072) 424 & /1,'REL HUM IN BNDRY LYR',052,116/ 425 DATA IFILV(088),AVBL(088),IQ(088),IS(088) 426 & /1,'MST CNV IN BNDRY LYR',135,116/ 427 DATA IFILV(089),AVBL(089),IQ(089),IS(089) 428 & /1,'P WATER IN BNDRY LYR',054,116/ 429 DATA IFILV(073),AVBL(073),IQ(073),IS(073) 430 & /0,'U WIND IN BNDRY LYR ',033,116/ 431 DATA IFILV(074),AVBL(074),IQ(074),IS(074) 432 & /0,'V WIND IN BNDRY LYR ',034,116/ 433 DATA IFILV(090),AVBL(090),IQ(090),IS(090) 434 & /1,'OMEGA IN BNDRY LYR ',039,116/ 435 DATA IFILV(066),AVBL(066),IQ(066),IS(066) 436 & /1,'LFM 0.33-1.00 RELHUM',052,108/ 437 DATA IFILV(081),AVBL(081),IQ(081),IS(081) 438 & /1,'LFM 0.66-1.00 RELHUM',052,108/ 439 DATA IFILV(082),AVBL(082),IQ(082),IS(082) 440 & /1,'LFM 0.33-0.66 RELHUM',052,108/ 441 DATA IFILV(104),AVBL(104),IQ(104),IS(104) Page 8 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 442 & /1,'LFM 0.33-1.00 PWAT ',054,108/ 443 DATA IFILV(091),AVBL(091),IQ(091),IS(091) 444 & /1,'NGM 0.98230 PRESSURE',001,107/ 445 DATA IFILV(092),AVBL(092),IQ(092),IS(092) 446 & /1,'NGM 0.98230 TMPRATUR',011,107/ 447 DATA IFILV(093),AVBL(093),IQ(093),IS(093) 448 & /1,'NGM 0.98230 SPC HUM ',051,107/ 449 DATA IFILV(094),AVBL(094),IQ(094),IS(094) 450 & /1,'NGM 0.98230 REL HUM ',052,107/ 451 DATA IFILV(095),AVBL(095),IQ(095),IS(095) 452 & /0,'NGM 0.98230 U WIND ',033,107/ 453 DATA IFILV(096),AVBL(096),IQ(096),IS(096) 454 & /0,'NGM 0.98230 V WIND ',034,107/ 455 DATA IFILV(097),AVBL(097),IQ(097),IS(097) 456 & /1,'NGM 0.89671 TMPRATUR',011,107/ 457 DATA IFILV(098),AVBL(098),IQ(098),IS(098) 458 & /1,'NGM 0.78483 TMPRATUR',011,107/ 459 DATA IFILV(099),AVBL(099),IQ(099),IS(099) 460 & /1,'NGM 0.47-1.00 RELHUM',052,108/ 461 DATA IFILV(100),AVBL(100),IQ(100),IS(100) 462 & /1,'NGM 0.47-0.96 RELHUM',052,108/ 463 DATA IFILV(101),AVBL(101),IQ(101),IS(101) 464 & /1,'NGM 0.18-0.47 RELHUM',052,108/ 465 DATA IFILV(102),AVBL(102),IQ(102),IS(102) 466 & /1,'NGM 0.84-0.98 RELHUM',052,108/ 467 DATA IFILV(103),AVBL(103),IQ(103),IS(103) 468 & /1,'NGM 0.85-1.00 QCONVG',135,108/ 469 DATA IFILV(173),AVBL(173),IQ(173),IS(173) 470 & /1,'MAX WIND PRESS LEVEL',001,006/ 471 DATA IFILV(174),AVBL(174),IQ(174),IS(174) 472 & /1,'MAX WIND HGHT LEVEL ',007,006/ 473 DATA IFILV(175),AVBL(175),IQ(175),IS(175) 474 & /0,'U COMP MAX WIND ',033,006/ 475 DATA IFILV(176),AVBL(176),IQ(176),IS(176) 476 & /0,'V COMP MAX WIND ',034,006/ 477 DATA IFILV(177),AVBL(177),IQ(177),IS(177) 478 & /1,'HEIGHT AT TROPOPAUSE',007,007/ 479 DATA IFILV(178),AVBL(178),IQ(178),IS(178) 480 & /1,'CLOUD BOTTOM HEIGHT ',007,002/ 481 DATA IFILV(179),AVBL(179),IQ(179),IS(179) 482 & /1,'CLOUD TOP HEIGHT ',007,003/ 483 DATA IFILV(180),AVBL(180),IQ(180),IS(180) 484 & /1,'VISIBILITY ',020,001/ 485 C 486 DATA IFILV(185),AVBL(185),IQ(185),IS(185) 487 & /1,'TEMP AT 10 M ',011,105/ 488 DATA IFILV(186),AVBL(186),IQ(186),IS(186) 489 & /1,'PRESS AT 10 M ',001,105/ 490 DATA IFILV(189),AVBL(189),IQ(189),IS(189) 491 & /1,'TEMP AT 30 M ',011,105/ 492 DATA IFILV(190),AVBL(190),IQ(190),IS(190) 493 & /1,'PRESS AT 30 M ',001,105/ 494 DATA IFILV(191),AVBL(191),IQ(191),IS(191) 495 & /1,'POT TEMP AT 30 M ',013,105/ 496 DATA IFILV(192),AVBL(192),IQ(192),IS(192) 497 & /1,'SPEC HUM AT 30 M ',051,105/ 498 DATA IFILV(193),AVBL(193),IQ(193),IS(193) Page 9 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 499 & /0,'U WIND AT 30 M ',033,105/ 500 DATA IFILV(194),AVBL(194),IQ(194),IS(194) 501 & /0,'V WIND AT 30 M ',034,105/ 502 C 503 DATA IFILV(200),AVBL(200),IQ(200),IS(200) 504 & /1,'DQADV ',209,200/ 505 DATA IFILV(201),AVBL(201),IQ(201),IS(201) 506 & /1,'WVCONV ',237,200/ 507 DATA IFILV(202),AVBL(202),IQ(202),IS(202) 508 & /1,'WCCONV ',241,200/ 509 DATA IFILV(203),AVBL(203),IQ(203),IS(203) 510 & /0,'WVUFLX ',242,200/ 511 DATA IFILV(204),AVBL(204),IQ(204),IS(204) 512 & /0,'WVVFLX ',243,200/ 513 DATA IFILV(205),AVBL(205),IQ(205),IS(205) 514 & /0,'WCUFLX ',244,200/ 515 DATA IFILV(206),AVBL(206),IQ(206),IS(206) 516 & /0,'WCVFLX ',245,200/ 517 DATA IFILV(207),AVBL(207),IQ(207),IS(207) 518 & /1,'WVINC ',232,200/ 519 DATA IFILV(208),AVBL(208),IQ(208),IS(208) 520 & /1,'WCINC ',233,200/ 521 ! H CHUANG--ADD FIXED AND LSM FIELDS 522 DATA IFILV(218),AVBL(218),IQ(218),IS(218) 523 & /1,'VEGETATION TYPE ',225,001/ 524 DATA IFILV(219),AVBL(219),IQ(219),IS(219) 525 & /1,'SOIL TYPE ',224,001/ 526 DATA IFILV(220),AVBL(220),IQ(220),IS(220) 527 & /1,'CANOPY CONDUCTANCE ',181,001/ 528 DATA IFILV(221),AVBL(221),IQ(221),IS(221) 529 & /1,'PBL HEIGHT ',221,001/ 530 DATA IFILV(223),AVBL(223),IQ(223),IS(223) 531 & /1,'SLOPE TYPE ',222,001/ 532 DATA IFILV(224),AVBL(224),IQ(224),IS(224) 533 & /1,'SNOW DEPTH ',066,001/ 534 DATA IFILV(225),AVBL(225),IQ(225),IS(225) 535 & /1,'LIQUID SOIL MOISTURE',160,112/ 536 DATA IFILV(226),AVBL(226),IQ(226),IS(226) 537 & /1,'SNOW FREE ALBEDO ',170,001/ 538 DATA IFILV(227),AVBL(227),IQ(227),IS(227) 539 & /1,'MAXIMUM SNOW ALBEDO ',159,001/ 540 DATA IFILV(228),AVBL(228),IQ(228),IS(228) 541 & /1,'CANOPY WATER EVAP ',200,001/ 542 DATA IFILV(229),AVBL(229),IQ(229),IS(229) 543 & /1,'DIRECT SOIL EVAP ',199,001/ 544 DATA IFILV(230),AVBL(230),IQ(230),IS(230) 545 & /1,'PLANT TRANSPIRATION ',210,001/ 546 DATA IFILV(231),AVBL(231),IQ(231),IS(231) 547 & /1,'SNOW SUBLIMATION ',198,001/ 548 DATA IFILV(232),AVBL(232),IQ(232),IS(232) 549 & /1,'AIR DRY SOIL MOIST ',231,001/ 550 DATA IFILV(233),AVBL(233),IQ(233),IS(233) 551 & /1,'SOIL MOIST POROSITY ',240,001/ 552 DATA IFILV(234),AVBL(234),IQ(234),IS(234) 553 & /1,'MIN STOMATAL RESIST ',203,001/ 554 DATA IFILV(235),AVBL(235),IQ(235),IS(235) 555 & /1,'NO OF ROOT LAYERS ',171,001/ Page 10 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f 556 DATA IFILV(236),AVBL(236),IQ(236),IS(236) 557 & /1,'SOIL MOIST WILT PT ',219,001/ 558 DATA IFILV(237),AVBL(237),IQ(237),IS(237) 559 & /1,'SOIL MOIST REFERENCE',230,001/ 560 DATA IFILV(238),AVBL(238),IQ(238),IS(238) 561 & /1,'CANOPY COND SOLAR ',246,001/ 562 DATA IFILV(239),AVBL(239),IQ(239),IS(239) 563 & /1,'CANOPY COND TEMP ',247,001/ 564 DATA IFILV(240),AVBL(240),IQ(240),IS(240) 565 & /1,'CANOPY COND HUMID ',248,001/ 566 DATA IFILV(241),AVBL(241),IQ(241),IS(241) 567 & /1,'CANOPY COND SOILM ',249,001/ 568 DATA IFILV(242),AVBL(242),IQ(242),IS(242) 569 & /1,'POTENTIAL EVAP ',145,001/ 570 571 ! DUSAN JOVIC - TWO ADDITIONAL FIELDS FOR NARR 572 ! INTERPOLATED IN PRDGEN USING NEAREST NEIGHBOR OPTION 573 ! 574 DATA IFILV(245),AVBL(245),IQ(245),IS(245) 575 & /1,'SURFACE HEIGHT NN ',218,001/ 576 DATA IFILV(246),AVBL(246),IQ(246),IS(246) 577 & /1,'ACM TOTAL PRECIP NN ',202,001/ 578 DATA IFILV(247),AVBL(247),IQ(247),IS(247) 579 & /1,'SURFACE PRESSURE NN ',134,001/ 580 581 END SYMBOL CROSS REFERENCE Name Object Declared Type Bytes Dimen Elements Attributes References IDIM1 Param 17 I(4) 4 scalar IDIM2 Param 17 I(4) 4 scalar IGSTL Param 12 I(4) 4 scalar 17 IGSTR Param 12 I(4) 4 scalar 17 IM Param 6 I(4) 4 scalar 14,17,24 IMX Param 24 I(4) 4 scalar INPES Param 9 I(4) 4 scalar 14,17 IOUNIT Common 33 20 SAVE ITAIL Param 14 I(4) 4 scalar JDIM1 Param 18 I(4) 4 scalar JDIM2 Param 18 I(4) 4 scalar JGSTL Param 13 I(4) 4 scalar 18 JGSTR Param 13 I(4) 4 scalar 18 JM Param 6 I(4) 4 scalar 15,18,24 JMX Param 24 I(4) 4 scalar JNPES Param 9 I(4) 4 scalar 15,18 JTAIL Param 15 I(4) 4 scalar LM Param 6 I(4) 4 scalar 24 LSM Param 6 I(4) 4 scalar MXFLD Param 24 I(4) 4 scalar 80,86,87,88,89 MXLVL Param 24 I(4) 4 scalar 88 OPTIONS Common 27 24 SAVE POSTDATA Block 1 scalar RQSTFLD Common 85 64130 Page 11 Source Listing POSTDATA 2025-03-12 18:23 Symbol Table POSTDATA.f TYPE COMPONENTS/COMMON VARIABLES Name Type Bytes Offset Dimen Elements Attributes References AVBL CHAR 20 59130 1 250 COM,SAVE 125,127,129,131,133,135,137,139,14 1,143,145,147,149,151,153,155,157, 159,161,163,165,167,169,171,173,17 5,177,179,181,183,185,187,189,191, 193,195,197,199,201,203,205,207,20 9,211,213,215,217,219,221,223,225, 227,229,231,233,235,237,239,241,24 3,245,247,249,251,253,255,257,259, 261,263,265,267,269,271,273,275,27 7,279,281,283,285,287,289,291,293, 295,297,299,301,303,305,307,309,31 1,313,315,317,319,321,323,325,327, 329,331,333,335,337,339,341,343,34 5,347,349,351,353,355,357,359,361, 363,365,367,369,371,373,375,377,37 9,381,383,385,387,389,391,393,395, 397,399,401,403,405,407,409,411,41 3,415,417,419,421,423,425,427,429, 431,433,435,437,439,441,443,445,44 7,449,451,453,455,457,459,461,463, 465,467,469,471,473,475,477,479,48 1,483,486,488,490,492,494,496,498, 500,503,505,507,509,511,513,515,51 7,519,522,524,526,528,530,532,534, 536,538,540,542,544,546,548,550,55 2,554,556,558,560,562,564,566,568, 574,576,578 DATSET CHAR 6 54124 scalar COM DEC R(4) 4 1016 1 250 COM FIELD CHAR 20 54130 1 250 COM IBESSL I(4) 4 4 scalar COM,SAVE 92 ID I(4) 4 54016 1 25 COM IDENT I(4) 4 52016 1 250 COM IFILV I(4) 4 53016 1 250 COM,SAVE 125,127,129,131,133,135,137,139,14 1,143,145,147,149,151,153,155,157, 159,161,163,165,167,169,171,173,17 5,177,179,181,183,185,187,189,191, 193,195,197,199,201,203,205,207,20 9,211,213,215,217,219,221,223,225, 227,229,231,233,235,237,239,241,24 3,245,247,249,251,253,255,257,259, 261,263,265,267,269,271,273,275,27 7,279,281,283,285,287,289,291,293, 295,297,299,301,303,305,307,309,31 1,313,315,317,319,321,323,325,327, 329,331,333,335,337,339,341,343,34 5,347,349,351,353,355,357,359,361, 363,365,367,369,371,373,375,377,37 9,381,383,385,387,389,391,393,395, 397,399,401,403,405,407,409,411,41 3,415,417,419,421,423,425,427,429, 431,433,435,437,439,441,443,445,44 7,449,451,453,455,457,459,461,463, Page 12 Source Listing POSTDATA 2025-03-12 18:23 Symbol Table POSTDATA.f Name Type Bytes Offset Dimen Elements Attributes References 465,467,469,471,473,475,477,479,48 1,483,486,488,490,492,494,496,498, 500,503,505,507,509,511,513,515,51 7,519,522,524,526,528,530,532,534, 536,538,540,542,544,546,548,550,55 2,554,556,558,560,562,564,566,568, 574,576,578 IFLAG I(4) 4 16 scalar COM,SAVE 95 IGET I(4) 4 16 1 250 COM IOFFS I(4) 4 12 scalar COM,SAVE 94 IOUTYP I(4) 4 4 scalar COM IQ I(4) 4 2016 1 250 COM,SAVE 125,127,129,131,133,135,137,139,14 1,143,145,147,149,151,153,155,157, 159,161,163,165,167,169,171,173,17 5,177,179,181,183,185,187,189,191, 193,195,197,199,201,203,205,207,20 9,211,213,215,217,219,221,223,225, 227,229,231,233,235,237,239,241,24 3,245,247,249,251,253,255,257,259, 261,263,265,267,269,271,273,275,27 7,279,281,283,285,287,289,291,293, 295,297,299,301,303,305,307,309,31 1,313,315,317,319,321,323,325,327, 329,331,333,335,337,339,341,343,34 5,347,349,351,353,355,357,359,361, 363,365,367,369,371,373,375,377,37 9,381,383,385,387,389,391,393,395, 397,399,401,403,405,407,409,411,41 3,415,417,419,421,423,425,427,429, 431,433,435,437,439,441,443,445,44 7,449,451,453,455,457,459,461,463, 465,467,469,471,473,475,477,479,48 1,483,486,488,490,492,494,496,498, 500,503,505,507,509,511,513,515,51 7,519,522,524,526,528,530,532,534, 536,538,540,542,544,546,548,550,55 2,554,556,558,560,562,564,566,568, 574,576,578 IS I(4) 4 3016 1 250 COM,SAVE 125,127,129,131,133,135,137,139,14 1,143,145,147,149,151,153,155,157, 159,161,163,165,167,169,171,173,17 5,177,179,181,183,185,187,189,191, 193,195,197,199,201,203,205,207,20 9,211,213,215,217,219,221,223,225, 227,229,231,233,235,237,239,241,24 3,245,247,249,251,253,255,257,259, 261,263,265,267,269,271,273,275,27 7,279,281,283,285,287,289,291,293, 295,297,299,301,303,305,307,309,31 1,313,315,317,319,321,323,325,327, 329,331,333,335,337,339,341,343,34 5,347,349,351,353,355,357,359,361, 363,365,367,369,371,373,375,377,37 9,381,383,385,387,389,391,393,395, 397,399,401,403,405,407,409,411,41 Page 13 Source Listing POSTDATA 2025-03-12 18:23 Symbol Table POSTDATA.f Name Type Bytes Offset Dimen Elements Attributes References 3,415,417,419,421,423,425,427,429, 431,433,435,437,439,441,443,445,44 7,449,451,453,455,457,459,461,463, 465,467,469,471,473,475,477,479,48 1,483,486,488,490,492,494,496,498, 500,503,505,507,509,511,513,515,51 7,519,522,524,526,528,530,532,534, 536,538,540,542,544,546,548,550,55 2,554,556,558,560,562,564,566,568, 574,576,578 ISMFUL I(4) 4 5016 1 250 COM ISMOUT I(4) 4 6016 1 250 COM ISMSTG I(4) 4 4016 1 250 COM KGTYPE I(4) 4 0 scalar COM KSB I(4) 4 8 scalar COM,SAVE 93 LCNTRL I(4) 4 4 scalar COM,SAVE 100 LUNCO I(4) 4 8 scalar COM,SAVE 101 LUNLL I(4) 4 12 scalar COM,SAVE 101 LUNOUT I(4) 4 16 scalar COM,SAVE 102 LVLS I(4) 4 7016 2 11250 COM NFLD I(4) 4 12 scalar COM RITE2 L(4) 4 54120 scalar COM,SAVE 98 RITEHD L(4) 4 54116 scalar COM,SAVE 98 SATDEL R(4) 4 20 scalar COM,SAVE 96 SPVAL R(4) 4 0 scalar COM,SAVE 91 STDOUT I(4) 4 0 scalar COM,SAVE 100 SVALUE R(4) 4 8 scalar COM Page 14 Source Listing POSTDATA 2025-03-12 18:23 Subprograms/Common Blocks POSTDATA.f SUBPROGRAMS/COMMON BLOCKS Name Object Declared Type Bytes Dimen Elements Attributes References IOUNIT Common 33 20 SAVE OPTIONS Common 27 24 SAVE POSTDATA Block 1 scalar RQSTFLD Common 85 64130 COMPILER OPTIONS BEING USED -align noall -align nonone -align nocommons -align nodcommons -align noqcommons -align nozcommons -align records -align nosequence -align norec1byte -align norec2byte -align norec4byte -align norec8byte -align norec16byte -align norec32byte -align norec64byte -align noarray8byte -align noarray16byte -align noarray32byte -align noarray64byte -align noarray128byte -align noarray256byte -altparam -assume accuracy_sensitive -assume nobscc -assume nobuffered_io -assume nobuffered_stdout -assume byterecl -assume nocontiguous_assumed_shape -assume nocontiguous_pointer -assume nocc_omp -assume nocstring -assume nodummy_aliases -assume nofpe_summary -assume noieee_fpe_flags -assume nominus0 -assume noold_boz -assume old_complex_align -assume old_unit_star -assume old_inquire_recl -assume old_ldout_format -assume old_ldout_zero -assume noold_logical_assign -assume noold_logical_ldio -assume old_maxminloc -assume old_xor -assume noprotect_allocates -assume protect_constants -assume noprotect_parens -assume split_common -assume source_include -assume nostd_intent_in -assume std_minus0_rounding -assume nostd_mod_proc_name -assume std_value -assume realloc_lhs -assume underscore -assume no2underscores -assume norecursion no -auto -auto_scalar no -bintext -ccdefault default -check noarg_temp_created -check noassume -check nobounds -check nocontiguous -check noformat -check nooutput_conversion -check nooverflow -check nopointers -check noshape -check nostack -check nouninitialized -check noudio_iostat -coarray-num-procs 0 no -coarray-config-file -convert big_endian -cross_reference -D __INTEL_COMPILER=1910 -D __INTEL_COMPILER_UPDATE=3 -D __unix__ -D __unix -D __linux__ -D __linux -D __gnu_linux__ -D unix -D linux -D __ELF__ Page 15 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f -D __x86_64 -D __x86_64__ -D __amd64 -D __amd64__ -D __INTEL_COMPILER_BUILD_DATE=20200925 -D __INTEL_OFFLOAD -D __MMX__ -D __SSE__ -D __SSE_MATH__ -D __SSE2__ -D __SSE2_MATH__ -D __SSE3__ -D __SSSE3__ -D __SSE4_1__ -D __SSE4_2__ -D __POPCNT__ -D __PCLMUL__ -D __AES__ -D __AVX__ -D __F16C__ -D __AVX_I__ -D __RDRND__ -D __FMA__ -D __FP_FAST_FMA -D __FP_FAST_FMAF -D __BMI__ -D __LZCNT__ -D __AVX2__ -D __haswell -D __haswell__ -D __tune_haswell__ -D __core_avx2 -D __core_avx2__ -D __tune_core_avx2__ -D __CRAY_X86_ROME -D __CRAYXT_COMPUTE_LINUX_TARGET -double_size 64 no -d_lines no -Qdyncom -error_limit 30 no -f66 no -f77rtl no -fast -fpscomp nofilesfromcmd -fpscomp nogeneral -fpscomp noioformat -fpscomp noldio_spacing -fpscomp nologicals -fixed no -fpconstant -fpe3 -fprm nearest no -ftz -fp_model noprecise -fp_model fast -fp_model nostrict -fp_model nosource -fp_model nodouble -fp_model noextended -fp_model novery_fast -fp_model noexcept -fp_model nono_except -heap_arrays 0 no -threadprivate_compat -g2 -iface nomixed_str_len_arg -iface nono_mixed_str_len_arg -init noarrays -init nohuge -init noinfinity -init nominus_huge -init nominus_infinity -init nominus_tiny -init nonan -init nosnan -init notiny -init nozero no -intconstant -integer_size 32 no -mixed_str_len_arg no -module -names lowercase no -noinclude no -o -offload-build=host -openmp-simd -O2 no -pad_source -real_size 32 no -recursive -reentrancy threaded -vec=simd -show nofullpath -show noinclude -show map -show options no -syntax_only no -threadcom no -U no -vms -w noall -w nonone -w alignments -w nodeclarations -w noexternals -w general -w noignore_bounds -w noignore_loc -w nointerfaces -w noshape -w notruncated_source -w uncalled -w uninitialized -w nounused Page 16 Source Listing POSTDATA 2025-03-12 18:23 POSTDATA.f -w usage no -wrap-margins -includepath : /pe/intel/compilers_and_libraries_2020.4.304/linux/pstl/include/,/pe/intel/compilers_and_libraries_2020.4.304/linux/compiler/include/, .f90,./.f90,/opt/cray/pe/mpich/8.1.12/ofi/intel/19.0/include/.f90,/pe/intel/compilers_and_libraries_2020.4.304/linux/ipp/include/.f90, /pe/intel/compilers_and_libraries_2020.4.304/linux/mkl/include/.f90,/pe/intel/compilers_and_libraries_2020.4.304/linux/pstl/include/.f90, /pe/intel/compilers_and_libraries_2020.4.304/linux/pstl/stdlib/.f90,/pe/intel/compilers_and_libraries_2020.4.304/linux/tbb/include/.f90, /pe/intel/compilers_and_libraries_2020.4.304/linux/compiler/include/intel64/.f90,/pe/intel/compilers_and_libraries_2020.4.304/linux/compiler/include/icc/.f90, /pe/intel/compilers_and_libraries_2020.4.304/linux/compiler/include/.f90,/usr/lib64/gcc/x86_64-suse-linux/7/include/.f90, /usr/lib64/gcc/x86_64-suse-linux/7/include-fixed/.f90,/usr/include/.f90,/usr/include/.f90,/usr/include/.f90 -list filename : POSTDATA.lst no -o COMPILER: Intel(R) Fortran 19.1-1655