Page 1 Source Listing LOC2GLB
2025-03-12 18:22 /tmp/ifortYakGqR.i
1 # 1 "LOC2GLB.F"
2 SUBROUTINE LOC2GLB(ARRL,ARRG)
3 C ******************************************************************
4 C$$$ SUBPROGRAM DOCUMENTATION BLOCK
5 C . . . .
6 C SUBPROGRAM: LOC2GLB REATE GLOBAL ARRAYS
7 C PRGRMMR: BLACK ORG: W/NP22 DATE: 97-10-28
8 C
9 C ABSTRACT:
10 C LOC2GLB CREATES A SINGLE GLOBAL ARRAY FROM MANY LOCAL ONES
11 C
12 C PROGRAM HISTORY LOG:
13 C 97-10-28 BLACK - ORIGINATOR
14 C
15 C USAGE: CALL LOC2GLB FROM SUBROUTINE CHKOUT
16 C
17 C INPUT ARGUMENT LIST:
18 C ARRL - THE LOCAL ARRAY
19 C
20 C OUTPUT ARGUMENT LIST:
21 C ARRG - THE GLOBAL ARRAYS
22 C
23 C INPUT FILES:
24 C NONE
25 C
26 C OUTPUT FILES:
27 C NONE
28 C
29 C SUBPROGRAMS CALLED:
30 C
31 C UNIQUE: NONE
32 C
33 C LIBRARY: NONE
34 C
35 C COMMON BLOCKS: NONE
36 C
37 C ATTRIBUTES:
38 C LANGUAGE: FORTRAN 90
39 C MACHINE : IBM SP
40 C$$$
41 C************************************************************
42 C------------------------------------------------------------
43 INCLUDE "parmeta"
67 INCLUDE "mpp.h"
126 INCLUDE "mpif.h"
127 # 1 "./sp.h" 1
128 # 4
129
130 # 46 "LOC2GLB.F" 2
131 C------------------------------------------------------------
693 REAL ARRL(IDIM1:IDIM2,JDIM1:JDIM2),ARRG(IM,JM)
694 REAL ARRX(IDIM1:IDIM2,JDIM1:JDIM2)
695 C------------------------------------------------------------
696 INTEGER ISTAT(MPI_STATUS_SIZE)
697 C------------------------------------------------------------
698 NUMVAL=(IDIM2-IDIM1+1)*(JDIM2-JDIM1+1)
699 C
Page 2 Source Listing LOC2GLB
2025-03-12 18:22 LOC2GLB.F
700 IF(MYPE.NE.0)THEN
701 CALL MPI_SEND(ARRL,NUMVAL,MPI_REAL,0,MYPE
702 1, MPI_COMM_COMP,ISEND)
703 C
704 ELSE
705 DO J=MYJS,MYJE
706 DO I=MYIS,MYIE
707 ARRG(I+MY_IS_GLB-1,J+MY_JS_GLB-1)=ARRL(I,J)
708 ENDDO
709 ENDDO
710 C
711 DO IPE=1,NPES-1
712 CALL MPI_RECV(ARRX,NUMVAL,MPI_REAL,IPE,IPE
713 1, MPI_COMM_COMP,ISTAT,IRECV)
714 C
715 JKNT=0
716 DO J=JS_LOC_TABLE(IPE),JE_LOC_TABLE(IPE)
717 JGLB=JS_GLB_TABLE(IPE)+JKNT
718 C
719 IKNT=0
720 DO I=IS_LOC_TABLE(IPE),IE_LOC_TABLE(IPE)
721 IGLB=IS_GLB_TABLE(IPE)+IKNT
722 ARRG(IGLB,JGLB)=ARRX(I,J)
723 IKNT=IKNT+1
724 ENDDO
725 JKNT=JKNT+1
726 ENDDO
727 C
728 ENDDO
729 C
730 ENDIF
731 C
732 RETURN
733 END
Page 3 Source Listing LOC2GLB
2025-03-12 18:22 Entry Points LOC2GLB.F
ENTRY POINTS
Name
loc2glb_
SYMBOL CROSS REFERENCE
Name Object Declared Type Bytes Dimen Elements Attributes References
ARRG Dummy 2 R(4) 4 2 91719 ARG,INOUT 707,722
ARRL Dummy 2 R(4) 4 2 6319 ARG,INOUT 701,707
ARRX Local 694 R(4) 4 2 6319 712,722
GLB_TABLE Common 104 336 SAVE
I Local 706 I(4) 4 scalar 706,707,720,722
IDIM1 Param 63 I(4) 4 scalar 693,694,698
IDIM2 Param 63 I(4) 4 scalar 693,694,698
IGLB Local 721 I(4) 4 scalar 721,722
IGSTL Param 58 I(4) 4 scalar 63
IGSTR Param 58 I(4) 4 scalar 63
IKNT Local 719 I(4) 4 scalar 719,721,723
IM Param 46 I(4) 4 scalar 60,63,110,111,112,113,114,118,119,
124,693
INPES Param 55 I(4) 4 scalar 60,63,94,95,96,105,106
IPE Local 711 I(4) 4 scalar 711,712,716,717,720,721
IRECV Local 713 I(4) 4 scalar 713
ISEND Local 702 I(4) 4 scalar 702
ISTAT Local 696 I(4) 4 1 5 713
ITAIL Param 60 I(4) 4 scalar
J Local 705 I(4) 4 scalar 705,707,716,722
JDIM1 Param 64 I(4) 4 scalar 693,694,698
JDIM2 Param 64 I(4) 4 scalar 693,694,698
JGLB Local 717 I(4) 4 scalar 717,722
JGSTL Param 59 I(4) 4 scalar 64
JGSTR Param 59 I(4) 4 scalar 64
JKNT Local 715 I(4) 4 scalar 715,717,725
JM Param 46 I(4) 4 scalar 61,64,110,111,112,113,114,118,119,
124,693
JNPES Param 55 I(4) 4 scalar 61,64,94,95,96,105,106
JTAIL Param 61 I(4) 4 scalar
LM Param 46 I(4) 4 scalar 119
LOC2GLB Subr 2
LSM Param 46 I(4) 4 scalar
MAPPINGS Common 123 5024 SAVE
MPIFCMB5 Common 681 4 SAVE
MPIFCMB9 Common 682 4 SAVE
MPIPRIV1 Common 686 28 SAVE
MPIPRIV2 Common 688 24 SAVE
MPIPRIVC Common 691 2 SAVE
MPI_2DOUBLE_PRECISION Param 427 I(4) 4 scalar
MPI_2INT Param 511 I(4) 4 scalar
MPI_2INTEGER Param 425 I(4) 4 scalar
MPI_2REAL Param 429 I(4) 4 scalar
MPI_ADDRESS_KIND Param 463 I(4) 4 scalar
Page 4 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Object Declared Type Bytes Dimen Elements Attributes References
MPI_AINT Param 541 I(4) 4 scalar
MPI_ANY_SOURCE Param 393 I(4) 4 scalar
MPI_ANY_TAG Param 395 I(4) 4 scalar
MPI_APPNUM Param 357 I(4) 4 scalar
MPI_ASYNC_PROTECTS_NONBLOC
KING Param 663 L(4) 4 scalar
MPI_BAND Param 301 I(4) 4 scalar
MPI_BOR Param 305 I(4) 4 scalar
MPI_BSEND_OVERHEAD Param 389 I(4) 4 scalar
MPI_BXOR Param 309 I(4) 4 scalar
MPI_BYTE Param 433 I(4) 4 scalar
MPI_CART Param 401 I(4) 4 scalar
MPI_CHAR Param 471 I(4) 4 scalar
MPI_CHARACTER Param 431 I(4) 4 scalar
MPI_COMBINER_CONTIGUOUS Param 559 I(4) 4 scalar
MPI_COMBINER_DARRAY Param 581 I(4) 4 scalar
MPI_COMBINER_DUP Param 557 I(4) 4 scalar
MPI_COMBINER_F90_COMPLEX Param 585 I(4) 4 scalar
MPI_COMBINER_F90_INTEGER Param 587 I(4) 4 scalar
MPI_COMBINER_F90_REAL Param 583 I(4) 4 scalar
MPI_COMBINER_HINDEXED Param 571 I(4) 4 scalar
MPI_COMBINER_HINDEXED_BLOC
K Param 591 I(4) 4 scalar
MPI_COMBINER_HINDEXED_INTE
GER Param 569 I(4) 4 scalar
MPI_COMBINER_HVECTOR Param 565 I(4) 4 scalar
MPI_COMBINER_HVECTOR_INTEG
ER Param 563 I(4) 4 scalar
MPI_COMBINER_INDEXED Param 567 I(4) 4 scalar
MPI_COMBINER_INDEXED_BLOCK Param 573 I(4) 4 scalar
MPI_COMBINER_NAMED Param 555 I(4) 4 scalar
MPI_COMBINER_RESIZED Param 589 I(4) 4 scalar
MPI_COMBINER_STRUCT Param 577 I(4) 4 scalar
MPI_COMBINER_STRUCT_INTEGE
R Param 575 I(4) 4 scalar
MPI_COMBINER_SUBARRAY Param 579 I(4) 4 scalar
MPI_COMBINER_VECTOR Param 561 I(4) 4 scalar
MPI_COMM_DUP_FN Subr 670 scalar
MPI_COMM_NULL Param 325 I(4) 4 scalar
MPI_COMM_NULL_COPY_FN Subr 671 scalar
MPI_COMM_NULL_DELETE_FN Subr 670 scalar
MPI_COMM_SELF Param 321 I(4) 4 scalar
MPI_COMM_TYPE_SHARED Param 609 I(4) 4 scalar
MPI_COMM_WORLD Param 319 I(4) 4 scalar
MPI_COMPLEX Param 413 I(4) 4 scalar
MPI_COMPLEX16 Param 459 I(4) 4 scalar
MPI_COMPLEX32 Param 461 I(4) 4 scalar
MPI_COMPLEX8 Param 457 I(4) 4 scalar
MPI_CONGRUENT Param 273 I(4) 4 scalar
MPI_CONVERSION_FN_NULL Subr 676 scalar
MPI_COUNT Param 545 I(4) 4 scalar
MPI_COUNT_KIND Param 467 I(4) 4 scalar
MPI_CXX_BOOL Param 547 I(4) 4 scalar
MPI_CXX_DOUBLE_COMPLEX Param 551 I(4) 4 scalar
MPI_CXX_FLOAT_COMPLEX Param 549 I(4) 4 scalar
Page 5 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Object Declared Type Bytes Dimen Elements Attributes References
MPI_CXX_LONG_DOUBLE_COMPLE
X Param 553 I(4) 4 scalar
MPI_C_BOOL Param 531 I(4) 4 scalar
MPI_C_COMPLEX Param 535 I(4) 4 scalar
MPI_C_DOUBLE_COMPLEX Param 537 I(4) 4 scalar
MPI_C_FLOAT_COMPLEX Param 533 I(4) 4 scalar
MPI_C_LONG_DOUBLE_COMPLEX Param 539 I(4) 4 scalar
MPI_DATATYPE_NULL Param 335 I(4) 4 scalar 450,548,550,552,554
MPI_DISPLACEMENT_CURRENT Param 659 I(8) 8 scalar
MPI_DISTRIBUTE_BLOCK Param 651 I(4) 4 scalar
MPI_DISTRIBUTE_CYCLIC Param 653 I(4) 4 scalar
MPI_DISTRIBUTE_DFLT_DARG Param 657 I(4) 4 scalar
MPI_DISTRIBUTE_NONE Param 655 I(4) 4 scalar
MPI_DIST_GRAPH Param 403 I(4) 4 scalar
MPI_DOUBLE Param 493 I(4) 4 scalar
MPI_DOUBLE_COMPLEX Param 415 I(4) 4 scalar
MPI_DOUBLE_INT Param 505 I(4) 4 scalar
MPI_DOUBLE_PRECISION Param 421 I(4) 4 scalar
MPI_DUP_FN Subr 667 scalar
MPI_ERRHANDLER_NULL Param 339 I(4) 4 scalar
MPI_ERROR Param 140 I(4) 4 scalar
MPI_ERRORS_ARE_FATAL Param 267 I(4) 4 scalar
MPI_ERRORS_RETURN Param 269 I(4) 4 scalar
MPI_ERR_ACCESS Param 259 I(4) 4 scalar
MPI_ERR_AMODE Param 245 I(4) 4 scalar
MPI_ERR_ARG Param 215 I(4) 4 scalar
MPI_ERR_ASSERT Param 221 I(4) 4 scalar
MPI_ERR_BAD_FILE Param 183 I(4) 4 scalar
MPI_ERR_BASE Param 213 I(4) 4 scalar
MPI_ERR_BUFFER Param 155 I(4) 4 scalar
MPI_ERR_COMM Param 233 I(4) 4 scalar
MPI_ERR_CONVERSION Param 249 I(4) 4 scalar
MPI_ERR_COUNT Param 159 I(4) 4 scalar
MPI_ERR_DIMS Param 197 I(4) 4 scalar
MPI_ERR_DISP Param 181 I(4) 4 scalar
MPI_ERR_DUP_DATAREP Param 163 I(4) 4 scalar
MPI_ERR_FILE Param 193 I(4) 4 scalar
MPI_ERR_FILE_EXISTS Param 175 I(4) 4 scalar
MPI_ERR_FILE_IN_USE Param 217 I(4) 4 scalar
MPI_ERR_GROUP Param 179 I(4) 4 scalar
MPI_ERR_INFO Param 207 I(4) 4 scalar
MPI_ERR_INFO_KEY Param 211 I(4) 4 scalar
MPI_ERR_INFO_NOKEY Param 191 I(4) 4 scalar
MPI_ERR_INFO_VALUE Param 177 I(4) 4 scalar
MPI_ERR_INTERN Param 209 I(4) 4 scalar
MPI_ERR_IN_STATUS Param 195 I(4) 4 scalar
MPI_ERR_IO Param 255 I(4) 4 scalar
MPI_ERR_KEYVAL Param 201 I(4) 4 scalar
MPI_ERR_LASTCODE Param 223 I(4) 4 scalar
MPI_ERR_LOCKTYPE Param 205 I(4) 4 scalar
MPI_ERR_NAME Param 199 I(4) 4 scalar
MPI_ERR_NOT_SAME Param 227 I(4) 4 scalar
MPI_ERR_NO_MEM Param 219 I(4) 4 scalar
MPI_ERR_NO_SPACE Param 151 I(4) 4 scalar
MPI_ERR_NO_SUCH_FILE Param 235 I(4) 4 scalar
Page 6 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Object Declared Type Bytes Dimen Elements Attributes References
MPI_ERR_OP Param 253 I(4) 4 scalar
MPI_ERR_OTHER Param 167 I(4) 4 scalar
MPI_ERR_PENDING Param 157 I(4) 4 scalar
MPI_ERR_PORT Param 239 I(4) 4 scalar
MPI_ERR_QUOTA Param 243 I(4) 4 scalar
MPI_ERR_RANK Param 165 I(4) 4 scalar
MPI_ERR_READ_ONLY Param 203 I(4) 4 scalar
MPI_ERR_REQUEST Param 247 I(4) 4 scalar
MPI_ERR_RMA_ATTACH Param 169 I(4) 4 scalar
MPI_ERR_RMA_CONFLICT Param 173 I(4) 4 scalar
MPI_ERR_RMA_FLAVOR Param 189 I(4) 4 scalar
MPI_ERR_RMA_RANGE Param 251 I(4) 4 scalar
MPI_ERR_RMA_SHARED Param 241 I(4) 4 scalar
MPI_ERR_RMA_SYNC Param 153 I(4) 4 scalar
MPI_ERR_ROOT Param 185 I(4) 4 scalar
MPI_ERR_SERVICE Param 161 I(4) 4 scalar
MPI_ERR_SIZE Param 171 I(4) 4 scalar
MPI_ERR_SPAWN Param 231 I(4) 4 scalar
MPI_ERR_TAG Param 261 I(4) 4 scalar
MPI_ERR_TOPOLOGY Param 265 I(4) 4 scalar
MPI_ERR_TRUNCATE Param 225 I(4) 4 scalar
MPI_ERR_TYPE Param 229 I(4) 4 scalar
MPI_ERR_UNKNOWN Param 263 I(4) 4 scalar
MPI_ERR_UNSUPPORTED_DATARE
P Param 187 I(4) 4 scalar
MPI_ERR_UNSUPPORTED_OPERAT
ION Param 237 I(4) 4 scalar
MPI_ERR_WIN Param 257 I(4) 4 scalar
MPI_FILE_NULL Param 329 I(4) 4 scalar
MPI_FLOAT Param 491 I(4) 4 scalar
MPI_FLOAT_INT Param 503 I(4) 4 scalar
MPI_GRAPH Param 399 I(4) 4 scalar
MPI_GROUP_EMPTY Param 323 I(4) 4 scalar
MPI_GROUP_NULL Param 331 I(4) 4 scalar
MPI_HOST Param 347 I(4) 4 scalar
MPI_IDENT Param 271 I(4) 4 scalar
MPI_INFO_ENV Param 343 I(4) 4 scalar
MPI_INFO_NULL Param 341 I(4) 4 scalar
MPI_INT Param 483 I(4) 4 scalar
MPI_INT16_T Param 517 I(4) 4 scalar
MPI_INT32_T Param 519 I(4) 4 scalar
MPI_INT64_T Param 521 I(4) 4 scalar
MPI_INT8_T Param 515 I(4) 4 scalar
MPI_INTEGER Param 423 I(4) 4 scalar
MPI_INTEGER1 Param 441 I(4) 4 scalar
MPI_INTEGER16 Param 449 I(4) 4 scalar
MPI_INTEGER2 Param 443 I(4) 4 scalar
MPI_INTEGER4 Param 445 I(4) 4 scalar
MPI_INTEGER8 Param 447 I(4) 4 scalar
MPI_INTEGER_KIND Param 469 I(4) 4 scalar
MPI_IO Param 349 I(4) 4 scalar
MPI_KEYVAL_INVALID Param 387 I(4) 4 scalar
MPI_LAND Param 299 I(4) 4 scalar
MPI_LASTUSEDCODE Param 355 I(4) 4 scalar
MPI_LB Param 437 I(4) 4 scalar
Page 7 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Object Declared Type Bytes Dimen Elements Attributes References
MPI_LOCK_EXCLUSIVE Param 409 I(4) 4 scalar
MPI_LOCK_SHARED Param 411 I(4) 4 scalar
MPI_LOGICAL Param 417 I(4) 4 scalar
MPI_LONG Param 487 I(4) 4 scalar
MPI_LONG_DOUBLE Param 495 I(4) 4 scalar
MPI_LONG_DOUBLE_INT Param 513 I(4) 4 scalar
MPI_LONG_INT Param 507 I(4) 4 scalar
MPI_LONG_LONG Param 501 I(4) 4 scalar
MPI_LONG_LONG_INT Param 497 I(4) 4 scalar
MPI_LOR Param 303 I(4) 4 scalar
MPI_LXOR Param 307 I(4) 4 scalar
MPI_MAX Param 291 I(4) 4 scalar
MPI_MAXLOC Param 313 I(4) 4 scalar
MPI_MAX_DATAREP_STRING Param 381 I(4) 4 scalar
MPI_MAX_ERROR_STRING Param 369 I(4) 4 scalar
MPI_MAX_INFO_KEY Param 375 I(4) 4 scalar
MPI_MAX_INFO_VAL Param 377 I(4) 4 scalar
MPI_MAX_LIBRARY_VERSION_ST
RING Param 383 I(4) 4 scalar
MPI_MAX_OBJECT_NAME Param 373 I(4) 4 scalar
MPI_MAX_PORT_NAME Param 371 I(4) 4 scalar
MPI_MAX_PROCESSOR_NAME Param 379 I(4) 4 scalar
MPI_MESSAGE_NO_PROC Param 613 I(4) 4 scalar
MPI_MESSAGE_NULL Param 611 I(4) 4 scalar
MPI_MIN Param 293 I(4) 4 scalar
MPI_MINLOC Param 311 I(4) 4 scalar
MPI_MODE_APPEND Param 637 I(4) 4 scalar
MPI_MODE_CREATE Param 633 I(4) 4 scalar
MPI_MODE_DELETE_ON_CLOSE Param 629 I(4) 4 scalar
MPI_MODE_EXCL Param 635 I(4) 4 scalar
MPI_MODE_NOCHECK Param 599 I(4) 4 scalar
MPI_MODE_NOPRECEDE Param 605 I(4) 4 scalar
MPI_MODE_NOPUT Param 603 I(4) 4 scalar
MPI_MODE_NOSTORE Param 601 I(4) 4 scalar
MPI_MODE_NOSUCCEED Param 607 I(4) 4 scalar
MPI_MODE_RDONLY Param 623 I(4) 4 scalar
MPI_MODE_RDWR Param 625 I(4) 4 scalar
MPI_MODE_SEQUENTIAL Param 639 I(4) 4 scalar
MPI_MODE_UNIQUE_OPEN Param 631 I(4) 4 scalar
MPI_MODE_WRONLY Param 627 I(4) 4 scalar
MPI_NO_OP Param 317 I(4) 4 scalar
MPI_NULL_COPY_FN Subr 667 scalar
MPI_NULL_DELETE_FN Subr 667 scalar
MPI_OFFSET Param 543 I(4) 4 scalar
MPI_OFFSET_KIND Param 465 I(4) 4 scalar
MPI_OP_NULL Param 333 I(4) 4 scalar
MPI_ORDER_C Param 647 I(4) 4 scalar
MPI_ORDER_FORTRAN Param 649 I(4) 4 scalar
MPI_PACKED Param 439 I(4) 4 scalar
MPI_PROC_NULL Param 391 I(4) 4 scalar
MPI_PROD Param 297 I(4) 4 scalar
MPI_REAL Param 419 I(4) 4 scalar 701,712
MPI_REAL16 Param 455 I(4) 4 scalar
MPI_REAL4 Param 451 I(4) 4 scalar
MPI_REAL8 Param 453 I(4) 4 scalar
Page 8 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Object Declared Type Bytes Dimen Elements Attributes References
MPI_RECV Subr 712 712
MPI_REPLACE Param 315 I(4) 4 scalar
MPI_REQUEST_NULL Param 337 I(4) 4 scalar
MPI_ROOT Param 397 I(4) 4 scalar
MPI_SEEK_CUR Param 643 I(4) 4 scalar
MPI_SEEK_END Param 645 I(4) 4 scalar
MPI_SEEK_SET Param 641 I(4) 4 scalar
MPI_SEND Subr 701 701
MPI_SHORT Param 479 I(4) 4 scalar
MPI_SHORT_INT Param 509 I(4) 4 scalar
MPI_SIGNED_CHAR Param 473 I(4) 4 scalar
MPI_SIMILAR Param 275 I(4) 4 scalar
MPI_SOURCE Param 140 I(4) 4 scalar
MPI_STATUS_SIZE Param 142 I(4) 4 scalar 144,145,696
MPI_SUBARRAYS_SUPPORTED Param 661 L(4) 4 scalar
MPI_SUBVERSION Param 407 I(4) 4 scalar
MPI_SUCCESS Param 149 I(4) 4 scalar
MPI_SUM Param 295 I(4) 4 scalar
MPI_TAG Param 140 I(4) 4 scalar
MPI_TAG_UB Param 345 I(4) 4 scalar
MPI_THREAD_FUNNELED Param 617 I(4) 4 scalar
MPI_THREAD_MULTIPLE Param 621 I(4) 4 scalar
MPI_THREAD_SERIALIZED Param 619 I(4) 4 scalar
MPI_THREAD_SINGLE Param 615 I(4) 4 scalar
MPI_TYPECLASS_COMPLEX Param 597 I(4) 4 scalar
MPI_TYPECLASS_INTEGER Param 595 I(4) 4 scalar
MPI_TYPECLASS_REAL Param 593 I(4) 4 scalar
MPI_TYPE_DUP_FN Subr 674 scalar
MPI_TYPE_NULL_COPY_FN Subr 675 scalar
MPI_TYPE_NULL_DELETE_FN Subr 674 scalar
MPI_UB Param 435 I(4) 4 scalar
MPI_UINT16_T Param 525 I(4) 4 scalar
MPI_UINT32_T Param 527 I(4) 4 scalar
MPI_UINT64_T Param 529 I(4) 4 scalar
MPI_UINT8_T Param 523 I(4) 4 scalar
MPI_UNDEFINED Param 385 I(4) 4 scalar
MPI_UNEQUAL Param 277 I(4) 4 scalar
MPI_UNIVERSE_SIZE Param 353 I(4) 4 scalar
MPI_UNSIGNED Param 485 I(4) 4 scalar
MPI_UNSIGNED_CHAR Param 475 I(4) 4 scalar
MPI_UNSIGNED_LONG Param 489 I(4) 4 scalar
MPI_UNSIGNED_LONG_LONG Param 499 I(4) 4 scalar
MPI_UNSIGNED_SHORT Param 481 I(4) 4 scalar
MPI_VERSION Param 405 I(4) 4 scalar
MPI_WCHAR Param 477 I(4) 4 scalar
MPI_WIN_BASE Param 359 I(4) 4 scalar
MPI_WIN_CREATE_FLAVOR Param 365 I(4) 4 scalar
MPI_WIN_DISP_UNIT Param 363 I(4) 4 scalar
MPI_WIN_DUP_FN Subr 672 scalar
MPI_WIN_FLAVOR_ALLOCATE Param 281 I(4) 4 scalar
MPI_WIN_FLAVOR_CREATE Param 279 I(4) 4 scalar
MPI_WIN_FLAVOR_DYNAMIC Param 283 I(4) 4 scalar
MPI_WIN_FLAVOR_SHARED Param 285 I(4) 4 scalar
MPI_WIN_MODEL Param 367 I(4) 4 scalar
MPI_WIN_NULL Param 327 I(4) 4 scalar
Page 9 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Object Declared Type Bytes Dimen Elements Attributes References
MPI_WIN_NULL_COPY_FN Subr 673 scalar
MPI_WIN_NULL_DELETE_FN Subr 672 scalar
MPI_WIN_SEPARATE Param 287 I(4) 4 scalar
MPI_WIN_SIZE Param 361 I(4) 4 scalar
MPI_WIN_UNIFIED Param 289 I(4) 4 scalar
MPI_WTICK Func 668 R(8) 8 scalar
MPI_WTIME Func 668 R(8) 8 scalar
MPI_WTIME_IS_GLOBAL Param 351 I(4) 4 scalar
MPPCOM Common 68 1724 SAVE
NUMVAL Local 698 I(4) 4 scalar 698,701,712
PMPI_WTICK Func 669 R(8) 8 scalar
PMPI_WTIME Func 669 R(8) 8 scalar
TEMPCOM Common 109 6603768 SAVE
TOPO Common 117 17478548 SAVE
TYPE COMPONENTS/COMMON VARIABLES
Name Type Bytes Offset Dimen Elements Attributes References
G2LI I(4) 4 0 1 239 COM
G2LJ I(4) 4 1912 1 389 COM
HTMG R(4) 4 743768 3 4183695 COM
IBROW I(4) 4 404 scalar COM
ICHUNKTAB I(4) 4 828 1 21 COM
IE_GLB_TABLE I(4) 4 84 1 21 COM
IE_LOC_TABLE I(4) 4 660 1 21 COM 720
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
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 721
IS_LOC_TABLE I(4) 4 492 1 21 COM 720
ITEMP I(4) 4 5870016 2 91719 COM
ITEMP2 I(4) 4 6236892 2 91719 COM
ITROW I(4) 4 408 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 716
JS_GLB_TABLE I(4) 4 168 1 21 COM 717
JS_LOC_TABLE I(4) 4 576 1 21 COM 716
Page 10 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Type Bytes Offset Dimen Elements Attributes References
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
L2GI I(4) 4 956 1 239 COM
L2GJ I(4) 4 3468 1 389 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
MPI_COMM_COMP I(4) 4 912 scalar COM 702,713
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
MYIE I(4) 4 52 scalar COM 706
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 706
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 705
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
Page 11 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Type Bytes Offset Dimen Elements Attributes References
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
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 705
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 700,701
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 707
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 707
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
Page 12 Source Listing LOC2GLB
2025-03-12 18:22 Symbol Table LOC2GLB.F
Name Type Bytes Offset Dimen Elements Attributes References
NPES I(4) 4 4 scalar COM 711
TEMP1 R(4) 4 0 2 91719 COM
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
TTVG R(4) 4 371884 2 92971 COM
Page 13 Source Listing LOC2GLB
2025-03-12 18:22 Subprograms/Common Blocks LOC2GLB.F
SUBPROGRAMS/COMMON BLOCKS
Name Object Declared Type Bytes Dimen Elements Attributes References
GLB_TABLE Common 104 336 SAVE
LOC2GLB Subr 2
MAPPINGS Common 123 5024 SAVE
MPIFCMB5 Common 681 4 SAVE
MPIFCMB9 Common 682 4 SAVE
MPIPRIV1 Common 686 28 SAVE
MPIPRIV2 Common 688 24 SAVE
MPIPRIVC Common 691 2 SAVE
MPPCOM Common 68 1724 SAVE
TEMPCOM Common 109 6603768 SAVE
TOPO Common 117 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
-check noformat -check nooutput_conversion
-check nooverflow -check nopointers
-check noshape -check nostack
-check nouninitialized -check noudio_iostat
Page 14 Source Listing LOC2GLB
2025-03-12 18:22 LOC2GLB.F
-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
-g2 -iface nomixed_str_len_arg
-iface nono_mixed_str_len_arg -init noarrays
-init nohuge -init noinfinity
-init nominus_huge -init nominus_infinity
Page 15 Source Listing LOC2GLB
2025-03-12 18:22 LOC2GLB.F
-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 : LOC2GLB.lst
no -o
COMPILER: Intel(R) Fortran 19.1-1655