Page 1           Source Listing                  LOC2GLB
2025-03-12 18:21                                 /tmp/ifortQMIy9X.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"
     66       INCLUDE "mpp.h"
    125       INCLUDE "mpif.h"
    126 # 1 "./sp.h" 1 
    127 # 4
    128 
    129 # 46 "LOC2GLB.F" 2 
    130 C------------------------------------------------------------
    692       REAL ARRL(IDIM1:IDIM2,JDIM1:JDIM2),ARRG(IM,JM)
    693       REAL ARRX(IDIM1:IDIM2,JDIM1:JDIM2)
    694 C------------------------------------------------------------
    695       INTEGER ISTAT(MPI_STATUS_SIZE)
    696 C------------------------------------------------------------
    697       NUMVAL=(IDIM2-IDIM1+1)*(JDIM2-JDIM1+1)
    698 C

Page 2           Source Listing                  LOC2GLB
2025-03-12 18:21                                 LOC2GLB.F

    699       IF(MYPE.NE.0)THEN
    700         CALL MPI_SEND(ARRL,NUMVAL,MPI_REAL,0,MYPE
    701      1,               MPI_COMM_COMP,ISEND)
    702 C
    703       ELSE
    704         DO J=MYJS,MYJE
    705         DO I=MYIS,MYIE
    706           ARRG(I+MY_IS_GLB-1,J+MY_JS_GLB-1)=ARRL(I,J)
    707         ENDDO
    708         ENDDO
    709 C
    710         DO IPE=1,NPES-1
    711           CALL MPI_RECV(ARRX,NUMVAL,MPI_REAL,IPE,IPE
    712      1,                 MPI_COMM_COMP,ISTAT,IRECV)
    713 C
    714           JKNT=0
    715           DO J=JS_LOC_TABLE(IPE),JE_LOC_TABLE(IPE)
    716             JGLB=JS_GLB_TABLE(IPE)+JKNT
    717 C
    718             IKNT=0
    719             DO I=IS_LOC_TABLE(IPE),IE_LOC_TABLE(IPE)
    720               IGLB=IS_GLB_TABLE(IPE)+IKNT
    721               ARRG(IGLB,JGLB)=ARRX(I,J)
    722               IKNT=IKNT+1
    723             ENDDO
    724             JKNT=JKNT+1
    725           ENDDO
    726 C
    727         ENDDO
    728 C
    729       ENDIF
    730 C
    731       RETURN
    732       END

Page 3           Source Listing                  LOC2GLB
2025-03-12 18:21 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        706,721                           
 ARRL                       Dummy  2        R(4)            4     2     17955    ARG,INOUT        700,706                           
 ARRX                       Local  693      R(4)            4     2     17955                     711,721                           
 GLB_TABLE                  Common 103                                  128      SAVE                                               
 I                          Local  705      I(4)            4           scalar                    705,706,719,721                   
 IDIM1                      Param  62       I(4)            4           scalar                    692,693,697                       
 IDIM2                      Param  62       I(4)            4           scalar                    692,693,697                       
 IGLB                       Local  720      I(4)            4           scalar                    720,721                           
 IGSTL                      Param  57       I(4)            4           scalar                    62                                
 IGSTR                      Param  57       I(4)            4           scalar                    62                                
 IKNT                       Local  718      I(4)            4           scalar                    718,720,722                       
 IM                         Param  46       I(4)            4           scalar                    59,62,109,110,111,112,113,117,118,
                                                                                                  123,692                           
 INPES                      Param  54       I(4)            4           scalar                    59,62,93,94,95,104,105            
 IPE                        Local  710      I(4)            4           scalar                    710,711,715,716,719,720           
 IRECV                      Local  712      I(4)            4           scalar                    712                               
 ISEND                      Local  701      I(4)            4           scalar                    701                               
 ISTAT                      Local  695      I(4)            4     1     5                         712                               
 ITAIL                      Param  59       I(4)            4           scalar                                                      
 J                          Local  704      I(4)            4           scalar                    704,706,715,721                   
 JDIM1                      Param  63       I(4)            4           scalar                    692,693,697                       
 JDIM2                      Param  63       I(4)            4           scalar                    692,693,697                       
 JGLB                       Local  716      I(4)            4           scalar                    716,721                           
 JGSTL                      Param  58       I(4)            4           scalar                    63                                
 JGSTR                      Param  58       I(4)            4           scalar                    63                                
 JKNT                       Local  714      I(4)            4           scalar                    714,716,724                       
 JM                         Param  46       I(4)            4           scalar                    60,63,109,110,111,112,113,117,118,
                                                                                                  123,692                           
 JNPES                      Param  54       I(4)            4           scalar                    60,63,93,94,95,104,105            
 JTAIL                      Param  60       I(4)            4           scalar                                                      
 LM                         Param  46       I(4)            4           scalar                    118                               
 LOC2GLB                    Subr   2                                                                                                
 LSM                        Param  46       I(4)            4           scalar                                                      
 MAPPINGS                   Common 122                                  5024     SAVE                                               
 MPIFCMB5                   Common 680                                  4        SAVE                                               
 MPIFCMB9                   Common 681                                  4        SAVE                                               
 MPIPRIV1                   Common 685                                  28       SAVE                                               
 MPIPRIV2                   Common 687                                  24       SAVE                                               
 MPIPRIVC                   Common 690                                  2        SAVE                                               
 MPI_2DOUBLE_PRECISION      Param  426      I(4)            4           scalar                                                      
 MPI_2INT                   Param  510      I(4)            4           scalar                                                      
 MPI_2INTEGER               Param  424      I(4)            4           scalar                                                      
 MPI_2REAL                  Param  428      I(4)            4           scalar                                                      
 MPI_ADDRESS_KIND           Param  462      I(4)            4           scalar                                                      

