Page 1 Source Listing CHKSNOW 2025-03-12 18:22 /tmp/ifortWeuuyr.i 1 # 1 "CHKSNOW.F" 2 subroutine chksnow 3 c 4 c At the first physics time step after the top of each hour, check the snow 5 c array against the SR (snow/total precip ratio). If SR .ge. 0.9, set this 6 c point to missing (so we won't do snow adjustment here). 7 c 8 INCLUDE "parmeta" 32 INCLUDE "mpif.h" 594 INCLUDE "mpp.h" 653 P A R A M E T E R 654 & (ITB=76,JTB=134,ITBQ=152,JTBQ=440,LP1=LM+1) 655 C----------------------------------------------------------------------- 656 INCLUDE "PPTASM.comm" 657 C----------------------------------------------------------------------- 681 INCLUDE "CLDWTR.comm" 682 C----------------------------------------------------------------------- 690 INCLUDE "CTLBLK.comm" 691 C----------------------------------------------------------------------- 701 INCLUDE "PHYS2.comm" 702 C----------------------------------------------------------------------- 730 P A R A M E T E R 731 & (RTD=57.2957795) 732 C 733 TIMES=(NTSD-1)*DT 734 if (mod(times,3600.) .lt. nphs*dt) then 735 ihr=(times-1.0)/3600.+1 736 call loc2glb(sr,temp1) 737 if (mype.eq.0) then 738 write(98,*) 'NTSD=', NTSD,' times=', times,' output SR:' 739 write(90) temp1 740 endif 741 DO 20 J=MYJS,MYJE 742 DO 10 I=MYIS,MYIE 743 C 744 C In the operational Eta, we do not use the data in the area where ETA 745 C thinks it's snowing (we use sr(i,j).ge.0.9 as criterion), because the 746 C real-time hourly observations (radar or gauge) are highly unreliable. 747 C For reanalysis, more reliable hourly snow observations may be available 748 C within CONUS, so we are changing it to 'mask out the precip data when 749 C it's north of 49N and likely to be snowing'. 750 C 751 C OPNL if (sr(i,j).ge.0.9) pptdat(i,j,ihr) = 999. 752 if (glat(i,j)*RTD.ge.49. .and. sr(i,j).ge.0.9) 753 & pptdat(i,j,ihr) = 999. 754 10 continue 755 20 continue 756 endif 757 return 758 end Page 2 Source Listing CHKSNOW 2025-03-12 18:22 Entry Points CHKSNOW.F ENTRY POINTS Name chksnow_ SYMBOL CROSS REFERENCE Name Object Declared Type Bytes Dimen Elements Attributes References 10 Label 754 742 20 Label 755 741 CHKSNOW Subr 2 CLDWTR Common 684 1213608 SAVE CTLBLK Common 695 112 SAVE GLB_TABLE Common 631 336 SAVE I Local 742 I(4) 4 scalar 742,752,753 IDIM1 Param 28 I(4) 4 scalar 659,660,662,663,685,687,715,716,71 7,718,719,720,721,722,723,724,725 IDIM2 Param 28 I(4) 4 scalar 659,660,662,663,685,687,715,716,71 7,718,719,720,721,722,723,724,725 IGSTL Param 23 I(4) 4 scalar 28 IGSTR Param 23 I(4) 4 scalar 28 IHR Local 735 I(4) 4 scalar 735,753 IM Param 11 I(4) 4 scalar 25,28,637,638,639,640,641,645,646, 651 INPES Param 20 I(4) 4 scalar 25,28,621,622,623,632,633 ITAIL Param 25 I(4) 4 scalar ITB Param 654 I(4) 4 scalar 712,727 ITBQ Param 654 I(4) 4 scalar 713,727 J Local 741 I(4) 4 scalar 741,752,753 JDIM1 Param 29 I(4) 4 scalar 659,660,662,663,685,687,715,716,71 7,718,719,720,721,722,723,724,725 JDIM2 Param 29 I(4) 4 scalar 659,660,662,663,685,687,715,716,71 7,718,719,720,721,722,723,724,725 JGSTL Param 24 I(4) 4 scalar 29 JGSTR Param 24 I(4) 4 scalar 29 JM Param 11 I(4) 4 scalar 26,29,637,638,639,640,641,645,646, 651 JNPES Param 20 I(4) 4 scalar 26,29,621,622,623,632,633 JTAIL Param 26 I(4) 4 scalar JTB Param 654 I(4) 4 scalar 712,727 JTBQ Param 654 I(4) 4 scalar 727 LM Param 11 I(4) 4 scalar 646,654,659,685,686,711 LOC2GLB Subr 736 736 LP1 Param 654 I(4) 4 scalar 711 LSM Param 11 I(4) 4 scalar MAPPINGS Common 650 5024 SAVE MOD Func 734 scalar 734 MPIFCMB5 Common 582 4 SAVE MPIFCMB9 Common 583 4 SAVE MPIPRIV1 Common 587 28 SAVE MPIPRIV2 Common 589 24 SAVE MPIPRIVC Common 592 2 SAVE Page 3 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Object Declared Type Bytes Dimen Elements Attributes References MPI_2DOUBLE_PRECISION Param 328 I(4) 4 scalar MPI_2INT Param 412 I(4) 4 scalar MPI_2INTEGER Param 326 I(4) 4 scalar MPI_2REAL Param 330 I(4) 4 scalar MPI_ADDRESS_KIND Param 364 I(4) 4 scalar MPI_AINT Param 442 I(4) 4 scalar MPI_ANY_SOURCE Param 294 I(4) 4 scalar MPI_ANY_TAG Param 296 I(4) 4 scalar MPI_APPNUM Param 258 I(4) 4 scalar MPI_ASYNC_PROTECTS_NONBLOC KING Param 564 L(4) 4 scalar MPI_BAND Param 202 I(4) 4 scalar MPI_BOR Param 206 I(4) 4 scalar MPI_BSEND_OVERHEAD Param 290 I(4) 4 scalar MPI_BXOR Param 210 I(4) 4 scalar MPI_BYTE Param 334 I(4) 4 scalar MPI_CART Param 302 I(4) 4 scalar MPI_CHAR Param 372 I(4) 4 scalar MPI_CHARACTER Param 332 I(4) 4 scalar MPI_COMBINER_CONTIGUOUS Param 460 I(4) 4 scalar MPI_COMBINER_DARRAY Param 482 I(4) 4 scalar MPI_COMBINER_DUP Param 458 I(4) 4 scalar MPI_COMBINER_F90_COMPLEX Param 486 I(4) 4 scalar MPI_COMBINER_F90_INTEGER Param 488 I(4) 4 scalar MPI_COMBINER_F90_REAL Param 484 I(4) 4 scalar MPI_COMBINER_HINDEXED Param 472 I(4) 4 scalar MPI_COMBINER_HINDEXED_BLOC K Param 492 I(4) 4 scalar MPI_COMBINER_HINDEXED_INTE GER Param 470 I(4) 4 scalar MPI_COMBINER_HVECTOR Param 466 I(4) 4 scalar MPI_COMBINER_HVECTOR_INTEG ER Param 464 I(4) 4 scalar MPI_COMBINER_INDEXED Param 468 I(4) 4 scalar MPI_COMBINER_INDEXED_BLOCK Param 474 I(4) 4 scalar MPI_COMBINER_NAMED Param 456 I(4) 4 scalar MPI_COMBINER_RESIZED Param 490 I(4) 4 scalar MPI_COMBINER_STRUCT Param 478 I(4) 4 scalar MPI_COMBINER_STRUCT_INTEGE R Param 476 I(4) 4 scalar MPI_COMBINER_SUBARRAY Param 480 I(4) 4 scalar MPI_COMBINER_VECTOR Param 462 I(4) 4 scalar MPI_COMM_DUP_FN Subr 571 scalar MPI_COMM_NULL Param 226 I(4) 4 scalar MPI_COMM_NULL_COPY_FN Subr 572 scalar MPI_COMM_NULL_DELETE_FN Subr 571 scalar MPI_COMM_SELF Param 222 I(4) 4 scalar MPI_COMM_TYPE_SHARED Param 510 I(4) 4 scalar MPI_COMM_WORLD Param 220 I(4) 4 scalar MPI_COMPLEX Param 314 I(4) 4 scalar MPI_COMPLEX16 Param 360 I(4) 4 scalar MPI_COMPLEX32 Param 362 I(4) 4 scalar MPI_COMPLEX8 Param 358 I(4) 4 scalar MPI_CONGRUENT Param 174 I(4) 4 scalar MPI_CONVERSION_FN_NULL Subr 577 scalar Page 4 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Object Declared Type Bytes Dimen Elements Attributes References MPI_COUNT Param 446 I(4) 4 scalar MPI_COUNT_KIND Param 368 I(4) 4 scalar MPI_CXX_BOOL Param 448 I(4) 4 scalar MPI_CXX_DOUBLE_COMPLEX Param 452 I(4) 4 scalar MPI_CXX_FLOAT_COMPLEX Param 450 I(4) 4 scalar MPI_CXX_LONG_DOUBLE_COMPLE X Param 454 I(4) 4 scalar MPI_C_BOOL Param 432 I(4) 4 scalar MPI_C_COMPLEX Param 436 I(4) 4 scalar MPI_C_DOUBLE_COMPLEX Param 438 I(4) 4 scalar MPI_C_FLOAT_COMPLEX Param 434 I(4) 4 scalar MPI_C_LONG_DOUBLE_COMPLEX Param 440 I(4) 4 scalar MPI_DATATYPE_NULL Param 236 I(4) 4 scalar 351,449,451,453,455 MPI_DISPLACEMENT_CURRENT Param 560 I(8) 8 scalar MPI_DISTRIBUTE_BLOCK Param 552 I(4) 4 scalar MPI_DISTRIBUTE_CYCLIC Param 554 I(4) 4 scalar MPI_DISTRIBUTE_DFLT_DARG Param 558 I(4) 4 scalar MPI_DISTRIBUTE_NONE Param 556 I(4) 4 scalar MPI_DIST_GRAPH Param 304 I(4) 4 scalar MPI_DOUBLE Param 394 I(4) 4 scalar MPI_DOUBLE_COMPLEX Param 316 I(4) 4 scalar MPI_DOUBLE_INT Param 406 I(4) 4 scalar MPI_DOUBLE_PRECISION Param 322 I(4) 4 scalar MPI_DUP_FN Subr 568 scalar MPI_ERRHANDLER_NULL Param 240 I(4) 4 scalar MPI_ERROR Param 41 I(4) 4 scalar MPI_ERRORS_ARE_FATAL Param 168 I(4) 4 scalar MPI_ERRORS_RETURN Param 170 I(4) 4 scalar MPI_ERR_ACCESS Param 160 I(4) 4 scalar MPI_ERR_AMODE Param 146 I(4) 4 scalar MPI_ERR_ARG Param 116 I(4) 4 scalar MPI_ERR_ASSERT Param 122 I(4) 4 scalar MPI_ERR_BAD_FILE Param 84 I(4) 4 scalar MPI_ERR_BASE Param 114 I(4) 4 scalar MPI_ERR_BUFFER Param 56 I(4) 4 scalar MPI_ERR_COMM Param 134 I(4) 4 scalar MPI_ERR_CONVERSION Param 150 I(4) 4 scalar MPI_ERR_COUNT Param 60 I(4) 4 scalar MPI_ERR_DIMS Param 98 I(4) 4 scalar MPI_ERR_DISP Param 82 I(4) 4 scalar MPI_ERR_DUP_DATAREP Param 64 I(4) 4 scalar MPI_ERR_FILE Param 94 I(4) 4 scalar MPI_ERR_FILE_EXISTS Param 76 I(4) 4 scalar MPI_ERR_FILE_IN_USE Param 118 I(4) 4 scalar MPI_ERR_GROUP Param 80 I(4) 4 scalar MPI_ERR_INFO Param 108 I(4) 4 scalar MPI_ERR_INFO_KEY Param 112 I(4) 4 scalar MPI_ERR_INFO_NOKEY Param 92 I(4) 4 scalar MPI_ERR_INFO_VALUE Param 78 I(4) 4 scalar MPI_ERR_INTERN Param 110 I(4) 4 scalar MPI_ERR_IN_STATUS Param 96 I(4) 4 scalar MPI_ERR_IO Param 156 I(4) 4 scalar MPI_ERR_KEYVAL Param 102 I(4) 4 scalar MPI_ERR_LASTCODE Param 124 I(4) 4 scalar MPI_ERR_LOCKTYPE Param 106 I(4) 4 scalar Page 5 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Object Declared Type Bytes Dimen Elements Attributes References MPI_ERR_NAME Param 100 I(4) 4 scalar MPI_ERR_NOT_SAME Param 128 I(4) 4 scalar MPI_ERR_NO_MEM Param 120 I(4) 4 scalar MPI_ERR_NO_SPACE Param 52 I(4) 4 scalar MPI_ERR_NO_SUCH_FILE Param 136 I(4) 4 scalar MPI_ERR_OP Param 154 I(4) 4 scalar MPI_ERR_OTHER Param 68 I(4) 4 scalar MPI_ERR_PENDING Param 58 I(4) 4 scalar MPI_ERR_PORT Param 140 I(4) 4 scalar MPI_ERR_QUOTA Param 144 I(4) 4 scalar MPI_ERR_RANK Param 66 I(4) 4 scalar MPI_ERR_READ_ONLY Param 104 I(4) 4 scalar MPI_ERR_REQUEST Param 148 I(4) 4 scalar MPI_ERR_RMA_ATTACH Param 70 I(4) 4 scalar MPI_ERR_RMA_CONFLICT Param 74 I(4) 4 scalar MPI_ERR_RMA_FLAVOR Param 90 I(4) 4 scalar MPI_ERR_RMA_RANGE Param 152 I(4) 4 scalar MPI_ERR_RMA_SHARED Param 142 I(4) 4 scalar MPI_ERR_RMA_SYNC Param 54 I(4) 4 scalar MPI_ERR_ROOT Param 86 I(4) 4 scalar MPI_ERR_SERVICE Param 62 I(4) 4 scalar MPI_ERR_SIZE Param 72 I(4) 4 scalar MPI_ERR_SPAWN Param 132 I(4) 4 scalar MPI_ERR_TAG Param 162 I(4) 4 scalar MPI_ERR_TOPOLOGY Param 166 I(4) 4 scalar MPI_ERR_TRUNCATE Param 126 I(4) 4 scalar MPI_ERR_TYPE Param 130 I(4) 4 scalar MPI_ERR_UNKNOWN Param 164 I(4) 4 scalar MPI_ERR_UNSUPPORTED_DATARE P Param 88 I(4) 4 scalar MPI_ERR_UNSUPPORTED_OPERAT ION Param 138 I(4) 4 scalar MPI_ERR_WIN Param 158 I(4) 4 scalar MPI_FILE_NULL Param 230 I(4) 4 scalar MPI_FLOAT Param 392 I(4) 4 scalar MPI_FLOAT_INT Param 404 I(4) 4 scalar MPI_GRAPH Param 300 I(4) 4 scalar MPI_GROUP_EMPTY Param 224 I(4) 4 scalar MPI_GROUP_NULL Param 232 I(4) 4 scalar MPI_HOST Param 248 I(4) 4 scalar MPI_IDENT Param 172 I(4) 4 scalar MPI_INFO_ENV Param 244 I(4) 4 scalar MPI_INFO_NULL Param 242 I(4) 4 scalar MPI_INT Param 384 I(4) 4 scalar MPI_INT16_T Param 418 I(4) 4 scalar MPI_INT32_T Param 420 I(4) 4 scalar MPI_INT64_T Param 422 I(4) 4 scalar MPI_INT8_T Param 416 I(4) 4 scalar MPI_INTEGER Param 324 I(4) 4 scalar MPI_INTEGER1 Param 342 I(4) 4 scalar MPI_INTEGER16 Param 350 I(4) 4 scalar MPI_INTEGER2 Param 344 I(4) 4 scalar MPI_INTEGER4 Param 346 I(4) 4 scalar MPI_INTEGER8 Param 348 I(4) 4 scalar MPI_INTEGER_KIND Param 370 I(4) 4 scalar Page 6 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Object Declared Type Bytes Dimen Elements Attributes References MPI_IO Param 250 I(4) 4 scalar MPI_KEYVAL_INVALID Param 288 I(4) 4 scalar MPI_LAND Param 200 I(4) 4 scalar MPI_LASTUSEDCODE Param 256 I(4) 4 scalar MPI_LB Param 338 I(4) 4 scalar MPI_LOCK_EXCLUSIVE Param 310 I(4) 4 scalar MPI_LOCK_SHARED Param 312 I(4) 4 scalar MPI_LOGICAL Param 318 I(4) 4 scalar MPI_LONG Param 388 I(4) 4 scalar MPI_LONG_DOUBLE Param 396 I(4) 4 scalar MPI_LONG_DOUBLE_INT Param 414 I(4) 4 scalar MPI_LONG_INT Param 408 I(4) 4 scalar MPI_LONG_LONG Param 402 I(4) 4 scalar MPI_LONG_LONG_INT Param 398 I(4) 4 scalar MPI_LOR Param 204 I(4) 4 scalar MPI_LXOR Param 208 I(4) 4 scalar MPI_MAX Param 192 I(4) 4 scalar MPI_MAXLOC Param 214 I(4) 4 scalar MPI_MAX_DATAREP_STRING Param 282 I(4) 4 scalar MPI_MAX_ERROR_STRING Param 270 I(4) 4 scalar MPI_MAX_INFO_KEY Param 276 I(4) 4 scalar MPI_MAX_INFO_VAL Param 278 I(4) 4 scalar MPI_MAX_LIBRARY_VERSION_ST RING Param 284 I(4) 4 scalar MPI_MAX_OBJECT_NAME Param 274 I(4) 4 scalar MPI_MAX_PORT_NAME Param 272 I(4) 4 scalar MPI_MAX_PROCESSOR_NAME Param 280 I(4) 4 scalar MPI_MESSAGE_NO_PROC Param 514 I(4) 4 scalar MPI_MESSAGE_NULL Param 512 I(4) 4 scalar MPI_MIN Param 194 I(4) 4 scalar MPI_MINLOC Param 212 I(4) 4 scalar MPI_MODE_APPEND Param 538 I(4) 4 scalar MPI_MODE_CREATE Param 534 I(4) 4 scalar MPI_MODE_DELETE_ON_CLOSE Param 530 I(4) 4 scalar MPI_MODE_EXCL Param 536 I(4) 4 scalar MPI_MODE_NOCHECK Param 500 I(4) 4 scalar MPI_MODE_NOPRECEDE Param 506 I(4) 4 scalar MPI_MODE_NOPUT Param 504 I(4) 4 scalar MPI_MODE_NOSTORE Param 502 I(4) 4 scalar MPI_MODE_NOSUCCEED Param 508 I(4) 4 scalar MPI_MODE_RDONLY Param 524 I(4) 4 scalar MPI_MODE_RDWR Param 526 I(4) 4 scalar MPI_MODE_SEQUENTIAL Param 540 I(4) 4 scalar MPI_MODE_UNIQUE_OPEN Param 532 I(4) 4 scalar MPI_MODE_WRONLY Param 528 I(4) 4 scalar MPI_NO_OP Param 218 I(4) 4 scalar MPI_NULL_COPY_FN Subr 568 scalar MPI_NULL_DELETE_FN Subr 568 scalar MPI_OFFSET Param 444 I(4) 4 scalar MPI_OFFSET_KIND Param 366 I(4) 4 scalar MPI_OP_NULL Param 234 I(4) 4 scalar MPI_ORDER_C Param 548 I(4) 4 scalar MPI_ORDER_FORTRAN Param 550 I(4) 4 scalar MPI_PACKED Param 340 I(4) 4 scalar MPI_PROC_NULL Param 292 I(4) 4 scalar Page 7 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Object Declared Type Bytes Dimen Elements Attributes References MPI_PROD Param 198 I(4) 4 scalar MPI_REAL Param 320 I(4) 4 scalar MPI_REAL16 Param 356 I(4) 4 scalar MPI_REAL4 Param 352 I(4) 4 scalar MPI_REAL8 Param 354 I(4) 4 scalar MPI_REPLACE Param 216 I(4) 4 scalar MPI_REQUEST_NULL Param 238 I(4) 4 scalar MPI_ROOT Param 298 I(4) 4 scalar MPI_SEEK_CUR Param 544 I(4) 4 scalar MPI_SEEK_END Param 546 I(4) 4 scalar MPI_SEEK_SET Param 542 I(4) 4 scalar MPI_SHORT Param 380 I(4) 4 scalar MPI_SHORT_INT Param 410 I(4) 4 scalar MPI_SIGNED_CHAR Param 374 I(4) 4 scalar MPI_SIMILAR Param 176 I(4) 4 scalar MPI_SOURCE Param 41 I(4) 4 scalar MPI_STATUS_SIZE Param 43 I(4) 4 scalar 45,46 MPI_SUBARRAYS_SUPPORTED Param 562 L(4) 4 scalar MPI_SUBVERSION Param 308 I(4) 4 scalar MPI_SUCCESS Param 50 I(4) 4 scalar MPI_SUM Param 196 I(4) 4 scalar MPI_TAG Param 41 I(4) 4 scalar MPI_TAG_UB Param 246 I(4) 4 scalar MPI_THREAD_FUNNELED Param 518 I(4) 4 scalar MPI_THREAD_MULTIPLE Param 522 I(4) 4 scalar MPI_THREAD_SERIALIZED Param 520 I(4) 4 scalar MPI_THREAD_SINGLE Param 516 I(4) 4 scalar MPI_TYPECLASS_COMPLEX Param 498 I(4) 4 scalar MPI_TYPECLASS_INTEGER Param 496 I(4) 4 scalar MPI_TYPECLASS_REAL Param 494 I(4) 4 scalar MPI_TYPE_DUP_FN Subr 575 scalar MPI_TYPE_NULL_COPY_FN Subr 576 scalar MPI_TYPE_NULL_DELETE_FN Subr 575 scalar MPI_UB Param 336 I(4) 4 scalar MPI_UINT16_T Param 426 I(4) 4 scalar MPI_UINT32_T Param 428 I(4) 4 scalar MPI_UINT64_T Param 430 I(4) 4 scalar MPI_UINT8_T Param 424 I(4) 4 scalar MPI_UNDEFINED Param 286 I(4) 4 scalar MPI_UNEQUAL Param 178 I(4) 4 scalar MPI_UNIVERSE_SIZE Param 254 I(4) 4 scalar MPI_UNSIGNED Param 386 I(4) 4 scalar MPI_UNSIGNED_CHAR Param 376 I(4) 4 scalar MPI_UNSIGNED_LONG Param 390 I(4) 4 scalar MPI_UNSIGNED_LONG_LONG Param 400 I(4) 4 scalar MPI_UNSIGNED_SHORT Param 382 I(4) 4 scalar MPI_VERSION Param 306 I(4) 4 scalar MPI_WCHAR Param 378 I(4) 4 scalar MPI_WIN_BASE Param 260 I(4) 4 scalar MPI_WIN_CREATE_FLAVOR Param 266 I(4) 4 scalar MPI_WIN_DISP_UNIT Param 264 I(4) 4 scalar MPI_WIN_DUP_FN Subr 573 scalar MPI_WIN_FLAVOR_ALLOCATE Param 182 I(4) 4 scalar MPI_WIN_FLAVOR_CREATE Param 180 I(4) 4 scalar MPI_WIN_FLAVOR_DYNAMIC Param 184 I(4) 4 scalar Page 8 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Object Declared Type Bytes Dimen Elements Attributes References MPI_WIN_FLAVOR_SHARED Param 186 I(4) 4 scalar MPI_WIN_MODEL Param 268 I(4) 4 scalar MPI_WIN_NULL Param 228 I(4) 4 scalar MPI_WIN_NULL_COPY_FN Subr 574 scalar MPI_WIN_NULL_DELETE_FN Subr 573 scalar MPI_WIN_SEPARATE Param 188 I(4) 4 scalar MPI_WIN_SIZE Param 262 I(4) 4 scalar MPI_WIN_UNIFIED Param 190 I(4) 4 scalar MPI_WTICK Func 569 R(8) 8 scalar MPI_WTIME Func 569 R(8) 8 scalar MPI_WTIME_IS_GLOBAL Param 252 I(4) 4 scalar MPPCOM Common 595 1724 SAVE PHYS Common 706 858036 SAVE PMPI_WTICK Func 570 R(8) 8 scalar PMPI_WTIME Func 570 R(8) 8 scalar PPTASM Common 658 1364916 SAVE RTD Param 731 R(4) 4 scalar 752 SINGLRST Local 693 L(4) 4 scalar TEMPCOM Common 636 6603768 SAVE TIMES Local 733 R(4) 4 scalar 733,734,735,738 TOPO Common 644 17478548 SAVE TYPE COMPONENTS/COMMON VARIABLES Name Type Bytes Offset Dimen Elements Attributes References AETA2 R(4) 4 264 1 45 COM ALBASE R(4) 4 357388 2 6319 COM ALBEDO R(4) 4 382664 2 6319 COM APREC R(4) 4 1238524 2 6319 COM CI R(4) 4 40 scalar COM CLDINC R(4) 4 1314364 2 6319 COM CLDINC7 R(4) 4 1339640 2 6319 COM CNVBOT R(4) 4 256284 2 6319 COM CNVTOP R(4) 4 231008 2 6319 COM CS R(4) 4 28 scalar COM CWM R(4) 4 0 3 284355 COM CZEN R(4) 4 155180 2 6319 COM CZMEAN R(4) 4 458492 2 6319 COM DETA2 R(4) 4 84 1 45 COM DFRLG R(4) 4 444 1 46 COM DI R(4) 4 44 scalar COM DS R(4) 4 32 scalar COM DT R(4) 4 48 scalar COM 733,734 DTD R(4) 4 16 scalar COM DTQ2 R(4) 4 8 scalar COM EPSR R(4) 4 28800 2 6319 COM FIRST R(4) 4 24 scalar COM G2LI I(4) 4 0 1 239 COM G2LJ I(4) 4 1912 1 389 COM GFFC R(4) 4 306836 2 6319 COM GLAT R(4) 4 104628 2 6319 COM 752 GLON R(4) 4 129904 2 6319 COM HBOT R(4) 4 205732 2 6319 COM Page 9 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Type Bytes Offset Dimen Elements Attributes References HDAC R(4) 4 407940 2 6319 COM HDACV R(4) 4 433216 2 6319 COM HTMG R(4) 4 743768 3 4183695 COM HTOP R(4) 4 180456 2 6319 COM IBROW I(4) 4 404 scalar COM ICHUNKTAB I(4) 4 828 1 21 COM IDAT I(4) 4 8 1 3 COM IDTAD I(4) 4 72 scalar COM IE_GLB_TABLE I(4) 4 84 1 21 COM IE_LOC_TABLE I(4) 4 660 1 21 COM IHRST I(4) 4 20 scalar COM ILCOL I(4) 4 396 scalar COM ILPAD1 I(4) 4 412 scalar COM ILPAD2 I(4) 4 416 scalar COM ILPAD3 I(4) 4 420 scalar COM ILPAD4 I(4) 4 424 scalar COM ILPAD5 I(4) 4 428 scalar COM INUMQ I(4) 4 1324 1 100 COM IOUT I(4) 4 44 scalar COM IQUILT_GROUP I(4) 4 1320 scalar COM IRCOL I(4) 4 400 scalar COM IRPAD1 I(4) 4 432 scalar COM IRPAD2 I(4) 4 436 scalar COM IRPAD3 I(4) 4 440 scalar COM IRPAD4 I(4) 4 444 scalar COM IRPAD5 I(4) 4 448 scalar COM IS_GLB_TABLE I(4) 4 0 1 21 COM IS_LOC_TABLE I(4) 4 492 1 21 COM ITEMP I(4) 4 5870016 2 91719 COM ITEMP2 I(4) 4 6236892 2 91719 COM ITROW I(4) 4 408 scalar COM ITSTLOC I(4) 4 1263800 scalar COM JBPAD1 I(4) 4 452 scalar COM JBPAD2 I(4) 4 456 scalar COM JBPAD3 I(4) 4 460 scalar COM JBPAD4 I(4) 4 464 scalar COM JBPAD5 I(4) 4 468 scalar COM JE_GLB_TABLE I(4) 4 252 1 21 COM JE_LOC_TABLE I(4) 4 744 1 21 COM JS_GLB_TABLE I(4) 4 168 1 21 COM JS_LOC_TABLE I(4) 4 576 1 21 COM JTPAD1 I(4) 4 472 scalar COM JTPAD2 I(4) 4 476 scalar COM JTPAD3 I(4) 4 480 scalar COM JTPAD4 I(4) 4 484 scalar COM JTPAD5 I(4) 4 488 scalar COM JTSTLOC I(4) 4 1263804 scalar COM KTM I(4) 4 0 scalar COM L2GI I(4) 4 956 1 239 COM L2GJ I(4) 4 3468 1 389 COM LC I(4) 4 1163056 2 6319 COM LIST I(4) 4 40 scalar COM MPI_ARGVS_NULL CHAR 1 0 2 1 COM MPI_ARGV_NULL CHAR 1 1 1 1 COM MPI_BOTTOM I(4) 4 0 scalar COM Page 10 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Type Bytes Offset Dimen Elements Attributes References MPI_COMM_COMP I(4) 4 912 scalar COM MPI_COMM_INTER I(4) 4 916 scalar COM MPI_COMM_INTER_ARRAY I(4) 4 920 1 100 COM MPI_ERRCODES_IGNORE I(4) 4 20 1 1 COM MPI_IN_PLACE I(4) 4 4 scalar COM MPI_STATUSES_IGNORE I(4) 4 0 2 5 COM MPI_STATUS_IGNORE I(4) 4 8 1 5 COM MPI_UNWEIGHTED I(4) 4 0 scalar COM MPI_WEIGHTS_EMPTY I(4) 4 0 scalar COM MTSTPE I(4) 4 1263808 scalar COM MXSNAL R(4) 4 3524 2 6319 COM MYIE I(4) 4 52 scalar COM 742 MYIE1 I(4) 4 56 scalar COM MYIE1_P1 I(4) 4 120 scalar COM MYIE1_P2 I(4) 4 124 scalar COM MYIE1_P3 I(4) 4 128 scalar COM MYIE1_P4 I(4) 4 132 scalar COM MYIE2 I(4) 4 60 scalar COM MYIE2_P1 I(4) 4 136 scalar COM MYIE_P1 I(4) 4 100 scalar COM MYIE_P2 I(4) 4 104 scalar COM MYIE_P3 I(4) 4 108 scalar COM MYIE_P4 I(4) 4 112 scalar COM MYIE_P5 I(4) 4 116 scalar COM MYIS I(4) 4 40 scalar COM 742 MYIS1 I(4) 4 44 scalar COM MYIS1_P1 I(4) 4 84 scalar COM MYIS1_P2 I(4) 4 88 scalar COM MYIS1_P3 I(4) 4 92 scalar COM MYIS1_P4 I(4) 4 96 scalar COM MYIS2 I(4) 4 48 scalar COM MYIS_P1 I(4) 4 64 scalar COM MYIS_P2 I(4) 4 68 scalar COM MYIS_P3 I(4) 4 72 scalar COM MYIS_P4 I(4) 4 76 scalar COM MYIS_P5 I(4) 4 80 scalar COM MYJE I(4) 4 236 scalar COM 741 MYJE1 I(4) 4 240 scalar COM MYJE1_P1 I(4) 4 280 scalar COM MYJE1_P2 I(4) 4 284 scalar COM MYJE1_P3 I(4) 4 288 scalar COM MYJE1_P4 I(4) 4 292 scalar COM MYJE2 I(4) 4 244 scalar COM MYJE2_P1 I(4) 4 296 scalar COM MYJE2_P2 I(4) 4 300 scalar COM MYJE2_P3 I(4) 4 304 scalar COM MYJE2_P4 I(4) 4 308 scalar COM MYJE3 I(4) 4 248 scalar COM MYJE3_P4 I(4) 4 312 scalar COM MYJE4 I(4) 4 252 scalar COM MYJE4_P1 I(4) 4 316 scalar COM MYJE4_P4 I(4) 4 320 scalar COM MYJE5 I(4) 4 256 scalar COM MYJE5_P1 I(4) 4 324 scalar COM MYJE5_P2 I(4) 4 328 scalar COM Page 11 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Type Bytes Offset Dimen Elements Attributes References MYJE_P1 I(4) 4 260 scalar COM MYJE_P2 I(4) 4 264 scalar COM MYJE_P3 I(4) 4 268 scalar COM MYJE_P4 I(4) 4 272 scalar COM MYJE_P5 I(4) 4 276 scalar COM MYJS I(4) 4 140 scalar COM 741 MYJS1 I(4) 4 144 scalar COM MYJS1_P1 I(4) 4 184 scalar COM MYJS1_P2 I(4) 4 188 scalar COM MYJS1_P3 I(4) 4 192 scalar COM MYJS1_P4 I(4) 4 196 scalar COM MYJS2 I(4) 4 148 scalar COM MYJS2_P1 I(4) 4 200 scalar COM MYJS2_P2 I(4) 4 204 scalar COM MYJS2_P3 I(4) 4 208 scalar COM MYJS2_P4 I(4) 4 212 scalar COM MYJS3 I(4) 4 152 scalar COM MYJS3_P4 I(4) 4 216 scalar COM MYJS4 I(4) 4 156 scalar COM MYJS4_P1 I(4) 4 220 scalar COM MYJS4_P4 I(4) 4 224 scalar COM MYJS5 I(4) 4 160 scalar COM MYJS5_P1 I(4) 4 228 scalar COM MYJS5_P2 I(4) 4 232 scalar COM MYJS_P1 I(4) 4 164 scalar COM MYJS_P2 I(4) 4 168 scalar COM MYJS_P3 I(4) 4 172 scalar COM MYJS_P4 I(4) 4 176 scalar COM MYJS_P5 I(4) 4 180 scalar COM MYPE I(4) 4 0 scalar COM 737 MY_E I(4) 4 336 scalar COM MY_IE_GLB I(4) 4 12 scalar COM MY_IE_LOC I(4) 4 28 scalar COM MY_IS_GLB I(4) 4 8 scalar COM MY_IS_LOC I(4) 4 24 scalar COM MY_JE_GLB I(4) 4 20 scalar COM MY_JE_LOC I(4) 4 36 scalar COM MY_JS_GLB I(4) 4 16 scalar COM MY_JS_LOC I(4) 4 32 scalar COM MY_N I(4) 4 332 scalar COM MY_NE I(4) 4 348 scalar COM MY_NEB I(4) 4 364 1 8 COM MY_NW I(4) 4 360 scalar COM MY_S I(4) 4 340 scalar COM MY_SE I(4) 4 352 scalar COM MY_SW I(4) 4 356 scalar COM MY_W I(4) 4 344 scalar COM NBC I(4) 4 36 scalar COM NBOCO I(4) 4 76 scalar COM NCNVC I(4) 4 92 scalar COM NCP I(4) 4 84 scalar COM NEST I(4) 4 108 scalar COM NFCST I(4) 4 32 scalar COM NPES I(4) 4 4 scalar COM NPHS I(4) 4 88 scalar COM 734 Page 12 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Type Bytes Offset Dimen Elements Attributes References NPREC I(4) 4 68 scalar COM NRADL I(4) 4 100 scalar COM NRADS I(4) 4 96 scalar COM NSHDE I(4) 4 80 scalar COM NSTART I(4) 4 60 scalar COM NTDDMP I(4) 4 64 scalar COM NTSD I(4) 4 52 scalar COM 733,738 NTSTM I(4) 4 56 scalar COM PHOUR R(4) 4 0 2 6319 COM PL R(4) 4 48 scalar COM PLQ R(4) 4 72 scalar COM PPTDAT R(4) 4 1162696 3 18957 COM 753 PT2 R(4) 4 4 scalar COM PTBL R(4) 4 509044 2 10184 COM QS0 R(4) 4 628 1 134 COM RADIN R(4) 4 54076 2 6319 COM RADOT R(4) 4 79352 2 6319 COM RDP R(4) 4 64 scalar COM RDPQ R(4) 4 76 scalar COM RDQ R(4) 4 56 scalar COM RDTH R(4) 4 60 scalar COM RDTHE R(4) 4 68 scalar COM RDTHEQ R(4) 4 80 scalar COM RESTRT R(4) 4 28 scalar COM ROI R(4) 4 36 scalar COM ROS R(4) 4 24 scalar COM RUN R(4) 4 4 scalar COM SIGMA R(4) 4 0 scalar COM SIGT4 R(4) 4 483768 2 6319 COM SQS R(4) 4 1164 1 134 COM SR R(4) 4 1188332 2 6319 COM 736,752 SST R(4) 4 332112 2 6319 COM STHE R(4) 4 2004 1 76 COM STHEQ R(4) 4 2916 1 152 COM SUBPOST L(4) 4 104 scalar COM TDTD R(4) 4 20 scalar COM TDTQ2 R(4) 4 12 scalar COM TEMP1 R(4) 4 0 2 91719 COM 736,739 TEMP10 R(4) 4 3301884 2 91719 COM TEMP11 R(4) 4 3668760 2 91719 COM TEMP12 R(4) 4 4035636 2 91719 COM TEMP13 R(4) 4 4402512 2 91719 COM TEMP14 R(4) 4 4769388 2 91719 COM TEMP15 R(4) 4 5136264 2 91719 COM TEMP16 R(4) 4 5503140 2 91719 COM TEMP2 R(4) 4 366876 2 91719 COM TEMP2X R(4) 4 0 2 92971 COM TEMP3 R(4) 4 733752 2 91719 COM TEMP4 R(4) 4 1100628 2 91719 COM TEMP5 R(4) 4 1467504 2 91719 COM TEMP6 R(4) 4 1834380 2 91719 COM TEMP7 R(4) 4 2201256 2 91719 COM TEMP8 R(4) 4 2568132 2 91719 COM TEMP9 R(4) 4 2935008 2 91719 COM TG R(4) 4 281560 2 6319 COM Page 13 Source Listing CHKSNOW 2025-03-12 18:22 Symbol Table CHKSNOW.F Name Type Bytes Offset Dimen Elements Attributes References THE0 R(4) 4 1700 1 76 COM THE0Q R(4) 4 2308 1 152 COM THL R(4) 4 52 scalar COM TLAT R(4) 4 25276 3 284355 COM TTBL R(4) 4 549780 2 10184 COM TTBLQ R(4) 4 590516 2 66880 COM TTVG R(4) 4 371884 2 92971 COM U00 R(4) 4 1137420 2 6319 COM UL R(4) 4 1162696 1 90 COM VAPINC R(4) 4 1263812 2 6319 COM VAPINC7 R(4) 4 1289088 2 6319 COM Page 14 Source Listing CHKSNOW 2025-03-12 18:22 Subprograms/Common Blocks CHKSNOW.F SUBPROGRAMS/COMMON BLOCKS Name Object Declared Type Bytes Dimen Elements Attributes References CHKSNOW Subr 2 CLDWTR Common 684 1213608 SAVE CTLBLK Common 695 112 SAVE GLB_TABLE Common 631 336 SAVE MAPPINGS Common 650 5024 SAVE MPIFCMB5 Common 582 4 SAVE MPIFCMB9 Common 583 4 SAVE MPIPRIV1 Common 587 28 SAVE MPIPRIV2 Common 589 24 SAVE MPIPRIVC Common 592 2 SAVE MPPCOM Common 595 1724 SAVE PHYS Common 706 858036 SAVE PPTASM Common 658 1364916 SAVE TEMPCOM Common 636 6603768 SAVE TOPO Common 644 17478548 SAVE 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 Page 15 Source Listing CHKSNOW 2025-03-12 18:22 CHKSNOW.F -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__ -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 precise -fp_model nofast -fp_model nostrict -fp_model nosource -fp_model nodouble -fp_model noextended -fp_model novery_fast -fp_model noexcept -fp_model nono_except -fp_modbits nofp_contract -fp_modbits nono_fp_contract -fp_modbits nofenv_access -fp_modbits nono_fenv_access -fp_modbits nocx_limited_range -fp_modbits nono_cx_limited_range -fp_modbits noprec_div -fp_modbits nono_prec_div -fp_modbits noprec_sqrt -fp_modbits nono_prec_sqrt -fp_modbits noftz -fp_modbits no_ftz -fp_modbits nointrin_limited_range -fp_modbits nono_intrin_limited_range -fp_modbits notrunc_compares -fp_modbits nono_trunc_compares -fp_modbits noieee_nan_compares -fp_modbits nono_ieee_nan_compares -fp_modbits nohonor_f32_conversion -fp_modbits nono_honor_f32_conversion -fp_modbits nohonor_f64_conversion -fp_modbits nono_honor_f64_conversion -fp_modbits nono_x87_copy -fp_modbits nono_no_x87_copy -fp_modbits noexception_semantics -fp_modbits nono_exception_semantics -fp_modbits noprecise_libm_functions -fp_modbits nono_precise_libm_functions -heap_arrays 0 no -threadprivate_compat Page 16 Source Listing CHKSNOW 2025-03-12 18:22 CHKSNOW.F -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 -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 : CHKSNOW.lst no -o COMPILER: Intel(R) Fortran 19.1-1655