Page 4           Source Listing                  LOC2GLB
2025-03-12 18:21 Symbol Table                    LOC2GLB.F

 Name                       Object Declared Type            Bytes Dimen Elements Attributes       References                        
                                                                                                                                    
 MPI_AINT                   Param  540      I(4)            4           scalar                                                      
 MPI_ANY_SOURCE             Param  392      I(4)            4           scalar                                                      
 MPI_ANY_TAG                Param  394      I(4)            4           scalar                                                      
 MPI_APPNUM                 Param  356      I(4)            4           scalar                                                      
 MPI_ASYNC_PROTECTS_NONBLOC                                                                                                         
 KING                       Param  662      L(4)            4           scalar                                                      
 MPI_BAND                   Param  300      I(4)            4           scalar                                                      
 MPI_BOR                    Param  304      I(4)            4           scalar                                                      
 MPI_BSEND_OVERHEAD         Param  388      I(4)            4           scalar                                                      
 MPI_BXOR                   Param  308      I(4)            4           scalar                                                      
 MPI_BYTE                   Param  432      I(4)            4           scalar                                                      
 MPI_CART                   Param  400      I(4)            4           scalar                                                      
 MPI_CHAR                   Param  470      I(4)            4           scalar                                                      
 MPI_CHARACTER              Param  430      I(4)            4           scalar                                                      
 MPI_COMBINER_CONTIGUOUS    Param  558      I(4)            4           scalar                                                      
 MPI_COMBINER_DARRAY        Param  580      I(4)            4           scalar                                                      
 MPI_COMBINER_DUP           Param  556      I(4)            4           scalar                                                      
 MPI_COMBINER_F90_COMPLEX   Param  584      I(4)            4           scalar                                                      
 MPI_COMBINER_F90_INTEGER   Param  586      I(4)            4           scalar                                                      
 MPI_COMBINER_F90_REAL      Param  582      I(4)            4           scalar                                                      
 MPI_COMBINER_HINDEXED      Param  570      I(4)            4           scalar                                                      
 MPI_COMBINER_HINDEXED_BLOC                                                                                                         
 K                          Param  590      I(4)            4           scalar                                                      
 MPI_COMBINER_HINDEXED_INTE                                                                                                         
 GER                        Param  568      I(4)            4           scalar                                                      
 MPI_COMBINER_HVECTOR       Param  564      I(4)            4           scalar                                                      
 MPI_COMBINER_HVECTOR_INTEG                                                                                                         
 ER                         Param  562      I(4)            4           scalar                                                      
 MPI_COMBINER_INDEXED       Param  566      I(4)            4           scalar                                                      
 MPI_COMBINER_INDEXED_BLOCK Param  572      I(4)            4           scalar                                                      
 MPI_COMBINER_NAMED         Param  554      I(4)            4           scalar                                                      
 MPI_COMBINER_RESIZED       Param  588      I(4)            4           scalar                                                      
 MPI_COMBINER_STRUCT        Param  576      I(4)            4           scalar                                                      
 MPI_COMBINER_STRUCT_INTEGE                                                                                                         
 R                          Param  574      I(4)            4           scalar                                                      
 MPI_COMBINER_SUBARRAY      Param  578      I(4)            4           scalar                                                      
 MPI_COMBINER_VECTOR        Param  560      I(4)            4           scalar                                                      
 MPI_COMM_DUP_FN            Subr   669                                  scalar                                                      
 MPI_COMM_NULL              Param  324      I(4)            4           scalar                                                      
 MPI_COMM_NULL_COPY_FN      Subr   670                                  scalar                                                      
 MPI_COMM_NULL_DELETE_FN    Subr   669                                  scalar                                                      
 MPI_COMM_SELF              Param  320      I(4)            4           scalar                                                      
 MPI_COMM_TYPE_SHARED       Param  608      I(4)            4           scalar                                                      
 MPI_COMM_WORLD             Param  318      I(4)            4           scalar                                                      
 MPI_COMPLEX                Param  412      I(4)            4           scalar                                                      
 MPI_COMPLEX16              Param  458      I(4)            4           scalar                                                      
 MPI_COMPLEX32              Param  460      I(4)            4           scalar                                                      
 MPI_COMPLEX8               Param  456      I(4)            4           scalar                                                      
 MPI_CONGRUENT              Param  272      I(4)            4           scalar                                                      
 MPI_CONVERSION_FN_NULL     Subr   675                                  scalar                                                      
 MPI_COUNT                  Param  544      I(4)            4           scalar                                                      
 MPI_COUNT_KIND             Param  466      I(4)            4           scalar                                                      
 MPI_CXX_BOOL               Param  546      I(4)            4           scalar                                                      
 MPI_CXX_DOUBLE_COMPLEX     Param  550      I(4)            4           scalar                                                      
 MPI_CXX_FLOAT_COMPLEX      Param  548      I(4)            4           scalar                                                      

Page 5           Source Listing                  LOC2GLB
2025-03-12 18:21 Symbol Table                    LOC2GLB.F

 Name                       Object Declared Type            Bytes Dimen Elements Attributes       References                        
                                                                                                                                    
 MPI_CXX_LONG_DOUBLE_COMPLE                                                                                                         
 X                          Param  552      I(4)            4           scalar                                                      
 MPI_C_BOOL                 Param  530      I(4)            4           scalar                                                      
 MPI_C_COMPLEX              Param  534      I(4)            4           scalar                                                      
 MPI_C_DOUBLE_COMPLEX       Param  536      I(4)            4           scalar                                                      
 MPI_C_FLOAT_COMPLEX        Param  532      I(4)            4           scalar                                                      
 MPI_C_LONG_DOUBLE_COMPLEX  Param  538      I(4)            4           scalar                                                      
 MPI_DATATYPE_NULL          Param  334      I(4)            4           scalar                    449,547,549,551,553               
 MPI_DISPLACEMENT_CURRENT   Param  658      I(8)            8           scalar                                                      
 MPI_DISTRIBUTE_BLOCK       Param  650      I(4)            4           scalar                                                      
 MPI_DISTRIBUTE_CYCLIC      Param  652      I(4)            4           scalar                                                      
 MPI_DISTRIBUTE_DFLT_DARG   Param  656      I(4)            4           scalar                                                      
 MPI_DISTRIBUTE_NONE        Param  654      I(4)            4           scalar                                                      
 MPI_DIST_GRAPH             Param  402      I(4)            4           scalar                                                      
 MPI_DOUBLE                 Param  492      I(4)            4           scalar                                                      
 MPI_DOUBLE_COMPLEX         Param  414      I(4)            4           scalar                                                      
 MPI_DOUBLE_INT             Param  504      I(4)            4           scalar                                                      
 MPI_DOUBLE_PRECISION       Param  420      I(4)            4           scalar                                                      
 MPI_DUP_FN                 Subr   666                                  scalar                                                      
 MPI_ERRHANDLER_NULL        Param  338      I(4)            4           scalar                                                      
 MPI_ERROR                  Param  139      I(4)            4           scalar                                                      
 MPI_ERRORS_ARE_FATAL       Param  266      I(4)            4           scalar                                                      
 MPI_ERRORS_RETURN          Param  268      I(4)            4           scalar                                                      
 MPI_ERR_ACCESS             Param  258      I(4)            4           scalar                                                      
 MPI_ERR_AMODE              Param  244      I(4)            4           scalar                                                      
 MPI_ERR_ARG                Param  214      I(4)            4           scalar                                                      
 MPI_ERR_ASSERT             Param  220      I(4)            4           scalar                                                      
 MPI_ERR_BAD_FILE           Param  182      I(4)            4           scalar                                                      
 MPI_ERR_BASE               Param  212      I(4)            4           scalar                                                      
 MPI_ERR_BUFFER             Param  154      I(4)            4           scalar                                                      
 MPI_ERR_COMM               Param  232      I(4)            4           scalar                                                      
 MPI_ERR_CONVERSION         Param  248      I(4)            4           scalar                                                      
 MPI_ERR_COUNT              Param  158      I(4)            4           scalar                                                      
 MPI_ERR_DIMS               Param  196      I(4)            4           scalar                                                      
 MPI_ERR_DISP               Param  180      I(4)            4           scalar                                                      
 MPI_ERR_DUP_DATAREP        Param  162      I(4)            4           scalar                                                      
 MPI_ERR_FILE               Param  192      I(4)            4           scalar                                                      
 MPI_ERR_FILE_EXISTS        Param  174      I(4)            4           scalar                                                      
 MPI_ERR_FILE_IN_USE        Param  216      I(4)            4           scalar                                                      
 MPI_ERR_GROUP              Param  178      I(4)            4           scalar                                                      
 MPI_ERR_INFO               Param  206      I(4)            4           scalar                                                      
 MPI_ERR_INFO_KEY           Param  210      I(4)            4           scalar                                                      
 MPI_ERR_INFO_NOKEY         Param  190      I(4)            4           scalar                                                      
 MPI_ERR_INFO_VALUE         Param  176      I(4)            4           scalar                                                      
 MPI_ERR_INTERN             Param  208      I(4)            4           scalar                                                      
 MPI_ERR_IN_STATUS          Param  194      I(4)            4           scalar                                                      
 MPI_ERR_IO                 Param  254      I(4)            4           scalar                                                      
 MPI_ERR_KEYVAL             Param  200      I(4)            4           scalar                                                      
 MPI_ERR_LASTCODE           Param  222      I(4)            4           scalar                                                      
 MPI_ERR_LOCKTYPE           Param  204      I(4)            4           scalar                                                      
 MPI_ERR_NAME               Param  198      I(4)            4           scalar                                                      
 MPI_ERR_NOT_SAME           Param  226      I(4)            4           scalar                                                      
 MPI_ERR_NO_MEM             Param  218      I(4)            4           scalar                                                      
 MPI_ERR_NO_SPACE           Param  150      I(4)            4           scalar                                                      
 MPI_ERR_NO_SUCH_FILE       Param  234      I(4)            4           scalar                                                      

Page 6           Source Listing                  LOC2GLB
2025-03-12 18:21 Symbol Table                    LOC2GLB.F

 Name                       Object Declared Type            Bytes Dimen Elements Attributes       References                        
                                                                                                                                    
 MPI_ERR_OP                 Param  252      I(4)            4           scalar                                                      
 MPI_ERR_OTHER              Param  166      I(4)            4           scalar                                                      
 MPI_ERR_PENDING            Param  156      I(4)            4           scalar                                                      
 MPI_ERR_PORT               Param  238      I(4)            4           scalar                                                      
 MPI_ERR_QUOTA              Param  242      I(4)            4           scalar                                                      
 MPI_ERR_RANK               Param  164      I(4)            4           scalar                                                      
 MPI_ERR_READ_ONLY          Param  202      I(4)            4           scalar                                                      
 MPI_ERR_REQUEST            Param  246      I(4)            4           scalar                                                      
 MPI_ERR_RMA_ATTACH         Param  168      I(4)            4           scalar                                                      
 MPI_ERR_RMA_CONFLICT       Param  172      I(4)            4           scalar                                                      
 MPI_ERR_RMA_FLAVOR         Param  188      I(4)            4           scalar                                                      
 MPI_ERR_RMA_RANGE          Param  250      I(4)            4           scalar                                                      
 MPI_ERR_RMA_SHARED         Param  240      I(4)            4           scalar                                                      
 MPI_ERR_RMA_SYNC           Param  152      I(4)            4           scalar                                                      
 MPI_ERR_ROOT               Param  184      I(4)            4           scalar                                                      
 MPI_ERR_SERVICE            Param  160      I(4)            4           scalar                                                      
 MPI_ERR_SIZE               Param  170      I(4)            4           scalar                                                      
 MPI_ERR_SPAWN              Param  230      I(4)            4           scalar                                                      
 MPI_ERR_TAG                Param  260      I(4)            4           scalar                                                      
 MPI_ERR_TOPOLOGY           Param  264      I(4)            4           scalar                                                      
 MPI_ERR_TRUNCATE           Param  224      I(4)            4           scalar                                                      
 MPI_ERR_TYPE               Param  228      I(4)            4           scalar                                                      
 MPI_ERR_UNKNOWN            Param  262      I(4)            4           scalar                                                      
 MPI_ERR_UNSUPPORTED_DATARE                                                                                                         
 P                          Param  186      I(4)            4           scalar                                                      
 MPI_ERR_UNSUPPORTED_OPERAT                                                                                                         
 ION                        Param  236      I(4)            4           scalar                                                      
 MPI_ERR_WIN                Param  256      I(4)            4           scalar                                                      
 MPI_FILE_NULL              Param  328      I(4)            4           scalar                                                      
 MPI_FLOAT                  Param  490      I(4)            4           scalar                                                      
 MPI_FLOAT_INT              Param  502      I(4)            4           scalar                                                      
 MPI_GRAPH                  Param  398      I(4)            4           scalar                                                      
 MPI_GROUP_EMPTY            Param  322      I(4)            4           scalar                                                      
 MPI_GROUP_NULL             Param  330      I(4)            4           scalar                                                      
 MPI_HOST                   Param  346      I(4)            4           scalar                                                      
 MPI_IDENT                  Param  270      I(4)            4           scalar                                                      
 MPI_INFO_ENV               Param  342      I(4)            4           scalar                                                      
 MPI_INFO_NULL              Param  340      I(4)            4           scalar                                                      
 MPI_INT                    Param  482      I(4)            4           scalar                                                      
 MPI_INT16_T                Param  516      I(4)            4           scalar                                                      
 MPI_INT32_T                Param  518      I(4)            4           scalar                                                      
 MPI_INT64_T                Param  520      I(4)            4           scalar                                                      
 MPI_INT8_T                 Param  514      I(4)            4           scalar                                                      
 MPI_INTEGER                Param  422      I(4)            4           scalar                                                      
 MPI_INTEGER1               Param  440      I(4)            4           scalar                                                      
 MPI_INTEGER16              Param  448      I(4)            4           scalar                                                      
 MPI_INTEGER2               Param  442      I(4)            4           scalar                                                      
 MPI_INTEGER4               Param  444      I(4)            4           scalar                                                      
 MPI_INTEGER8               Param  446      I(4)            4           scalar                                                      
 MPI_INTEGER_KIND           Param  468      I(4)            4           scalar                                                      
 MPI_IO                     Param  348      I(4)            4           scalar                                                      
 MPI_KEYVAL_INVALID         Param  386      I(4)            4           scalar                                                      
 MPI_LAND                   Param  298      I(4)            4           scalar                                                      
 MPI_LASTUSEDCODE           Param  354      I(4)            4           scalar                                                      
 MPI_LB                     Param  436      I(4)            4           scalar                                                      

Page 7           Source Listing                  LOC2GLB
2025-03-12 18:21 Symbol Table                    LOC2GLB.F

 Name                       Object Declared Type            Bytes Dimen Elements Attributes       References                        
                                                                                                                                    
 MPI_LOCK_EXCLUSIVE         Param  408      I(4)            4           scalar                                                      
 MPI_LOCK_SHARED            Param  410      I(4)            4           scalar                                                      
 MPI_LOGICAL                Param  416      I(4)            4           scalar                                                      
 MPI_LONG                   Param  486      I(4)            4           scalar                                                      
 MPI_LONG_DOUBLE            Param  494      I(4)            4           scalar                                                      
 MPI_LONG_DOUBLE_INT        Param  512      I(4)            4           scalar                                                      
 MPI_LONG_INT               Param  506      I(4)            4           scalar                                                      
 MPI_LONG_LONG              Param  500      I(4)            4           scalar                                                      
 MPI_LONG_LONG_INT          Param  496      I(4)            4           scalar                                                      
 MPI_LOR                    Param  302      I(4)            4           scalar                                                      
 MPI_LXOR                   Param  306      I(4)            4           scalar                                                      
 MPI_MAX                    Param  290      I(4)            4           scalar                                                      
 MPI_MAXLOC                 Param  312      I(4)            4           scalar                                                      
 MPI_MAX_DATAREP_STRING     Param  380      I(4)            4           scalar                                                      
 MPI_MAX_ERROR_STRING       Param  368      I(4)            4           scalar                                                      
 MPI_MAX_INFO_KEY           Param  374      I(4)            4           scalar                                                      
 MPI_MAX_INFO_VAL           Param  376      I(4)            4           scalar                                                      
 MPI_MAX_LIBRARY_VERSION_ST                                                                                                         
 RING                       Param  382      I(4)            4           scalar                                                      
 MPI_MAX_OBJECT_NAME        Param  372      I(4)            4           scalar                                                      
 MPI_MAX_PORT_NAME          Param  370      I(4)            4           scalar                                                      
 MPI_MAX_PROCESSOR_NAME     Param  378      I(4)            4           scalar                                                      
 MPI_MESSAGE_NO_PROC        Param  612      I(4)            4           scalar                                                      
 MPI_MESSAGE_NULL           Param  610      I(4)            4           scalar                                                      
 MPI_MIN                    Param  292      I(4)            4           scalar                                                      
 MPI_MINLOC                 Param  310      I(4)            4           scalar                                                      
 MPI_MODE_APPEND            Param  636      I(4)            4           scalar                                                      
 MPI_MODE_CREATE            Param  632      I(4)            4           scalar                                                      
 MPI_MODE_DELETE_ON_CLOSE   Param  628      I(4)            4           scalar                                                      
 MPI_MODE_EXCL              Param  634      I(4)            4           scalar                                                      
 MPI_MODE_NOCHECK           Param  598      I(4)            4           scalar                                                      
 MPI_MODE_NOPRECEDE         Param  604      I(4)            4           scalar                                                      
 MPI_MODE_NOPUT             Param  602      I(4)            4           scalar                                                      
 MPI_MODE_NOSTORE           Param  600      I(4)            4           scalar                                                      
 MPI_MODE_NOSUCCEED         Param  606      I(4)            4           scalar                                                      
 MPI_MODE_RDONLY            Param  622      I(4)            4           scalar                                                      
 MPI_MODE_RDWR              Param  624      I(4)            4           scalar                                                      
 MPI_MODE_SEQUENTIAL        Param  638      I(4)            4           scalar                                                      
 MPI_MODE_UNIQUE_OPEN       Param  630      I(4)            4           scalar                                                      
 MPI_MODE_WRONLY            Param  626      I(4)            4           scalar                                                      
 MPI_NO_OP                  Param  316      I(4)            4           scalar                                                      
 MPI_NULL_COPY_FN           Subr   666                                  scalar                                                      
 MPI_NULL_DELETE_FN         Subr   666                                  scalar                                                      
 MPI_OFFSET                 Param  542      I(4)            4           scalar                                                      
 MPI_OFFSET_KIND            Param  464      I(4)            4           scalar                                                      
 MPI_OP_NULL                Param  332      I(4)            4           scalar                                                      
 MPI_ORDER_C                Param  646      I(4)            4           scalar                                                      
 MPI_ORDER_FORTRAN          Param  648      I(4)            4           scalar                                                      
 MPI_PACKED                 Param  438      I(4)            4           scalar                                                      
 MPI_PROC_NULL              Param  390      I(4)            4           scalar                                                      
 MPI_PROD                   Param  296      I(4)            4           scalar                                                      
 MPI_REAL                   Param  418      I(4)            4           scalar                    700,711                           
 MPI_REAL16                 Param  454      I(4)            4           scalar                                                      
 MPI_REAL4                  Param  450      I(4)            4           scalar                                                      
 MPI_REAL8                  Param  452      I(4)            4           scalar                                                      

Page 8           Source Listing                  LOC2GLB
2025-03-12 18:21 Symbol Table                    LOC2GLB.F

 Name                       Object Declared Type            Bytes Dimen Elements Attributes       References                        
                                                                                                                                    
 MPI_RECV                   Subr   711                                                            711                               
 MPI_REPLACE                Param  314      I(4)            4           scalar                                                      
 MPI_REQUEST_NULL           Param  336      I(4)            4           scalar                                                      
 MPI_ROOT                   Param  396      I(4)            4           scalar                                                      
 MPI_SEEK_CUR               Param  642      I(4)            4           scalar                                                      
 MPI_SEEK_END               Param  644      I(4)            4           scalar                                                      
 MPI_SEEK_SET               Param  640      I(4)            4           scalar                                                      
 MPI_SEND                   Subr   700                                                            700                               
 MPI_SHORT                  Param  478      I(4)            4           scalar                                                      
 MPI_SHORT_INT              Param  508      I(4)            4           scalar                                                      
 MPI_SIGNED_CHAR            Param  472      I(4)            4           scalar                                                      
 MPI_SIMILAR                Param  274      I(4)            4           scalar                                                      
 MPI_SOURCE                 Param  139      I(4)            4           scalar                                                      
 MPI_STATUS_SIZE            Param  141      I(4)            4           scalar                    143,144,695                       
 MPI_SUBARRAYS_SUPPORTED    Param  660      L(4)            4           scalar                                                      
 MPI_SUBVERSION             Param  406      I(4)            4           scalar                                                      
 MPI_SUCCESS                Param  148      I(4)            4           scalar                                                      
 MPI_SUM                    Param  294      I(4)            4           scalar                                                      
 MPI_TAG                    Param  139      I(4)            4           scalar                                                      
 MPI_TAG_UB                 Param  344      I(4)            4           scalar                                                      
 MPI_THREAD_FUNNELED        Param  616      I(4)            4           scalar                                                      
 MPI_THREAD_MULTIPLE        Param  620      I(4)            4           scalar                                                      
 MPI_THREAD_SERIALIZED      Param  618      I(4)            4           scalar                                                      
 MPI_THREAD_SINGLE          Param  614      I(4)            4           scalar                                                      
 MPI_TYPECLASS_COMPLEX      Param  596      I(4)            4           scalar                                                      
 MPI_TYPECLASS_INTEGER      Param  594      I(4)            4           scalar                                                      
 MPI_TYPECLASS_REAL         Param  592      I(4)            4           scalar                                                      
 MPI_TYPE_DUP_FN            Subr   673                                  scalar                                                      
 MPI_TYPE_NULL_COPY_FN      Subr   674                                  scalar                                                      
 MPI_TYPE_NULL_DELETE_FN    Subr   673                                  scalar                                                      
 MPI_UB                     Param  434      I(4)            4           scalar                                                      
 MPI_UINT16_T               Param  524      I(4)            4           scalar                                                      
 MPI_UINT32_T               Param  526      I(4)            4           scalar                                                      
 MPI_UINT64_T               Param  528      I(4)            4           scalar                                                      
 MPI_UINT8_T                Param  522      I(4)            4           scalar                                                      
 MPI_UNDEFINED              Param  384      I(4)            4           scalar                                                      
 MPI_UNEQUAL                Param  276      I(4)            4           scalar                                                      
 MPI_UNIVERSE_SIZE          Param  352      I(4)            4           scalar                                                      
 MPI_UNSIGNED               Param  484      I(4)            4           scalar                                                      
 MPI_UNSIGNED_CHAR          Param  474      I(4)            4           scalar                                                      
 MPI_UNSIGNED_LONG          Param  488      I(4)            4           scalar                                                      
 MPI_UNSIGNED_LONG_LONG     Param  498      I(4)            4           scalar                                                      
 MPI_UNSIGNED_SHORT         Param  480      I(4)            4           scalar                                                      
 MPI_VERSION                Param  404      I(4)            4           scalar                                                      
 MPI_WCHAR                  Param  476      I(4)            4           scalar                                                      
 MPI_WIN_BASE               Param  358      I(4)            4           scalar                                                      
 MPI_WIN_CREATE_FLAVOR      Param  364      I(4)            4           scalar                                                      
 MPI_WIN_DISP_UNIT          Param  362      I(4)            4           scalar                                                      
 MPI_WIN_DUP_FN             Subr   671                                  scalar                                                      
 MPI_WIN_FLAVOR_ALLOCATE    Param  280      I(4)            4           scalar                                                      
 MPI_WIN_FLAVOR_CREATE      Param  278      I(4)            4           scalar                                                      
 MPI_WIN_FLAVOR_DYNAMIC     Param  282      I(4)            4           scalar                                                      
 MPI_WIN_FLAVOR_SHARED      Param  284      I(4)            4           scalar                                                      
 MPI_WIN_MODEL              Param  366      I(4)            4           scalar                                                      
 MPI_WIN_NULL               Param  326      I(4)            4           scalar                                                      

Page 9           Source Listing                  LOC2GLB
2025-03-12 18:21 Symbol Table                    LOC2GLB.F

 Name                       Object Declared Type            Bytes Dimen Elements Attributes       References                        
                                                                                                                                    
 MPI_WIN_NULL_COPY_FN       Subr   672                                  scalar                                                      
 MPI_WIN_NULL_DELETE_FN     Subr   671                                  scalar                                                      
 MPI_WIN_SEPARATE           Param  286      I(4)            4           scalar                                                      
 MPI_WIN_SIZE               Param  360      I(4)            4           scalar                                                      
 MPI_WIN_UNIFIED            Param  288      I(4)            4           scalar                                                      
 MPI_WTICK                  Func   667      R(8)            8           scalar                                                      
 MPI_WTIME                  Func   667      R(8)            8           scalar                                                      
 MPI_WTIME_IS_GLOBAL        Param  350      I(4)            4           scalar                                                      
 MPPCOM                     Common 67                                   1464     SAVE                                               
 NUMVAL                     Local  697      I(4)            4           scalar                    697,700,711                       
 PMPI_WTICK                 Func   668      R(8)            8           scalar                                                      
 PMPI_WTIME                 Func   668      R(8)            8           scalar                                                      
 TEMPCOM                    Common 108                                  6603768  SAVE                                               
 TOPO                       Common 116                                  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     620      1     8        COM                                                 
 IE_GLB_TABLE               I(4)            4     32       1     8        COM                                                 
 IE_LOC_TABLE               I(4)            4     556      1     8        COM              719                                
 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     1064     1     100      COM                                                 
 IQUILT_GROUP               I(4)            4     1060           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     8        COM              720                                
 IS_LOC_TABLE               I(4)            4     492      1     8        COM              719                                
 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     96       1     8        COM                                                 
 JE_LOC_TABLE               I(4)            4     588      1     8        COM              715                                
 JS_GLB_TABLE               I(4)            4     64       1     8        COM              716                                
 JS_LOC_TABLE               I(4)            4     524      1     8        COM              715                                

Page 10          Source Listing                  LOC2GLB
2025-03-12 18:21 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     652            scalar   COM              701,712                            
 MPI_COMM_INTER             I(4)            4     656            scalar   COM                                                 
 MPI_COMM_INTER_ARRAY       I(4)            4     660      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              705                                
 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              705                                
 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              704                                
 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:21 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              704                                
 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              699,700                            
 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              706                                
 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              706                                
 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:21 Symbol Table                    LOC2GLB.F

 Name                       Type            Bytes Offset   Dimen Elements Attributes       References                         
                                                                                                                              
 NPES                       I(4)            4     4              scalar   COM              710                                
 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:21 Subprograms/Common Blocks       LOC2GLB.F



SUBPROGRAMS/COMMON BLOCKS

 Name                       Object Declared Type            Bytes Dimen Elements Attributes       References                        
                                                                                                                                    
 GLB_TABLE                  Common 103                                  128      SAVE                                               
 LOC2GLB                    Subr   2                                                                                                
 MAPPINGS                   Common 122                                  5024     SAVE                                               
 MPIFCMB5                   Common 680                                  4        SAVE                                               
 MPIFCMB9                   Common 681                                  4        SAVE                                               
 MPIPRIV1                   Common 685                                  28       SAVE                                               
 MPIPRIV2                   Common 687                                  24       SAVE                                               
 MPIPRIVC                   Common 690                                  2        SAVE                                               
 MPPCOM                     Common 67                                   1464     SAVE                                               
 TEMPCOM                    Common 108                                  6603768  SAVE                                               
 TOPO                       Common 116                                  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:21                                 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:21                                 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