Object Cross Reference


Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2144]   BUBBLE_SORT_1D_INT_ARRAY
    Set   [set_increments.f, 2159]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2160]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2160]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2161]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2162]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2162]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2163]     BUBBLE_SORT_1D_INT_ARRAY

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 440]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 537]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 557]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 557]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 565]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 567]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 568]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 570]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 571]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 573]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 574]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 623]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 625]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 626]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 627]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 637]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 640]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 642]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 643]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 645]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 655]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 658]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 660]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 661]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 663]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 673]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 675]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 676]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 677]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 700]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 703]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 704]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 705]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 714]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 718]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 720]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 721]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 723]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 732]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 736]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 738]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 739]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 741]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 750]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 753]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 754]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 755]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 778]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 780]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 781]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 782]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 792]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 795]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 797]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 798]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 800]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 810]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 813]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 815]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 816]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 818]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 828]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 830]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 831]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 832]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 876]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 881]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 881]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 888]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 889]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 1859]     RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 1861]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 1863]     RE_INDEX_ARRAYS

J    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2052]   RECORD_NEW_IJK_CELL
    Declare   [set_increments.f, 2084]   RECORD_NEW_IJK_CELL
    Use   [set_increments.f, 2094]     RECORD_NEW_IJK_CELL
    Use   [set_increments.f, 2097]     RECORD_NEW_IJK_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 37]    SET_INCREMENTS
    Set   [set_increments.f, 85]       SET_INCREMENTS
    Use   [set_increments.f, 87]       SET_INCREMENTS
    Use   [set_increments.f, 87]       SET_INCREMENTS
    Use   [set_increments.f, 88]       SET_INCREMENTS
    Use   [set_increments.f, 88]       SET_INCREMENTS
    Use   [set_increments.f, 91]       SET_INCREMENTS
    Use   [set_increments.f, 91]       SET_INCREMENTS
    Use   [set_increments.f, 92]       SET_INCREMENTS
    Use   [set_increments.f, 92]       SET_INCREMENTS
    Use   [set_increments.f, 94]       SET_INCREMENTS
    Use   [set_increments.f, 94]       SET_INCREMENTS
    Use   [set_increments.f, 95]       SET_INCREMENTS
    Use   [set_increments.f, 95]       SET_INCREMENTS
    Set   [set_increments.f, 116]      SET_INCREMENTS
    Use Argument   [set_increments.f, 119]   SET_INCREMENTS
    Use   [set_increments.f, 122]      SET_INCREMENTS
    Set   [set_increments.f, 133]      SET_INCREMENTS
    Use Argument   [set_increments.f, 136]   SET_INCREMENTS
    Use Argument   [set_increments.f, 139]   SET_INCREMENTS
    Set   [set_increments.f, 254]      SET_INCREMENTS
    Use Argument   [set_increments.f, 255]   SET_INCREMENTS
    Use   [set_increments.f, 257]      SET_INCREMENTS
    Use   [set_increments.f, 262]      SET_INCREMENTS
    Set   [set_increments.f, 301]      SET_INCREMENTS
    Use Argument   [set_increments.f, 302]   SET_INCREMENTS
    Use Argument   [set_increments.f, 306]   SET_INCREMENTS
    Set   [set_increments.f, 314]      SET_INCREMENTS
    Use Argument   [set_increments.f, 315]   SET_INCREMENTS

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2675]   WRITE_IJK_VALUES
    Set   [set_increments.f, 2725]     WRITE_IJK_VALUES
    Use Argument   [set_increments.f, 2727]   WRITE_IJK_VALUES
    Use   [set_increments.f, 2729]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2729]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2732]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2732]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2734]     WRITE_IJK_VALUES
    Use Argument   [set_increments.f, 2734]   WRITE_IJK_VALUES

j    (Local Variable)  Declared as: INTEGER
    Define   [ghd.f, 52]               GHD_MODEL
    Set   [ghd.f, 115]                 GHD_MODEL
    Use   [ghd.f, 116]                 GHD_MODEL
    Use   [ghd.f, 116]                 GHD_MODEL
    Use   [ghd.f, 117]                 GHD_MODEL
    Use   [ghd.f, 117]                 GHD_MODEL
    Use Argument   [ghd.f, 118]        GHD_MODEL
    Use   [ghd.f, 119]                 GHD_MODEL
    Set   [ghd.f, 134]                 GHD_MODEL
    Use   [ghd.f, 135]                 GHD_MODEL
    Use   [ghd.f, 135]                 GHD_MODEL
    Use   [ghd.f, 135]                 GHD_MODEL
    Use   [ghd.f, 135]                 GHD_MODEL
    Use   [ghd.f, 136]                 GHD_MODEL
    Use   [ghd.f, 136]                 GHD_MODEL
    Use   [ghd.f, 137]                 GHD_MODEL
    Use   [ghd.f, 137]                 GHD_MODEL
    Use   [ghd.f, 137]                 GHD_MODEL
    Set   [ghd.f, 149]                 GHD_MODEL
    Use   [ghd.f, 150]                 GHD_MODEL
    Use   [ghd.f, 150]                 GHD_MODEL
    Use   [ghd.f, 150]                 GHD_MODEL
    Use   [ghd.f, 150]                 GHD_MODEL
    Set   [ghd.f, 223]                 GHD_MODEL
    Use   [ghd.f, 224]                 GHD_MODEL
    Use   [ghd.f, 224]                 GHD_MODEL
    Use   [ghd.f, 225]                 GHD_MODEL
    Use   [ghd.f, 225]                 GHD_MODEL
    Use   [ghd.f, 226]                 GHD_MODEL
    Use   [ghd.f, 226]                 GHD_MODEL

J    (Local Variable)  Declared as: INTEGER
    Define   [ghdmassflux.f, 45]       GHDMASSFLUX
    Set   [ghdmassflux.f, 90]          GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 103]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 107]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 118]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 120]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 225]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 227]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 275]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 276]   GHDMASSFLUX
    Use   [ghdmassflux.f, 325]         GHDMASSFLUX
    Use   [ghdmassflux.f, 344]         GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 356]   GHDMASSFLUX
    Use Argument   [ghdmassflux.f, 367]   GHDMASSFLUX

J    (Local Variable)  Declared as: INTEGER
    Define   [ghdmassflux.f, 435]      UpdateSpeciesVelocities
    Set   [ghdmassflux.f, 464]         UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 576]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 585]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 586]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 587]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 593]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 606]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 607]   UpdateSpeciesVelocities

J    (Local Variable)  Declared as: INTEGER
    Define   [ghdmassflux.f, 866]      Ur_JACOBI_EVAL
    Set   [ghdmassflux.f, 897]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 898]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 898]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 898]         Ur_JACOBI_EVAL
    Set   [ghdmassflux.f, 909]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 910]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 911]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 913]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 916]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 916]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 916]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 916]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 916]         Ur_JACOBI_EVAL

J    (Dummy Argument)  Declared as: INTEGER
    Define   [set_index1.f, 37]        SET_INDEX1
    Declare   [set_index1.f, 65]       SET_INDEX1
    Set   [set_index1.f, 72]           SET_INDEX1
    Use   [set_index1.f, 76]           SET_INDEX1

J    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1478]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1587]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1588]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1589]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1590]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1595]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1596]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1597]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1597]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1598]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1630]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1633]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1637]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1641]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1645]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1646]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1649]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1650]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1653]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1822]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1987]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1989]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2051]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2052]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2060]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2061]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2074]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2078]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2087]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2101]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2104]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2113]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2128]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2132]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2141]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2155]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2158]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2167]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2183]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2184]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2192]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2193]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2212]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2215]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2224]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2240]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2241]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2249]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2250]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 2264]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2268]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 2277]   CAD_INTERSECT

J    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 729]   CLEAN_INTERSECT
    Set   [cut_cell_preprocessing.f, 752]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 756]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 760]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 763]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 764]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 767]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 768]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 771]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 776]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 818]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 841]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 851]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 887]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 891]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 910]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 919]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 954]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 978]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 990]   CLEAN_INTERSECT

J    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 508]   INTERSECT
    Set   [cut_cell_preprocessing.f, 618]   INTERSECT
    Use   [cut_cell_preprocessing.f, 619]   INTERSECT

J    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1348]   REMOVE_INTERSECT_FLAG
    Set   [cut_cell_preprocessing.f, 1353]   REMOVE_INTERSECT_FLAG
    Use   [cut_cell_preprocessing.f, 1357]   REMOVE_INTERSECT_FLAG
    Use Argument   [cut_cell_preprocessing.f, 1360]   REMOVE_INTERSECT_FLAG
    Use Argument   [cut_cell_preprocessing.f, 1362]   REMOVE_INTERSECT_FLAG
    Use   [cut_cell_preprocessing.f, 1373]   REMOVE_INTERSECT_FLAG

J    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1118]   SET_SNAP_FLAG
    Set   [cut_cell_preprocessing.f, 1141]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1145]   SET_SNAP_FLAG
    Use Argument   [cut_cell_preprocessing.f, 1148]   SET_SNAP_FLAG
    Use Argument   [cut_cell_preprocessing.f, 1150]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1179]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1193]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1228]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1231]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1242]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1279]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1292]   SET_SNAP_FLAG

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 799]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 851]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use Argument   [pic_bc_routines.f, 853]   CHECK_IF_PARCEL_OVERLAPS_STL

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 713]   PIC_FIND_NEW_CELL
    Set   [pic_bc_routines.f, 717]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 733]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 733]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 734]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 735]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 736]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 738]     PIC_FIND_NEW_CELL
    Set   [pic_bc_routines.f, 754]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 761]     PIC_FIND_NEW_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_time_march.f, 49]   QMOMK_TIME_MARCH
    Set   [qmomk_time_march.f, 159]    QMOMK_TIME_MARCH
    Set   [qmomk_time_march.f, 333]    QMOMK_TIME_MARCH
    Set   [qmomk_time_march.f, 455]    QMOMK_TIME_MARCH

J    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 333]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 337]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 341]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 345]    GET_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 348]   GET_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 350]   GET_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 353]   GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 375]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 375]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 376]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 390]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 390]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 391]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 405]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 405]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 406]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 420]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 420]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 421]    GET_CELL_NODE_COORDINATES

J    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 27]   GET_CONNECTIVITY
    Set   [get_connectivity.f, 47]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 51]     GET_CONNECTIVITY
    Use Argument   [get_connectivity.f, 54]   GET_CONNECTIVITY
    Use Argument   [get_connectivity.f, 56]   GET_CONNECTIVITY
    Use Argument   [get_connectivity.f, 59]   GET_CONNECTIVITY

J    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 511]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 515]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 519]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 523]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 526]   GET_GLOBAL_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 528]   GET_GLOBAL_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 531]   GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 550]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 550]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 551]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 565]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 565]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 566]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 580]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 580]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 581]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 595]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 595]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 596]    GET_GLOBAL_CELL_NODE_COORDINATES

J    (Local Variable)  Declared as: INTEGER
    Define   [set_geometry_des.f, 39]   SET_GEOMETRY_DES
    Set   [set_geometry_des.f, 78]     SET_GEOMETRY_DES
    Use   [set_geometry_des.f, 79]     SET_GEOMETRY_DES
    Use   [set_geometry_des.f, 79]     SET_GEOMETRY_DES
    Use   [set_geometry_des.f, 79]     SET_GEOMETRY_DES

J    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 236]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 265]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 267]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 279]   INIT_PARTICLES_IN_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 55]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 92]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 93]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 93]    PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 94]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 97]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 98]    PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 99]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 99]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 100]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 101]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 102]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 102]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 103]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 104]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 105]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 105]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 107]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 138]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 142]   PARTICLES_IN_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [cal_d.f, 40]             CAL_D
    Set   [cal_d.f, 55]                CAL_D
    Use   [cal_d.f, 57]                CAL_D
    Set   [cal_d.f, 89]                CAL_D
    Use   [cal_d.f, 92]                CAL_D

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_trd_g.f, 58]        CALC_TRD_G
    Set   [calc_trd_g.f, 86]           CALC_TRD_G
    Use   [calc_trd_g.f, 98]           CALC_TRD_G

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_trd_g.f, 333]       CG_CALC_VEL_G_GRAD
    Set   [calc_trd_g.f, 363]          CG_CALC_VEL_G_GRAD

j    (Local Variable)  Declared as: INTEGER
    Define   [mfix.f, 568]             debug_write_layout
    Set   [mfix.f, 602]                debug_write_layout
    Use Argument   [mfix.f, 603]       debug_write_layout
    Use Argument   [mfix.f, 604]       debug_write_layout
    Use Argument   [mfix.f, 605]       debug_write_layout
    Use Argument   [mfix.f, 606]       debug_write_layout
    Use   [mfix.f, 608]                debug_write_layout
    Set   [mfix.f, 618]                debug_write_layout
    Use Argument   [mfix.f, 619]       debug_write_layout
    Use Argument   [mfix.f, 620]       debug_write_layout
    Use   [mfix.f, 622]                debug_write_layout
    Set   [mfix.f, 633]                debug_write_layout
    Use Argument   [mfix.f, 634]       debug_write_layout
    Use Argument   [mfix.f, 635]       debug_write_layout
    Use   [mfix.f, 637]                debug_write_layout
    Set   [mfix.f, 648]                debug_write_layout
    Use   [mfix.f, 654]                debug_write_layout
    Set   [mfix.f, 663]                debug_write_layout
    Use   [mfix.f, 668]                debug_write_layout
    Set   [mfix.f, 674]                debug_write_layout
    Use Argument   [mfix.f, 675]       debug_write_layout
    Use Argument   [mfix.f, 676]       debug_write_layout
    Use   [mfix.f, 678]                debug_write_layout
    Use   [mfix.f, 682]                debug_write_layout
    Use   [mfix.f, 686]                debug_write_layout
    Use   [mfix.f, 690]                debug_write_layout
    Use   [mfix.f, 694]                debug_write_layout
    Use   [mfix.f, 698]                debug_write_layout
    Use   [mfix.f, 702]                debug_write_layout
    Use   [mfix.f, 706]                debug_write_layout

j    (Local Variable)  Declared as: INTEGER
    Define   [mfix.f, 858]             write_parallel_info
    Set   [mfix.f, 881]                write_parallel_info
    Use Argument   [mfix.f, 882]       write_parallel_info
    Use Argument   [mfix.f, 883]       write_parallel_info
    Use Argument   [mfix.f, 884]       write_parallel_info
    Use Argument   [mfix.f, 885]       write_parallel_info
    Use   [mfix.f, 887]                write_parallel_info

J    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 533]   WRITE_DES_THETA
    Set   [write_des_data.f, 588]      WRITE_DES_THETA
    Use   [write_des_data.f, 592]      WRITE_DES_THETA

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 46]          DIF_W_IS
    Set   [dif_w_is.f, 62]             DIF_W_IS
    Use Argument   [dif_w_is.f, 64]    DIF_W_IS
    Use   [dif_w_is.f, 65]             DIF_W_IS
    Use Argument   [dif_w_is.f, 66]    DIF_W_IS
    Use Argument   [dif_w_is.f, 72]    DIF_W_IS
    Use Argument   [dif_w_is.f, 73]    DIF_W_IS
    Use   [dif_w_is.f, 74]             DIF_W_IS
    Set   [dif_w_is.f, 84]             DIF_W_IS
    Use Argument   [dif_w_is.f, 86]    DIF_W_IS
    Use   [dif_w_is.f, 87]             DIF_W_IS
    Use Argument   [dif_w_is.f, 88]    DIF_W_IS

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 284]          CALC_CG_TAU_V_S
    Set   [tau_v_s.f, 303]             CALC_CG_TAU_V_S
    Use   [tau_v_s.f, 304]             CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 335]    CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 338]    CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 346]    CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 349]    CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 466]    CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 469]    CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 537]    CALC_CG_TAU_V_S
    Use Argument   [tau_v_s.f, 540]    CALC_CG_TAU_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 165]          CALC_REG_TAU_V_S
    Set   [tau_v_s.f, 172]             CALC_REG_TAU_V_S
    Use   [tau_v_s.f, 173]             CALC_REG_TAU_V_S
    Use Argument   [tau_v_s.f, 210]    CALC_REG_TAU_V_S
    Use   [tau_v_s.f, 211]             CALC_REG_TAU_V_S
    Use Argument   [tau_v_s.f, 213]    CALC_REG_TAU_V_S
    Use   [tau_v_s.f, 214]             CALC_REG_TAU_V_S
    Use   [tau_v_s.f, 220]             CALC_REG_TAU_V_S
    Use Argument   [tau_v_s.f, 226]    CALC_REG_TAU_V_S
    Use   [tau_v_s.f, 227]             CALC_REG_TAU_V_S
    Use Argument   [tau_v_s.f, 229]    CALC_REG_TAU_V_S
    Use   [tau_v_s.f, 230]             CALC_REG_TAU_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 49]           CALC_TAU_V_S
    Set   [tau_v_s.f, 74]              CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 80]     CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 84]     CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 105]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 107]    CALC_TAU_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [set_constprop.f, 64]     SET_CONSTPROP
    Set   [set_constprop.f, 250]       SET_CONSTPROP
    Use   [set_constprop.f, 251]       SET_CONSTPROP
    Use   [set_constprop.f, 253]       SET_CONSTPROP
    Use   [set_constprop.f, 254]       SET_CONSTPROP
    Set   [set_constprop.f, 260]       SET_CONSTPROP
    Use   [set_constprop.f, 261]       SET_CONSTPROP
    Use   [set_constprop.f, 261]       SET_CONSTPROP
    Use   [set_constprop.f, 262]       SET_CONSTPROP

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ps.f, 280]           DEBUG_PS
    Set   [set_ps.f, 298]              DEBUG_PS
    Use Argument   [set_ps.f, 302]     DEBUG_PS
    Use   [set_ps.f, 303]              DEBUG_PS
    Use Argument   [set_ps.f, 304]     DEBUG_PS
    Set   [set_ps.f, 380]              DEBUG_PS
    Use   [set_ps.f, 382]              DEBUG_PS
    Use   [set_ps.f, 384]              DEBUG_PS

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ps.f, 25]            SET_PS
    Set   [set_ps.f, 86]               SET_PS
    Use Argument   [set_ps.f, 89]      SET_PS
    Use   [set_ps.f, 90]               SET_PS
    Use Argument   [set_ps.f, 91]      SET_PS

j    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 324]     GET_VCELL_SDIFF_TERMS
    Set   [conv_dif_v_s.f, 336]        GET_VCELL_SDIFF_TERMS
    Use   [conv_dif_v_s.f, 339]        GET_VCELL_SDIFF_TERMS
    Use   [conv_dif_v_s.f, 364]        GET_VCELL_SDIFF_TERMS
    Use Argument   [conv_dif_v_s.f, 371]   GET_VCELL_SDIFF_TERMS
    Use Argument   [conv_dif_v_s.f, 375]   GET_VCELL_SDIFF_TERMS
    Use Argument   [conv_dif_v_s.f, 391]   GET_VCELL_SDIFF_TERMS
    Use Argument   [conv_dif_v_s.f, 395]   GET_VCELL_SDIFF_TERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 116]     GET_VCELL_SVTERMS
    Set   [conv_dif_v_s.f, 123]        GET_VCELL_SVTERMS
    Use Argument   [conv_dif_v_s.f, 152]   GET_VCELL_SVTERMS
    Use Argument   [conv_dif_v_s.f, 154]   GET_VCELL_SVTERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 606]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 646]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 648]        STORE_A_V_SDC

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mo.f, 41]     SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 118]       SET_BC_PIC_MO
    Use Argument   [set_bc_pic_mo.f, 122]   SET_BC_PIC_MO
    Use Argument   [set_bc_pic_mo.f, 123]   SET_BC_PIC_MO

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_g.f, 71]     CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 119]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 214]       CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 236]   CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 237]   CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 265]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 269]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 273]       CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 276]   CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 278]   CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 280]   CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 281]   CG_SOURCE_W_G

J    (Local Variable)  Declared as: INTEGER
    Define   [solve_pp_g.f, 177]       POINT_SOURCE_PP_G
    Set   [solve_pp_g.f, 190]          POINT_SOURCE_PP_G
    Use Argument   [solve_pp_g.f, 193]   POINT_SOURCE_PP_G
    Use   [solve_pp_g.f, 194]          POINT_SOURCE_PP_G
    Use Argument   [solve_pp_g.f, 196]   POINT_SOURCE_PP_G

J    (Local Variable)  Declared as: INTEGER
    Define   [solve_energy_eq.f, 77]   SOLVE_ENERGY_EQ
    Set   [solve_energy_eq.f, 127]     SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 130]   SOLVE_ENERGY_EQ
    Use   [solve_energy_eq.f, 138]     SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 146]   SOLVE_ENERGY_EQ
    Set   [solve_energy_eq.f, 185]     SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 188]   SOLVE_ENERGY_EQ
    Use   [solve_energy_eq.f, 196]     SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 204]   SOLVE_ENERGY_EQ

J    (Local Variable)  Declared as: INTEGER
    Define   [set_Odxyz.f, 34]         SET_ODXYZ_U_CUT_CELL
    Set   [set_Odxyz.f, 50]            SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 58]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 59]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 61]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 62]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 65]   SET_ODXYZ_U_CUT_CELL
    Use   [set_Odxyz.f, 79]            SET_ODXYZ_U_CUT_CELL
    Use   [set_Odxyz.f, 82]            SET_ODXYZ_U_CUT_CELL
    Use   [set_Odxyz.f, 86]            SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 103]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 104]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 106]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 107]   SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 110]   SET_ODXYZ_U_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [set_Odxyz.f, 165]        SET_ODXYZ_V_CUT_CELL
    Set   [set_Odxyz.f, 181]           SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 189]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 190]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 192]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 193]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 196]   SET_ODXYZ_V_CUT_CELL
    Use   [set_Odxyz.f, 210]           SET_ODXYZ_V_CUT_CELL
    Use   [set_Odxyz.f, 213]           SET_ODXYZ_V_CUT_CELL
    Use   [set_Odxyz.f, 217]           SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 234]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 235]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 237]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 238]   SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 241]   SET_ODXYZ_V_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [set_Odxyz.f, 300]        SET_ODXYZ_W_CUT_CELL
    Set   [set_Odxyz.f, 312]           SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 320]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 321]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 323]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 324]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 327]   SET_ODXYZ_W_CUT_CELL
    Use   [set_Odxyz.f, 340]           SET_ODXYZ_W_CUT_CELL
    Use   [set_Odxyz.f, 343]           SET_ODXYZ_W_CUT_CELL
    Use   [set_Odxyz.f, 347]           SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 364]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 365]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 367]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 368]   SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 371]   SET_ODXYZ_W_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1860]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1888]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1892]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1892]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1925]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1930]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1931]   GET_POTENTIAL_CUT_CELLS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 28]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 84]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 85]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 85]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 85]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 123]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 129]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 129]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 134]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 134]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 502]   SET_3D_CUT_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 504]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 508]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 509]   SET_3D_CUT_CELL_FLAGS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1318]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Set   [get_cut_cell_flags.f, 1347]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1351]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1355]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1358]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1360]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1362]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1364]   SET_3D_CUT_CELL_TREATMENT_FLAGS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1458]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1470]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1472]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1473]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1520]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1522]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1523]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1564]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1566]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1572]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1613]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1615]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1621]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1670]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1673]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1674]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1720]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1723]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1724]   SET_GHOST_CELL_FLAGS

j    (Local Variable)  Declared as: INTEGER
    Define   [mass_mobility.f, 22]     mass_mobility
    Set   [mass_mobility.f, 31]        mass_mobility
    Use   [mass_mobility.f, 32]        mass_mobility
    Use   [mass_mobility.f, 33]        mass_mobility
    Use   [mass_mobility.f, 35]        mass_mobility
    Set   [mass_mobility.f, 41]        mass_mobility
    Use   [mass_mobility.f, 42]        mass_mobility
    Use   [mass_mobility.f, 42]        mass_mobility
    Use   [mass_mobility.f, 42]        mass_mobility
    Use   [mass_mobility.f, 43]        mass_mobility
    Use   [mass_mobility.f, 43]        mass_mobility
    Use   [mass_mobility.f, 43]        mass_mobility
    Use   [mass_mobility.f, 43]        mass_mobility
    Use   [mass_mobility.f, 44]        mass_mobility
    Set   [mass_mobility.f, 53]        mass_mobility
    Use   [mass_mobility.f, 54]        mass_mobility
    Use   [mass_mobility.f, 54]        mass_mobility

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 46]   CALC_INTERP_WEIGHTS1
    Set   [calc_interp_weights.f, 65]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 74]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 75]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 100]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 101]   CALC_INTERP_WEIGHTS1

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_g.f, 277]          CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 328]             CALC_CG_TAU_U_G
    Use   [tau_u_g.f, 331]             CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 362]    CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 363]    CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 502]    CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 503]    CALC_CG_TAU_U_G

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_g.f, 82]           CALC_TAU_U_G
    Set   [tau_u_g.f, 118]             CALC_TAU_U_G
    Use   [tau_u_g.f, 121]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 162]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 163]    CALC_TAU_U_G

j    (Local Variable)  Declared as: INTEGER
    Define   [ordinary_diff.f, 30]     ordinary_diff
    Set   [ordinary_diff.f, 52]        ordinary_diff
    Use   [ordinary_diff.f, 53]        ordinary_diff
    Use   [ordinary_diff.f, 54]        ordinary_diff
    Use   [ordinary_diff.f, 56]        ordinary_diff
    Set   [ordinary_diff.f, 138]       ordinary_diff
    Use   [ordinary_diff.f, 139]       ordinary_diff
    Use   [ordinary_diff.f, 140]       ordinary_diff
    Use   [ordinary_diff.f, 142]       ordinary_diff
    Use   [ordinary_diff.f, 144]       ordinary_diff
    Use   [ordinary_diff.f, 147]       ordinary_diff
    Use   [ordinary_diff.f, 148]       ordinary_diff
    Use   [ordinary_diff.f, 149]       ordinary_diff
    Use   [ordinary_diff.f, 151]       ordinary_diff
    Use   [ordinary_diff.f, 153]       ordinary_diff
    Use   [ordinary_diff.f, 155]       ordinary_diff
    Set   [ordinary_diff.f, 207]       ordinary_diff
    Use   [ordinary_diff.f, 208]       ordinary_diff
    Set   [ordinary_diff.f, 226]       ordinary_diff
    Use   [ordinary_diff.f, 228]       ordinary_diff
    Use   [ordinary_diff.f, 229]       ordinary_diff
    Use   [ordinary_diff.f, 229]       ordinary_diff
    Use   [ordinary_diff.f, 230]       ordinary_diff
    Use   [ordinary_diff.f, 230]       ordinary_diff
    Use   [ordinary_diff.f, 230]       ordinary_diff
    Use   [ordinary_diff.f, 231]       ordinary_diff
    Use   [ordinary_diff.f, 231]       ordinary_diff
    Use   [ordinary_diff.f, 231]       ordinary_diff
    Use   [ordinary_diff.f, 232]       ordinary_diff
    Use   [ordinary_diff.f, 234]       ordinary_diff
    Use   [ordinary_diff.f, 235]       ordinary_diff
    Use   [ordinary_diff.f, 235]       ordinary_diff
    Use   [ordinary_diff.f, 236]       ordinary_diff
    Use   [ordinary_diff.f, 236]       ordinary_diff
    Use   [ordinary_diff.f, 237]       ordinary_diff
    Use   [ordinary_diff.f, 240]       ordinary_diff
    Use   [ordinary_diff.f, 240]       ordinary_diff
    Use   [ordinary_diff.f, 240]       ordinary_diff
    Use   [ordinary_diff.f, 241]       ordinary_diff
    Use   [ordinary_diff.f, 242]       ordinary_diff
    Use   [ordinary_diff.f, 242]       ordinary_diff
    Use   [ordinary_diff.f, 242]       ordinary_diff
    Use   [ordinary_diff.f, 243]       ordinary_diff
    Use   [ordinary_diff.f, 244]       ordinary_diff
    Use   [ordinary_diff.f, 244]       ordinary_diff
    Use   [ordinary_diff.f, 244]       ordinary_diff
    Use   [ordinary_diff.f, 277]       ordinary_diff
    Use   [ordinary_diff.f, 277]       ordinary_diff
    Use   [ordinary_diff.f, 278]       ordinary_diff
    Use   [ordinary_diff.f, 278]       ordinary_diff
    Use   [ordinary_diff.f, 278]       ordinary_diff
    Use   [ordinary_diff.f, 279]       ordinary_diff
    Use   [ordinary_diff.f, 280]       ordinary_diff
    Use   [ordinary_diff.f, 280]       ordinary_diff
    Use   [ordinary_diff.f, 280]       ordinary_diff
    Use   [ordinary_diff.f, 281]       ordinary_diff
    Use   [ordinary_diff.f, 282]       ordinary_diff
    Use   [ordinary_diff.f, 282]       ordinary_diff
    Use   [ordinary_diff.f, 282]       ordinary_diff
    Use   [ordinary_diff.f, 284]       ordinary_diff
    Use   [ordinary_diff.f, 284]       ordinary_diff
    Use   [ordinary_diff.f, 284]       ordinary_diff
    Use   [ordinary_diff.f, 285]       ordinary_diff
    Use   [ordinary_diff.f, 286]       ordinary_diff
    Use   [ordinary_diff.f, 286]       ordinary_diff
    Use   [ordinary_diff.f, 286]       ordinary_diff
    Use   [ordinary_diff.f, 287]       ordinary_diff
    Use   [ordinary_diff.f, 288]       ordinary_diff
    Use   [ordinary_diff.f, 288]       ordinary_diff
    Use   [ordinary_diff.f, 288]       ordinary_diff
    Use   [ordinary_diff.f, 322]       ordinary_diff
    Use   [ordinary_diff.f, 324]       ordinary_diff
    Use   [ordinary_diff.f, 326]       ordinary_diff
    Use   [ordinary_diff.f, 330]       ordinary_diff
    Use   [ordinary_diff.f, 334]       ordinary_diff
    Use   [ordinary_diff.f, 335]       ordinary_diff
    Use   [ordinary_diff.f, 335]       ordinary_diff
    Use   [ordinary_diff.f, 335]       ordinary_diff
    Use   [ordinary_diff.f, 336]       ordinary_diff
    Use   [ordinary_diff.f, 337]       ordinary_diff
    Use   [ordinary_diff.f, 337]       ordinary_diff
    Use   [ordinary_diff.f, 337]       ordinary_diff
    Use   [ordinary_diff.f, 338]       ordinary_diff
    Use   [ordinary_diff.f, 339]       ordinary_diff
    Use   [ordinary_diff.f, 339]       ordinary_diff
    Use   [ordinary_diff.f, 339]       ordinary_diff
    Set   [ordinary_diff.f, 350]       ordinary_diff
    Use   [ordinary_diff.f, 351]       ordinary_diff
    Set   [ordinary_diff.f, 355]       ordinary_diff
    Use   [ordinary_diff.f, 357]       ordinary_diff
    Use   [ordinary_diff.f, 357]       ordinary_diff
    Use   [ordinary_diff.f, 359]       ordinary_diff
    Use   [ordinary_diff.f, 361]       ordinary_diff
    Use   [ordinary_diff.f, 361]       ordinary_diff
    Use   [ordinary_diff.f, 362]       ordinary_diff
    Set   [ordinary_diff.f, 368]       ordinary_diff
    Use   [ordinary_diff.f, 369]       ordinary_diff
    Use   [ordinary_diff.f, 369]       ordinary_diff
    Use   [ordinary_diff.f, 369]       ordinary_diff
    Use   [ordinary_diff.f, 370]       ordinary_diff
    Use   [ordinary_diff.f, 371]       ordinary_diff
    Use   [ordinary_diff.f, 371]       ordinary_diff
    Use   [ordinary_diff.f, 371]       ordinary_diff
    Use   [ordinary_diff.f, 372]       ordinary_diff
    Use   [ordinary_diff.f, 372]       ordinary_diff
    Use   [ordinary_diff.f, 373]       ordinary_diff
    Use   [ordinary_diff.f, 373]       ordinary_diff
    Use   [ordinary_diff.f, 374]       ordinary_diff
    Use   [ordinary_diff.f, 374]       ordinary_diff
    Set   [ordinary_diff.f, 383]       ordinary_diff
    Use   [ordinary_diff.f, 384]       ordinary_diff
    Use   [ordinary_diff.f, 384]       ordinary_diff

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 136]   CHECK_ICBC_FLAG
    Set   [set_icbc_flags.f, 146]      CHECK_ICBC_FLAG
    Use Argument   [set_icbc_flags.f, 148]   CHECK_ICBC_FLAG
    Set   [set_icbc_flags.f, 167]      CHECK_ICBC_FLAG
    Use Argument   [set_icbc_flags.f, 169]   CHECK_ICBC_FLAG
    Use   [set_icbc_flags.f, 170]      CHECK_ICBC_FLAG

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 44]    INIT_ICBC_FLAG
    Set   [set_icbc_flags.f, 48]       INIT_ICBC_FLAG
    Use Argument   [set_icbc_flags.f, 51]   INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 71]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 71]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 71]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 71]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 97]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 97]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 97]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 97]       INIT_ICBC_FLAG

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 391]   SET_BC_FLAGS_FLOW
    Set   [set_icbc_flags.f, 451]      SET_BC_FLAGS_FLOW
    Use Argument   [set_icbc_flags.f, 454]   SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 455]      SET_BC_FLAGS_FLOW
    Use Argument   [set_icbc_flags.f, 457]   SET_BC_FLAGS_FLOW
    Set   [set_icbc_flags.f, 495]      SET_BC_FLAGS_FLOW
    Use Argument   [set_icbc_flags.f, 498]   SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 499]      SET_BC_FLAGS_FLOW
    Use Argument   [set_icbc_flags.f, 501]   SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 505]      SET_BC_FLAGS_FLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 310]   SET_BC_FLAGS_WALL
    Set   [set_icbc_flags.f, 330]      SET_BC_FLAGS_WALL
    Use Argument   [set_icbc_flags.f, 333]   SET_BC_FLAGS_WALL
    Use   [set_icbc_flags.f, 334]      SET_BC_FLAGS_WALL
    Use Argument   [set_icbc_flags.f, 336]   SET_BC_FLAGS_WALL

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 233]   SET_IC_FLAGS
    Set   [set_icbc_flags.f, 247]      SET_IC_FLAGS
    Use Argument   [set_icbc_flags.f, 249]   SET_IC_FLAGS
    Use   [set_icbc_flags.f, 250]      SET_IC_FLAGS
    Use Argument   [set_icbc_flags.f, 251]   SET_IC_FLAGS

j    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 297]     GET_UCELL_GDIFF_TERMS
    Set   [conv_dif_u_g.f, 311]        GET_UCELL_GDIFF_TERMS
    Use   [conv_dif_u_g.f, 314]        GET_UCELL_GDIFF_TERMS
    Use   [conv_dif_u_g.f, 338]        GET_UCELL_GDIFF_TERMS
    Use Argument   [conv_dif_u_g.f, 351]   GET_UCELL_GDIFF_TERMS
    Use Argument   [conv_dif_u_g.f, 352]   GET_UCELL_GDIFF_TERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 602]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 642]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 644]        STORE_A_U_GDC

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 1078]      POINT_SOURCE_W_G
    Set   [source_w_g.f, 1103]         POINT_SOURCE_W_G
    Use Argument   [source_w_g.f, 1106]   POINT_SOURCE_W_G
    Use   [source_w_g.f, 1107]         POINT_SOURCE_W_G
    Use Argument   [source_w_g.f, 1109]   POINT_SOURCE_W_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 86]        SOURCE_W_G
    Set   [source_w_g.f, 135]          SOURCE_W_G
    Use   [source_w_g.f, 265]          SOURCE_W_G
    Use Argument   [source_w_g.f, 266]   SOURCE_W_G
    Use   [source_w_g.f, 370]          SOURCE_W_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 495]       SOURCE_W_G_BC
    Set   [source_w_g.f, 655]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 657]   SOURCE_W_G_BC
    Use   [source_w_g.f, 658]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 659]   SOURCE_W_G_BC
    Set   [source_w_g.f, 690]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 692]   SOURCE_W_G_BC
    Use   [source_w_g.f, 693]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 694]   SOURCE_W_G_BC
    Set   [source_w_g.f, 725]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 727]   SOURCE_W_G_BC
    Use   [source_w_g.f, 728]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 729]   SOURCE_W_G_BC
    Use   [source_w_g.f, 732]          SOURCE_W_G_BC
    Use   [source_w_g.f, 783]          SOURCE_W_G_BC
    Use   [source_w_g.f, 784]          SOURCE_W_G_BC
    Set   [source_w_g.f, 815]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 817]   SOURCE_W_G_BC
    Use   [source_w_g.f, 818]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 819]   SOURCE_W_G_BC
    Use   [source_w_g.f, 822]          SOURCE_W_G_BC
    Use   [source_w_g.f, 870]          SOURCE_W_G_BC
    Set   [source_w_g.f, 901]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 903]   SOURCE_W_G_BC
    Use   [source_w_g.f, 904]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 905]   SOURCE_W_G_BC
    Set   [source_w_g.f, 932]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 934]   SOURCE_W_G_BC
    Use   [source_w_g.f, 935]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 936]   SOURCE_W_G_BC
    Set   [source_w_g.f, 965]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 967]   SOURCE_W_G_BC
    Use   [source_w_g.f, 968]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 969]   SOURCE_W_G_BC
    Set   [source_w_g.f, 998]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 1000]   SOURCE_W_G_BC
    Use   [source_w_g.f, 1001]         SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 1002]   SOURCE_W_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_w_s.f, 108]    CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 148]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 152]       CALC_IA_MOMSOURCE_W_S
    Use Argument   [kintheory_w_s.f, 191]   CALC_IA_MOMSOURCE_W_S
    Use Argument   [kintheory_w_s.f, 192]   CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 195]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 212]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 263]       CALC_IA_MOMSOURCE_W_S

j    (Local Variable)  Declared as: INTEGER
    Define   [thermal_mobility.f, 28]   thermal_mobility
    Set   [thermal_mobility.f, 41]     thermal_mobility
    Use   [thermal_mobility.f, 42]     thermal_mobility
    Use   [thermal_mobility.f, 43]     thermal_mobility
    Use   [thermal_mobility.f, 45]     thermal_mobility
    Set   [thermal_mobility.f, 52]     thermal_mobility
    Use   [thermal_mobility.f, 53]     thermal_mobility
    Set   [thermal_mobility.f, 57]     thermal_mobility
    Use   [thermal_mobility.f, 60]     thermal_mobility
    Use   [thermal_mobility.f, 60]     thermal_mobility
    Use   [thermal_mobility.f, 61]     thermal_mobility
    Set   [thermal_mobility.f, 68]     thermal_mobility
    Use   [thermal_mobility.f, 69]     thermal_mobility
    Use   [thermal_mobility.f, 69]     thermal_mobility
    Use   [thermal_mobility.f, 70]     thermal_mobility
    Use   [thermal_mobility.f, 70]     thermal_mobility
    Use   [thermal_mobility.f, 70]     thermal_mobility
    Use   [thermal_mobility.f, 71]     thermal_mobility
    Use   [thermal_mobility.f, 71]     thermal_mobility
    Set   [thermal_mobility.f, 80]     thermal_mobility
    Use   [thermal_mobility.f, 81]     thermal_mobility
    Use   [thermal_mobility.f, 81]     thermal_mobility
    Set   [thermal_mobility.f, 98]     thermal_mobility
    Use   [thermal_mobility.f, 99]     thermal_mobility
    Use   [thermal_mobility.f, 99]     thermal_mobility
    Use   [thermal_mobility.f, 99]     thermal_mobility
    Set   [thermal_mobility.f, 105]    thermal_mobility
    Use   [thermal_mobility.f, 106]    thermal_mobility
    Set   [thermal_mobility.f, 110]    thermal_mobility
    Use   [thermal_mobility.f, 112]    thermal_mobility
    Use   [thermal_mobility.f, 112]    thermal_mobility
    Use   [thermal_mobility.f, 115]    thermal_mobility
    Use   [thermal_mobility.f, 116]    thermal_mobility
    Use   [thermal_mobility.f, 117]    thermal_mobility
    Use   [thermal_mobility.f, 118]    thermal_mobility
    Use   [thermal_mobility.f, 120]    thermal_mobility
    Use   [thermal_mobility.f, 120]    thermal_mobility
    Use   [thermal_mobility.f, 120]    thermal_mobility

J    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 42]      DRAG_GS_DES0
    Set   [drag_gs_des0.f, 96]         DRAG_GS_DES0
    Use   [drag_gs_des0.f, 104]        DRAG_GS_DES0
    Set   [drag_gs_des0.f, 114]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 117]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 124]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 125]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 126]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 127]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 128]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 135]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 135]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 136]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 136]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 137]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 140]        DRAG_GS_DES0

J    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 237]     DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 304]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 312]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 322]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 325]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 331]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 332]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 333]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 334]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 335]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 342]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 342]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 345]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 345]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 348]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 351]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 385]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 389]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 402]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 407]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 439]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 442]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 442]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 444]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 445]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 446]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 453]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 454]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 455]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 456]        DRAG_GS_GAS0

j    (Local Variable)  Declared as: INTEGER
    Define   [check_ab_m.f, 205]       CHECK_symmetry
    Set   [check_ab_m.f, 219]          CHECK_symmetry
    Use   [check_ab_m.f, 222]          CHECK_symmetry
    Use   [check_ab_m.f, 226]          CHECK_symmetry
    Use   [check_ab_m.f, 230]          CHECK_symmetry

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_source_epp.f, 101]   CONV_SOURCE_EPP0
    Set   [conv_source_epp.f, 134]     CONV_SOURCE_EPP0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_source_epp.f, 362]   CONV_SOURCE_EPP1
    Set   [conv_source_epp.f, 423]     CONV_SOURCE_EPP1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_source_epp.f, 604]   POINT_SOURCE_EPP
    Set   [conv_source_epp.f, 630]     POINT_SOURCE_EPP
    Use Argument   [conv_source_epp.f, 633]   POINT_SOURCE_EPP
    Use   [conv_source_epp.f, 634]     POINT_SOURCE_EPP
    Use Argument   [conv_source_epp.f, 635]   POINT_SOURCE_EPP

J    (Local Variable)  Declared as: INTEGER
    Define   [gas_drag.f, 63]          GAS_DRAG_U
    Set   [gas_drag.f, 90]             GAS_DRAG_U
    Use   [gas_drag.f, 94]             GAS_DRAG_U
    Use   [gas_drag.f, 94]             GAS_DRAG_U
    Use   [gas_drag.f, 97]             GAS_DRAG_U
    Use   [gas_drag.f, 103]            GAS_DRAG_U
    Use   [gas_drag.f, 104]            GAS_DRAG_U

J    (Local Variable)  Declared as: INTEGER
    Define   [gas_drag.f, 202]         GAS_DRAG_V
    Set   [gas_drag.f, 227]            GAS_DRAG_V
    Use   [gas_drag.f, 231]            GAS_DRAG_V
    Use   [gas_drag.f, 231]            GAS_DRAG_V
    Use   [gas_drag.f, 234]            GAS_DRAG_V
    Use   [gas_drag.f, 241]            GAS_DRAG_V
    Use   [gas_drag.f, 242]            GAS_DRAG_V
    Set   [gas_drag.f, 263]            GAS_DRAG_V
    Use Argument   [gas_drag.f, 266]   GAS_DRAG_V
    Use Argument   [gas_drag.f, 267]   GAS_DRAG_V

J    (Local Variable)  Declared as: INTEGER
    Define   [gas_drag.f, 337]         GAS_DRAG_W
    Set   [gas_drag.f, 363]            GAS_DRAG_W
    Use   [gas_drag.f, 367]            GAS_DRAG_W
    Use   [gas_drag.f, 367]            GAS_DRAG_W
    Use   [gas_drag.f, 370]            GAS_DRAG_W
    Use   [gas_drag.f, 371]            GAS_DRAG_W
    Use   [gas_drag.f, 372]            GAS_DRAG_W

J    (Local Variable)  Declared as: INTEGER
    Define   [k_epsilon_prop.f, 58]    K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 145]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 148]      K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 168]   K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 184]   K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 209]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 212]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 215]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 221]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 225]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 226]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 268]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 275]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 336]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 342]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 346]      K_Epsilon_PROP

j    (Local Variable)  Declared as: INTEGER
    Define   [thermal_diffusivity.f, 26]   thermal_diffusivity
    Set   [thermal_diffusivity.f, 41]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 42]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 43]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 43]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 43]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 44]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 44]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 45]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 45]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 47]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 47]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 47]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 48]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 48]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 48]   thermal_diffusivity
    Set   [thermal_diffusivity.f, 53]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 54]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 57]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 57]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 59]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 59]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 60]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 60]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 60]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 61]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 61]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 63]   thermal_diffusivity
    Use   [thermal_diffusivity.f, 63]   thermal_diffusivity

J    (Local Variable)  Declared as: INTEGER
    Define   [set_geometry.f, 57]      SET_GEOMETRY
    Set   [set_geometry.f, 352]        SET_GEOMETRY
    Use   [set_geometry.f, 353]        SET_GEOMETRY
    Use   [set_geometry.f, 353]        SET_GEOMETRY
    Use   [set_geometry.f, 354]        SET_GEOMETRY
    Use   [set_geometry.f, 355]        SET_GEOMETRY
    Use   [set_geometry.f, 355]        SET_GEOMETRY
    Use   [set_geometry.f, 355]        SET_GEOMETRY
    Use   [set_geometry.f, 355]        SET_GEOMETRY
    Use   [set_geometry.f, 356]        SET_GEOMETRY
    Use   [set_geometry.f, 356]        SET_GEOMETRY

J    (Local Variable)  Declared as: INTEGER
    Define   [b_m_p_star.f, 691]       B_M_P_STAR_B
    Set   [b_m_p_star.f, 722]          B_M_P_STAR_B

J    (Local Variable)  Declared as: INTEGER
    Define   [b_m_p_star.f, 53]        B_M_P_STAR_E
    Set   [b_m_p_star.f, 84]           B_M_P_STAR_E

J    (Local Variable)  Declared as: INTEGER
    Define   [b_m_p_star.f, 180]       B_M_P_STAR_N
    Set   [b_m_p_star.f, 212]          B_M_P_STAR_N
    Use Argument   [b_m_p_star.f, 222]   B_M_P_STAR_N
    Use Argument   [b_m_p_star.f, 233]   B_M_P_STAR_N
    Use Argument   [b_m_p_star.f, 236]   B_M_P_STAR_N
    Use Argument   [b_m_p_star.f, 239]   B_M_P_STAR_N

J    (Local Variable)  Declared as: INTEGER
    Define   [b_m_p_star.f, 308]       B_M_P_STAR_T
    Set   [b_m_p_star.f, 340]          B_M_P_STAR_T

J    (Local Variable)  Declared as: INTEGER
    Define   [b_m_p_star.f, 435]       B_M_P_STAR_W
    Set   [b_m_p_star.f, 467]          B_M_P_STAR_W

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_trd_s.f, 59]        CALC_TRD_S
    Set   [calc_trd_s.f, 86]           CALC_TRD_S
    Use   [calc_trd_s.f, 99]           CALC_TRD_S

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_trd_s.f, 321]       CG_CALC_VEL_S_GRAD
    Set   [calc_trd_s.f, 355]          CG_CALC_VEL_S_GRAD

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 356]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 456]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 459]       SET_DEM_BCMI_IJK
    Use Argument   [set_bc_dem_mi.f, 461]   SET_DEM_BCMI_IJK

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_des.f, 42]       DIF_PHI_DES
    Set   [dif_phi_des.f, 55]          DIF_PHI_DES
    Use   [dif_phi_des.f, 70]          DIF_PHI_DES
    Use   [dif_phi_des.f, 85]          DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 93]   DIF_PHI_DES
    Use   [dif_phi_des.f, 93]          DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 96]   DIF_PHI_DES
    Use   [dif_phi_des.f, 96]          DIF_PHI_DES
    Use   [dif_phi_des.f, 105]         DIF_PHI_DES
    Use   [dif_phi_des.f, 124]         DIF_PHI_DES
    Use   [dif_phi_des.f, 139]         DIF_PHI_DES

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_g.f, 74]         CALC_MU_G
    Set   [calc_mu_g.f, 221]           CALC_MU_G
    Use   [calc_mu_g.f, 224]           CALC_MU_G
    Use Argument   [calc_mu_g.f, 245]   CALC_MU_G
    Use Argument   [calc_mu_g.f, 261]   CALC_MU_G
    Use   [calc_mu_g.f, 280]           CALC_MU_G
    Use   [calc_mu_g.f, 285]           CALC_MU_G
    Use   [calc_mu_g.f, 287]           CALC_MU_G

J    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 424]   DES_NEW_PARTICLE_TEST
    Set   [mass_inflow_dem.f, 459]     DES_NEW_PARTICLE_TEST
    Use Argument   [mass_inflow_dem.f, 464]   DES_NEW_PARTICLE_TEST

J    (Local Variable)  Declared as: INTEGER
    Define   [set_outflow.f, 67]       SET_OUTFLOW
    Set   [set_outflow.f, 79]          SET_OUTFLOW
    Use Argument   [set_outflow.f, 82]   SET_OUTFLOW
    Use   [set_outflow.f, 83]          SET_OUTFLOW
    Use Argument   [set_outflow.f, 84]   SET_OUTFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_s.f, 58]     CG_SOURCE_W_S
    Set   [CG_source_w_s.f, 100]       CG_SOURCE_W_S
    Use   [CG_source_w_s.f, 200]       CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 219]   CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 220]   CG_SOURCE_W_S
    Set   [CG_source_w_s.f, 244]       CG_SOURCE_W_S
    Use   [CG_source_w_s.f, 247]       CG_SOURCE_W_S
    Use   [CG_source_w_s.f, 250]       CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 252]   CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 254]   CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 256]   CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 257]   CG_SOURCE_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3359]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3462]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3463]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3463]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3463]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3463]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3516]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3522]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3602]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3604]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3612]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3626]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3626]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3679]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3684]   ADJUST_IJK_SIZE

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 44]   CHECK_DATA_CARTESIAN
    Set   [check_data_cartesian.f, 701]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 702]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 702]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 704]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 704]   CHECK_DATA_CARTESIAN

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 2542]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2875]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2876]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2876]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2906]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2907]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2907]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2912]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2913]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2913]   GET_DXYZ_FROM_CONTROL_POINTS

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4061]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4125]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4127]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4175]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4176]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4179]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4180]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4180]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4210]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4210]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4216]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4217]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4217]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4217]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4230]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4231]   REPORT_BEST_IJK_SIZE

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4902]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 4970]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 4973]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5022]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5024]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5029]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5030]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5030]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5042]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5043]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5043]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5099]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5101]   REPORT_BEST_IJK_SIZE0

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 166]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 215]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 217]   CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 221]   CALC_D_N_GAS_AND_SOLIDS

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 419]         CALC_D_N_GAS_ONLY
    Set   [calc_d_n.f, 443]            CALC_D_N_GAS_ONLY
    Use Argument   [calc_d_n.f, 445]   CALC_D_N_GAS_ONLY
    Use Argument   [calc_d_n.f, 457]   CALC_D_N_GAS_ONLY

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 547]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 580]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 584]   CALC_D_N_SOLIDS_ONLY

J    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 59]            BC_PHI
    Set   [bc_phi.f, 238]              BC_PHI
    Use Argument   [bc_phi.f, 240]     BC_PHI
    Use   [bc_phi.f, 241]              BC_PHI
    Use Argument   [bc_phi.f, 242]     BC_PHI
    Use   [bc_phi.f, 244]              BC_PHI
    Use   [bc_phi.f, 289]              BC_PHI
    Use   [bc_phi.f, 290]              BC_PHI
    Set   [bc_phi.f, 357]              BC_PHI
    Use Argument   [bc_phi.f, 359]     BC_PHI
    Use   [bc_phi.f, 360]              BC_PHI
    Use Argument   [bc_phi.f, 361]     BC_PHI
    Set   [bc_phi.f, 411]              BC_PHI
    Use Argument   [bc_phi.f, 413]     BC_PHI
    Use   [bc_phi.f, 414]              BC_PHI
    Use Argument   [bc_phi.f, 415]     BC_PHI

J    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 502]           BC_PHI_CG
    Set   [bc_phi.f, 515]              BC_PHI_CG
    Use   [bc_phi.f, 518]              BC_PHI_CG
    Use   [bc_phi.f, 518]              BC_PHI_CG
    Use   [bc_phi.f, 537]              BC_PHI_CG
    Use   [bc_phi.f, 597]              BC_PHI_CG
    Use   [bc_phi.f, 598]              BC_PHI_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [get_bc_area.f, 164]      CG_GET_BC_AREA
    Set   [get_bc_area.f, 199]         CG_GET_BC_AREA
    Use Argument   [get_bc_area.f, 202]   CG_GET_BC_AREA
    Use   [get_bc_area.f, 203]         CG_GET_BC_AREA
    Use Argument   [get_bc_area.f, 205]   CG_GET_BC_AREA

J    (Local Variable)  Declared as: INTEGER
    Define   [get_bc_area.f, 50]       GET_BC_AREA
    Set   [get_bc_area.f, 60]          GET_BC_AREA
    Set   [get_bc_area.f, 64]          GET_BC_AREA
    Set   [get_bc_area.f, 70]          GET_BC_AREA
    Set   [get_bc_area.f, 74]          GET_BC_AREA
    Set   [get_bc_area.f, 78]          GET_BC_AREA
    Set   [get_bc_area.f, 89]          GET_BC_AREA
    Use   [get_bc_area.f, 93]          GET_BC_AREA

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ic_dem.f, 45]        SET_IC_DEM
    Set   [set_ic_dem.f, 58]           SET_IC_DEM
    Use Argument   [set_ic_dem.f, 63]   SET_IC_DEM
    Use   [set_ic_dem.f, 64]           SET_IC_DEM
    Use Argument   [set_ic_dem.f, 66]   SET_IC_DEM

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 155]       LEQ_BICGS0t
    Set   [leq_bicgst.f, 219]          LEQ_BICGS0t
    Use Argument   [leq_bicgst.f, 220]   LEQ_BICGS0t

J    (Dummy Argument)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1305]      LEQ_IJSWEEPt
    Declare   [leq_bicgst.f, 1326]     LEQ_IJSWEEPt
    Use Argument   [leq_bicgst.f, 1356]   LEQ_IJSWEEPt
    Use Argument   [leq_bicgst.f, 1382]   LEQ_IJSWEEPt

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 786]       LEQ_IKSWEEPt
    Set   [leq_bicgst.f, 792]          LEQ_IKSWEEPt
    Use Argument   [leq_bicgst.f, 795]   LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 801]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 802]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 803]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 804]          LEQ_IKSWEEPt
    Set   [leq_bicgst.f, 822]          LEQ_IKSWEEPt
    Use Argument   [leq_bicgst.f, 824]   LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 825]          LEQ_IKSWEEPt

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 680]       LEQ_ISWEEPt
    Set   [leq_bicgst.f, 686]          LEQ_ISWEEPt
    Use Argument   [leq_bicgst.f, 688]   LEQ_ISWEEPt
    Use   [leq_bicgst.f, 692]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 693]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 694]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 695]          LEQ_ISWEEPt
    Set   [leq_bicgst.f, 711]          LEQ_ISWEEPt
    Use Argument   [leq_bicgst.f, 712]   LEQ_ISWEEPt
    Use   [leq_bicgst.f, 713]          LEQ_ISWEEPt

J    (Dummy Argument)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1203]      LEQ_JKSWEEPt
    Declare   [leq_bicgst.f, 1224]     LEQ_JKSWEEPt
    Use Argument   [leq_bicgst.f, 1254]   LEQ_JKSWEEPt
    Use Argument   [leq_bicgst.f, 1280]   LEQ_JKSWEEPt

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 895]       LEQ_MATVECt
    Set   [leq_bicgst.f, 909]          LEQ_MATVECt
    Use Argument   [leq_bicgst.f, 911]   LEQ_MATVECt
    Set   [leq_bicgst.f, 940]          LEQ_MATVECt
    Use Argument   [leq_bicgst.f, 943]   LEQ_MATVECt

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1483]      LEQ_msolve1t
    Set   [leq_bicgst.f, 1503]         LEQ_msolve1t
    Use Argument   [leq_bicgst.f, 1505]   LEQ_msolve1t

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1025]      LEQ_MSOLVEt
    Set   [leq_bicgst.f, 1051]         LEQ_MSOLVEt
    Use Argument   [leq_bicgst.f, 1053]   LEQ_MSOLVEt

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 412]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 438]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 440]        CONV_DIF_PHI_DC

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 776]     DIF_PHI_IS
    Set   [conv_dif_phi.f, 802]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 804]        DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 805]   DIF_PHI_IS
    Set   [conv_dif_phi.f, 818]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 820]        DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 821]   DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 825]   DIF_PHI_IS
    Use   [conv_dif_phi.f, 825]        DIF_PHI_IS
    Set   [conv_dif_phi.f, 835]        DIF_PHI_IS

j    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 131]     GET_PHICELL_DIFF_TERMS
    Set   [conv_dif_phi.f, 144]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 147]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 157]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 167]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 168]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 169]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 171]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 172]        GET_PHICELL_DIFF_TERMS
    Use Argument   [conv_dif_phi.f, 182]   GET_PHICELL_DIFF_TERMS

j    (Local Variable)  Declared as: INTEGER
    Define   [gaussj.f, 5]             gaussj
    Set   [gaussj.f, 12]               gaussj
    Use   [gaussj.f, 13]               gaussj
    Use   [gaussj.f, 16]               gaussj
    Use   [gaussj.f, 17]               gaussj
    Use   [gaussj.f, 18]               gaussj

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_p_star.f, 160]      CALC_ep_star
    Set   [calc_p_star.f, 196]         CALC_ep_star
    Use   [calc_p_star.f, 198]         CALC_ep_star
    Use   [calc_p_star.f, 202]         CALC_ep_star
    Use   [calc_p_star.f, 204]         CALC_ep_star
    Use   [calc_p_star.f, 207]         CALC_ep_star
    Use   [calc_p_star.f, 208]         CALC_ep_star
    Use   [calc_p_star.f, 211]         CALC_ep_star
    Use   [calc_p_star.f, 212]         CALC_ep_star
    Set   [calc_p_star.f, 233]         CALC_ep_star
    Use   [calc_p_star.f, 234]         CALC_ep_star
    Use   [calc_p_star.f, 235]         CALC_ep_star
    Use   [calc_p_star.f, 235]         CALC_ep_star
    Use   [calc_p_star.f, 237]         CALC_ep_star
    Use   [calc_p_star.f, 237]         CALC_ep_star
    Use   [calc_p_star.f, 239]         CALC_ep_star
    Set   [calc_p_star.f, 257]         CALC_ep_star
    Use   [calc_p_star.f, 258]         CALC_ep_star
    Use   [calc_p_star.f, 259]         CALC_ep_star
    Use   [calc_p_star.f, 260]         CALC_ep_star
    Use   [calc_p_star.f, 260]         CALC_ep_star
    Use   [calc_p_star.f, 260]         CALC_ep_star
    Use   [calc_p_star.f, 263]         CALC_ep_star
    Use   [calc_p_star.f, 263]         CALC_ep_star
    Use   [calc_p_star.f, 263]         CALC_ep_star
    Use   [calc_p_star.f, 266]         CALC_ep_star
    Use   [calc_p_star.f, 267]         CALC_ep_star
    Use   [calc_p_star.f, 268]         CALC_ep_star
    Use   [calc_p_star.f, 268]         CALC_ep_star
    Use   [calc_p_star.f, 270]         CALC_ep_star
    Set   [calc_p_star.f, 281]         CALC_ep_star
    Use   [calc_p_star.f, 282]         CALC_ep_star
    Use   [calc_p_star.f, 286]         CALC_ep_star
    Use   [calc_p_star.f, 286]         CALC_ep_star
    Use   [calc_p_star.f, 286]         CALC_ep_star
    Set   [calc_p_star.f, 292]         CALC_ep_star
    Use   [calc_p_star.f, 293]         CALC_ep_star
    Use   [calc_p_star.f, 297]         CALC_ep_star
    Use   [calc_p_star.f, 297]         CALC_ep_star
    Use   [calc_p_star.f, 297]         CALC_ep_star

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 320]          CALC_CG_TAU_U_S
    Set   [tau_u_s.f, 343]             CALC_CG_TAU_U_S
    Use   [tau_u_s.f, 344]             CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 376]    CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 377]    CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 520]    CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 521]    CALC_CG_TAU_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 170]          CALC_REG_TAU_U_S
    Set   [tau_u_s.f, 183]             CALC_REG_TAU_U_S
    Use   [tau_u_s.f, 184]             CALC_REG_TAU_U_S
    Use Argument   [tau_u_s.f, 226]    CALC_REG_TAU_U_S
    Use Argument   [tau_u_s.f, 227]    CALC_REG_TAU_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 170]     FUNC_JACOBI_EVAL
    Set   [cooling_rate.f, 178]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 179]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 179]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 180]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 180]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 180]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 180]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 180]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 181]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 181]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 183]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 183]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 183]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 183]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 185]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 185]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 185]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 186]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 186]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 186]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 186]        FUNC_JACOBI_EVAL
    Set   [cooling_rate.f, 215]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 217]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 217]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 217]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 219]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 220]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 220]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 224]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 224]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 225]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 225]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 226]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 226]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 230]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 234]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 234]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 235]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 236]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 236]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 243]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 245]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 251]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 251]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 259]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 260]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 261]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 261]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 262]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 262]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 263]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 263]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL

j    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 395]     lubksb
    Set   [cooling_rate.f, 405]        lubksb
    Use   [cooling_rate.f, 406]        lubksb
    Use   [cooling_rate.f, 406]        lubksb
    Set   [cooling_rate.f, 416]        lubksb
    Use   [cooling_rate.f, 417]        lubksb
    Use   [cooling_rate.f, 417]        lubksb

j    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 308]     ludcmp
    Set   [cooling_rate.f, 316]        ludcmp
    Use   [cooling_rate.f, 317]        ludcmp
    Use   [cooling_rate.f, 317]        ludcmp
    Set   [cooling_rate.f, 326]        ludcmp
    Use   [cooling_rate.f, 327]        ludcmp
    Use   [cooling_rate.f, 328]        ludcmp
    Use   [cooling_rate.f, 330]        ludcmp
    Use   [cooling_rate.f, 332]        ludcmp
    Use   [cooling_rate.f, 335]        ludcmp
    Use   [cooling_rate.f, 336]        ludcmp
    Use   [cooling_rate.f, 337]        ludcmp
    Use   [cooling_rate.f, 338]        ludcmp
    Use   [cooling_rate.f, 340]        ludcmp
    Use   [cooling_rate.f, 347]        ludcmp
    Use   [cooling_rate.f, 350]        ludcmp
    Use   [cooling_rate.f, 351]        ludcmp
    Use   [cooling_rate.f, 354]        ludcmp
    Use   [cooling_rate.f, 356]        ludcmp
    Use   [cooling_rate.f, 357]        ludcmp
    Use   [cooling_rate.f, 357]        ludcmp
    Use   [cooling_rate.f, 357]        ludcmp
    Use   [cooling_rate.f, 357]        ludcmp
    Use   [cooling_rate.f, 358]        ludcmp
    Use   [cooling_rate.f, 359]        ludcmp
    Use   [cooling_rate.f, 359]        ludcmp
    Use   [cooling_rate.f, 360]        ludcmp
    Use   [cooling_rate.f, 361]        ludcmp
    Use   [cooling_rate.f, 361]        ludcmp

J    (Local Variable)  Declared as: INTEGER
    Define   [set_geometry1.f, 48]     SET_GEOMETRY1
    Set   [set_geometry1.f, 73]        SET_GEOMETRY1
    Use   [set_geometry1.f, 74]        SET_GEOMETRY1
    Use Argument   [set_geometry1.f, 78]   SET_GEOMETRY1
    Use   [set_geometry1.f, 79]        SET_GEOMETRY1
    Use   [set_geometry1.f, 82]        SET_GEOMETRY1
    Use   [set_geometry1.f, 83]        SET_GEOMETRY1
    Use   [set_geometry1.f, 84]        SET_GEOMETRY1
    Use   [set_geometry1.f, 85]        SET_GEOMETRY1
    Use   [set_geometry1.f, 87]        SET_GEOMETRY1
    Use   [set_geometry1.f, 88]        SET_GEOMETRY1
    Use   [set_geometry1.f, 89]        SET_GEOMETRY1
    Use   [set_geometry1.f, 90]        SET_GEOMETRY1
    Use   [set_geometry1.f, 92]        SET_GEOMETRY1
    Use   [set_geometry1.f, 93]        SET_GEOMETRY1
    Use   [set_geometry1.f, 94]        SET_GEOMETRY1
    Use   [set_geometry1.f, 104]       SET_GEOMETRY1
    Use   [set_geometry1.f, 105]       SET_GEOMETRY1
    Use   [set_geometry1.f, 106]       SET_GEOMETRY1
    Use   [set_geometry1.f, 107]       SET_GEOMETRY1
    Use   [set_geometry1.f, 109]       SET_GEOMETRY1
    Use   [set_geometry1.f, 110]       SET_GEOMETRY1
    Use   [set_geometry1.f, 111]       SET_GEOMETRY1
    Use   [set_geometry1.f, 112]       SET_GEOMETRY1
    Use   [set_geometry1.f, 114]       SET_GEOMETRY1
    Use   [set_geometry1.f, 115]       SET_GEOMETRY1
    Use   [set_geometry1.f, 116]       SET_GEOMETRY1
    Use   [set_geometry1.f, 125]       SET_GEOMETRY1
    Use   [set_geometry1.f, 126]       SET_GEOMETRY1

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc1.f, 257]          SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 371]             SET_BC1_ADJUST_OUTFLOW
    Use Argument   [set_bc1.f, 373]    SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 374]             SET_BC1_ADJUST_OUTFLOW
    Use Argument   [set_bc1.f, 375]    SET_BC1_ADJUST_OUTFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc1.f, 89]           SET_BC1_JET
    Set   [set_bc1.f, 109]             SET_BC1_JET
    Use Argument   [set_bc1.f, 111]    SET_BC1_JET
    Use   [set_bc1.f, 112]             SET_BC1_JET
    Use Argument   [set_bc1.f, 113]    SET_BC1_JET

J    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 549]     PARTIAL_ELIM_V
    Set   [partial_elim.f, 587]        PARTIAL_ELIM_V
    Use Argument   [partial_elim.f, 589]   PARTIAL_ELIM_V

j    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 318]     GET_UCELL_SDIFF_TERMS
    Set   [conv_dif_u_s.f, 331]        GET_UCELL_SDIFF_TERMS
    Use   [conv_dif_u_s.f, 334]        GET_UCELL_SDIFF_TERMS
    Use   [conv_dif_u_s.f, 358]        GET_UCELL_SDIFF_TERMS
    Use Argument   [conv_dif_u_s.f, 371]   GET_UCELL_SDIFF_TERMS
    Use Argument   [conv_dif_u_s.f, 372]   GET_UCELL_SDIFF_TERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 602]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 642]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 644]        STORE_A_U_SDC

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_g.f, 72]     CG_SOURCE_V_G
    Set   [CG_source_v_g.f, 119]       CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 122]   CG_SOURCE_V_G
    Use   [CG_source_v_g.f, 202]       CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 221]   CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 224]   CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 242]   CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 245]   CG_SOURCE_V_G
    Use   [CG_source_v_g.f, 267]       CG_SOURCE_V_G
    Use   [CG_source_v_g.f, 271]       CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 274]   CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 276]   CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 278]   CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 279]   CG_SOURCE_V_G

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_g.f, 408]    CG_SOURCE_V_G_BC
    Set   [CG_source_v_g.f, 465]       CG_SOURCE_V_G_BC
    Use   [CG_source_v_g.f, 469]       CG_SOURCE_V_G_BC
    Set   [CG_source_v_g.f, 577]       CG_SOURCE_V_G_BC
    Use   [CG_source_v_g.f, 581]       CG_SOURCE_V_G_BC
    Use Argument   [CG_source_v_g.f, 584]   CG_SOURCE_V_G_BC
    Use   [CG_source_v_g.f, 609]       CG_SOURCE_V_G_BC
    Use   [CG_source_v_g.f, 610]       CG_SOURCE_V_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1050]      JJ_BC_W_S
    Set   [source_w_s.f, 1056]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1058]   JJ_BC_W_S
    Use   [source_w_s.f, 1059]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1060]   JJ_BC_W_S
    Use   [source_w_s.f, 1063]         JJ_BC_W_S
    Use   [source_w_s.f, 1147]         JJ_BC_W_S
    Use   [source_w_s.f, 1148]         JJ_BC_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1220]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1241]         POINT_SOURCE_W_S
    Use Argument   [source_w_s.f, 1244]   POINT_SOURCE_W_S
    Use   [source_w_s.f, 1245]         POINT_SOURCE_W_S
    Use Argument   [source_w_s.f, 1247]   POINT_SOURCE_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 78]        SOURCE_W_S
    Set   [source_w_s.f, 132]          SOURCE_W_S
    Use   [source_w_s.f, 341]          SOURCE_W_S
    Use Argument   [source_w_s.f, 342]   SOURCE_W_S
    Use   [source_w_s.f, 450]          SOURCE_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 567]       SOURCE_W_S_BC
    Set   [source_w_s.f, 702]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 704]   SOURCE_W_S_BC
    Use   [source_w_s.f, 705]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 706]   SOURCE_W_S_BC
    Set   [source_w_s.f, 741]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 743]   SOURCE_W_S_BC
    Use   [source_w_s.f, 744]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 745]   SOURCE_W_S_BC
    Set   [source_w_s.f, 780]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 782]   SOURCE_W_S_BC
    Use   [source_w_s.f, 783]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 784]   SOURCE_W_S_BC
    Use   [source_w_s.f, 787]          SOURCE_W_S_BC
    Use   [source_w_s.f, 838]          SOURCE_W_S_BC
    Use   [source_w_s.f, 839]          SOURCE_W_S_BC
    Set   [source_w_s.f, 870]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 872]   SOURCE_W_S_BC
    Use   [source_w_s.f, 873]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 874]   SOURCE_W_S_BC
    Set   [source_w_s.f, 897]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 899]   SOURCE_W_S_BC
    Use   [source_w_s.f, 900]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 901]   SOURCE_W_S_BC
    Set   [source_w_s.f, 930]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 932]   SOURCE_W_S_BC
    Use   [source_w_s.f, 933]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 934]   SOURCE_W_S_BC
    Set   [source_w_s.f, 958]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 960]   SOURCE_W_S_BC
    Use   [source_w_s.f, 961]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 962]   SOURCE_W_S_BC

j    (Local Variable)  Declared as: INTEGER
    Define   [dufour_coeff.f, 32]      dufour_coeff
    Set   [dufour_coeff.f, 48]         dufour_coeff
    Use   [dufour_coeff.f, 49]         dufour_coeff
    Use   [dufour_coeff.f, 50]         dufour_coeff
    Use   [dufour_coeff.f, 52]         dufour_coeff
    Set   [dufour_coeff.f, 61]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 64]         dufour_coeff
    Use   [dufour_coeff.f, 64]         dufour_coeff
    Use   [dufour_coeff.f, 64]         dufour_coeff
    Use   [dufour_coeff.f, 76]         dufour_coeff
    Use   [dufour_coeff.f, 76]         dufour_coeff
    Use   [dufour_coeff.f, 76]         dufour_coeff
    Use   [dufour_coeff.f, 85]         dufour_coeff
    Use   [dufour_coeff.f, 85]         dufour_coeff
    Use   [dufour_coeff.f, 85]         dufour_coeff
    Set   [dufour_coeff.f, 93]         dufour_coeff
    Use   [dufour_coeff.f, 95]         dufour_coeff
    Use   [dufour_coeff.f, 95]         dufour_coeff
    Use   [dufour_coeff.f, 96]         dufour_coeff
    Use   [dufour_coeff.f, 97]         dufour_coeff
    Use   [dufour_coeff.f, 97]         dufour_coeff
    Use   [dufour_coeff.f, 97]         dufour_coeff
    Use   [dufour_coeff.f, 99]         dufour_coeff
    Use   [dufour_coeff.f, 99]         dufour_coeff
    Use   [dufour_coeff.f, 100]        dufour_coeff
    Use   [dufour_coeff.f, 100]        dufour_coeff
    Use   [dufour_coeff.f, 101]        dufour_coeff
    Use   [dufour_coeff.f, 102]        dufour_coeff
    Use   [dufour_coeff.f, 103]        dufour_coeff
    Set   [dufour_coeff.f, 120]        dufour_coeff
    Use   [dufour_coeff.f, 121]        dufour_coeff
    Use   [dufour_coeff.f, 121]        dufour_coeff
    Set   [dufour_coeff.f, 138]        dufour_coeff
    Use   [dufour_coeff.f, 139]        dufour_coeff
    Use   [dufour_coeff.f, 139]        dufour_coeff
    Use   [dufour_coeff.f, 140]        dufour_coeff
    Use   [dufour_coeff.f, 140]        dufour_coeff
    Use   [dufour_coeff.f, 140]        dufour_coeff
    Set   [dufour_coeff.f, 147]        dufour_coeff
    Use   [dufour_coeff.f, 148]        dufour_coeff
    Use   [dufour_coeff.f, 150]        dufour_coeff
    Use   [dufour_coeff.f, 153]        dufour_coeff
    Use   [dufour_coeff.f, 153]        dufour_coeff
    Use   [dufour_coeff.f, 158]        dufour_coeff
    Use   [dufour_coeff.f, 159]        dufour_coeff
    Use   [dufour_coeff.f, 159]        dufour_coeff
    Set   [dufour_coeff.f, 167]        dufour_coeff
    Use   [dufour_coeff.f, 169]        dufour_coeff
    Use   [dufour_coeff.f, 169]        dufour_coeff
    Use   [dufour_coeff.f, 173]        dufour_coeff
    Use   [dufour_coeff.f, 174]        dufour_coeff
    Use   [dufour_coeff.f, 174]        dufour_coeff
    Use   [dufour_coeff.f, 174]        dufour_coeff
    Use   [dufour_coeff.f, 175]        dufour_coeff
    Use   [dufour_coeff.f, 176]        dufour_coeff
    Use   [dufour_coeff.f, 176]        dufour_coeff
    Use   [dufour_coeff.f, 177]        dufour_coeff
    Use   [dufour_coeff.f, 178]        dufour_coeff
    Use   [dufour_coeff.f, 178]        dufour_coeff
    Use   [dufour_coeff.f, 181]        dufour_coeff
    Use   [dufour_coeff.f, 181]        dufour_coeff
    Use   [dufour_coeff.f, 181]        dufour_coeff

J    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 222]   CALC_DES_BEDHEIGHT
    Set   [des_granular_temperature.f, 238]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 241]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 241]   CALC_DES_BEDHEIGHT

J    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 37]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 69]   DES_GRANULAR_TEMPERATURE

J    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 87]   SOURCE_GRANULAR_ENERGY
    Set   [source_granular_energy.f, 109]   SOURCE_GRANULAR_ENERGY
    Use   [source_granular_energy.f, 112]   SOURCE_GRANULAR_ENERGY
    Use Argument   [source_granular_energy.f, 204]   SOURCE_GRANULAR_ENERGY
    Use   [source_granular_energy.f, 214]   SOURCE_GRANULAR_ENERGY

J    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 631]   SOURCE_GRANULAR_ENERGY_GD
    Set   [source_granular_energy.f, 656]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 659]   SOURCE_GRANULAR_ENERGY_GD
    Use Argument   [source_granular_energy.f, 749]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 760]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 761]   SOURCE_GRANULAR_ENERGY_GD

J    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 298]   SOURCE_GRANULAR_ENERGY_IA
    Set   [source_granular_energy.f, 338]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 341]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 488]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 497]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 510]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 511]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 524]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 537]   SOURCE_GRANULAR_ENERGY_IA

J    (Local Variable)  Declared as: INTEGER
    Define   [set_flags.f, 62]         SET_FLAGS
    Set   [set_flags.f, 96]            SET_FLAGS
    Use Argument   [set_flags.f, 99]   SET_FLAGS
    Use Argument   [set_flags.f, 103]   SET_FLAGS
    Use Argument   [set_flags.f, 106]   SET_FLAGS
    Use   [set_flags.f, 109]           SET_FLAGS
    Use   [set_flags.f, 112]           SET_FLAGS
    Use Argument   [set_flags.f, 115]   SET_FLAGS
    Use Argument   [set_flags.f, 118]   SET_FLAGS
    Set   [set_flags.f, 181]           SET_FLAGS
    Use   [set_flags.f, 183]           SET_FLAGS
    Use Argument   [set_flags.f, 183]   SET_FLAGS
    Set   [set_flags.f, 189]           SET_FLAGS
    Use   [set_flags.f, 192]           SET_FLAGS
    Use   [set_flags.f, 192]           SET_FLAGS
    Use   [set_flags.f, 195]           SET_FLAGS
    Use   [set_flags.f, 196]           SET_FLAGS
    Use   [set_flags.f, 196]           SET_FLAGS
    Use   [set_flags.f, 200]           SET_FLAGS
    Use   [set_flags.f, 200]           SET_FLAGS
    Use   [set_flags.f, 204]           SET_FLAGS
    Use   [set_flags.f, 204]           SET_FLAGS
    Use   [set_flags.f, 207]           SET_FLAGS
    Use   [set_flags.f, 208]           SET_FLAGS
    Use   [set_flags.f, 208]           SET_FLAGS
    Use   [set_flags.f, 212]           SET_FLAGS
    Use   [set_flags.f, 212]           SET_FLAGS
    Set   [set_flags.f, 246]           SET_FLAGS
    Use Argument   [set_flags.f, 247]   SET_FLAGS
    Use   [set_flags.f, 248]           SET_FLAGS
    Use Argument   [set_flags.f, 249]   SET_FLAGS
    Set   [set_flags.f, 257]           SET_FLAGS
    Use Argument   [set_flags.f, 258]   SET_FLAGS
    Use   [set_flags.f, 259]           SET_FLAGS
    Use Argument   [set_flags.f, 260]   SET_FLAGS
    Set   [set_flags.f, 269]           SET_FLAGS
    Use Argument   [set_flags.f, 272]   SET_FLAGS
    Use   [set_flags.f, 273]           SET_FLAGS
    Use Argument   [set_flags.f, 274]   SET_FLAGS
    Set   [set_flags.f, 280]           SET_FLAGS
    Use Argument   [set_flags.f, 283]   SET_FLAGS
    Use   [set_flags.f, 284]           SET_FLAGS
    Use Argument   [set_flags.f, 285]   SET_FLAGS
    Set   [set_flags.f, 295]           SET_FLAGS
    Use Argument   [set_flags.f, 297]   SET_FLAGS
    Use   [set_flags.f, 298]           SET_FLAGS
    Use Argument   [set_flags.f, 299]   SET_FLAGS
    Set   [set_flags.f, 306]           SET_FLAGS
    Use Argument   [set_flags.f, 308]   SET_FLAGS
    Use   [set_flags.f, 309]           SET_FLAGS
    Use Argument   [set_flags.f, 310]   SET_FLAGS

J    (Local Variable)  Declared as: INTEGER
    Define   [set_flags.f, 393]        SET_FLAGS1
    Set   [set_flags.f, 416]           SET_FLAGS1
    Use Argument   [set_flags.f, 418]   SET_FLAGS1
    Use   [set_flags.f, 419]           SET_FLAGS1
    Use   [set_flags.f, 437]           SET_FLAGS1
    Use   [set_flags.f, 437]           SET_FLAGS1
    Use   [set_flags.f, 437]           SET_FLAGS1
    Use   [set_flags.f, 437]           SET_FLAGS1
    Use   [set_flags.f, 445]           SET_FLAGS1
    Use   [set_flags.f, 455]           SET_FLAGS1
    Use   [set_flags.f, 455]           SET_FLAGS1
    Use   [set_flags.f, 455]           SET_FLAGS1
    Use   [set_flags.f, 455]           SET_FLAGS1

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 682]        leq_check
    Set   [leq_gmres.f, 703]           leq_check
    Use   [leq_gmres.f, 706]           leq_check
    Use   [leq_gmres.f, 706]           leq_check
    Use Argument   [leq_gmres.f, 712]   leq_check

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 48]          DIF_U_IS
    Set   [dif_u_is.f, 73]             DIF_U_IS
    Use Argument   [dif_u_is.f, 75]    DIF_U_IS
    Use   [dif_u_is.f, 76]             DIF_U_IS
    Use Argument   [dif_u_is.f, 77]    DIF_U_IS
    Use Argument   [dif_u_is.f, 83]    DIF_U_IS
    Use Argument   [dif_u_is.f, 84]    DIF_U_IS
    Use   [dif_u_is.f, 85]             DIF_U_IS
    Set   [dif_u_is.f, 96]             DIF_U_IS
    Use Argument   [dif_u_is.f, 98]    DIF_U_IS
    Use   [dif_u_is.f, 99]             DIF_U_IS
    Use Argument   [dif_u_is.f, 100]   DIF_U_IS

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_set_outflow.f, 59]    CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 83]       CG_SET_OUTFLOW
    Use Argument   [CG_set_outflow.f, 87]   CG_SET_OUTFLOW

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_cg.f, 162]           LEQ_CG0
    Set   [leq_cg.f, 203]              LEQ_CG0
    Use Argument   [leq_cg.f, 204]     LEQ_CG0

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 983]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1025]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1027]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1029]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1035]   IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1037]   IJK_Pg_SEARCH
    Set   [set_bc0.f, 1100]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1114]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1126]   IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1127]   IJK_Pg_SEARCH

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 395]          SET_BC0_INFLOW
    Set   [set_bc0.f, 405]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 407]    SET_BC0_INFLOW
    Use   [set_bc0.f, 408]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 409]    SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 449]    SET_BC0_INFLOW
    Use   [set_bc0.f, 453]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 457]    SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 504]    SET_BC0_INFLOW
    Use   [set_bc0.f, 507]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 510]    SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 540]    SET_BC0_INFLOW
    Use   [set_bc0.f, 544]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 548]    SET_BC0_INFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 703]          set_bc0_init_bcscalars
    Set   [set_bc0.f, 711]             set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 713]    set_bc0_init_bcscalars
    Use   [set_bc0.f, 714]             set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 715]    set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 719]    set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 721]    set_bc0_init_bcscalars
    Use   [set_bc0.f, 723]             set_bc0_init_bcscalars
    Use   [set_bc0.f, 725]             set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 727]    set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 729]    set_bc0_init_bcscalars

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 238]          SET_BC0_OUTFLOW
    Set   [set_bc0.f, 245]             SET_BC0_OUTFLOW
    Use Argument   [set_bc0.f, 247]    SET_BC0_OUTFLOW
    Use   [set_bc0.f, 248]             SET_BC0_OUTFLOW
    Use Argument   [set_bc0.f, 249]    SET_BC0_OUTFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 127]          SET_BC0_WALLS
    Set   [set_bc0.f, 131]             SET_BC0_WALLS
    Use Argument   [set_bc0.f, 134]    SET_BC0_WALLS
    Use   [set_bc0.f, 135]             SET_BC0_WALLS
    Use Argument   [set_bc0.f, 136]    SET_BC0_WALLS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_philoss.f, 70]       GET_PHILOSS
    Set   [get_philoss.f, 90]          GET_PHILOSS
    Use Argument   [get_philoss.f, 92]   GET_PHILOSS
    Use   [get_philoss.f, 93]          GET_PHILOSS
    Use Argument   [get_philoss.f, 94]   GET_PHILOSS
    Use   [get_philoss.f, 117]         GET_PHILOSS
    Use   [get_philoss.f, 126]         GET_PHILOSS

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_vort_out.f, 348]    BAIRSTOW
    Set   [calc_vort_out.f, 452]       BAIRSTOW
    Use   [calc_vort_out.f, 453]       BAIRSTOW
    Use   [calc_vort_out.f, 453]       BAIRSTOW

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_vort_out.f, 32]     CALC_VORTICITY
    Set   [calc_vort_out.f, 42]        CALC_VORTICITY
    Use   [calc_vort_out.f, 48]        CALC_VORTICITY
    Use   [calc_vort_out.f, 49]        CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 55]   CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 57]   CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 59]   CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 61]   CALC_VORTICITY

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 960]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 985]          POINT_SOURCE_V_G
    Use Argument   [source_v_g.f, 988]   POINT_SOURCE_V_G
    Use   [source_v_g.f, 989]          POINT_SOURCE_V_G
    Use Argument   [source_v_g.f, 991]   POINT_SOURCE_V_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 84]        SOURCE_V_G
    Set   [source_v_g.f, 133]          SOURCE_V_G
    Use Argument   [source_v_g.f, 145]   SOURCE_V_G
    Use Argument   [source_v_g.f, 147]   SOURCE_V_G
    Use Argument   [source_v_g.f, 216]   SOURCE_V_G
    Use Argument   [source_v_g.f, 217]   SOURCE_V_G
    Use Argument   [source_v_g.f, 219]   SOURCE_V_G
    Use Argument   [source_v_g.f, 223]   SOURCE_V_G
    Use Argument   [source_v_g.f, 254]   SOURCE_V_G
    Use Argument   [source_v_g.f, 255]   SOURCE_V_G
    Use Argument   [source_v_g.f, 259]   SOURCE_V_G
    Use Argument   [source_v_g.f, 260]   SOURCE_V_G
    Use Argument   [source_v_g.f, 275]   SOURCE_V_G
    Use Argument   [source_v_g.f, 285]   SOURCE_V_G
    Use Argument   [source_v_g.f, 302]   SOURCE_V_G
    Use Argument   [source_v_g.f, 304]   SOURCE_V_G
    Use Argument   [source_v_g.f, 315]   SOURCE_V_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 424]       SOURCE_V_G_BC
    Set   [source_v_g.f, 584]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 586]   SOURCE_V_G_BC
    Use   [source_v_g.f, 587]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 588]   SOURCE_V_G_BC
    Set   [source_v_g.f, 619]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 621]   SOURCE_V_G_BC
    Use   [source_v_g.f, 622]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 623]   SOURCE_V_G_BC
    Set   [source_v_g.f, 654]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 656]   SOURCE_V_G_BC
    Use   [source_v_g.f, 657]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 658]   SOURCE_V_G_BC
    Set   [source_v_g.f, 727]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 729]   SOURCE_V_G_BC
    Use   [source_v_g.f, 730]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 731]   SOURCE_V_G_BC
    Set   [source_v_g.f, 784]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 786]   SOURCE_V_G_BC
    Use   [source_v_g.f, 787]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 788]   SOURCE_V_G_BC
    Set   [source_v_g.f, 815]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 817]   SOURCE_V_G_BC
    Use   [source_v_g.f, 818]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 819]   SOURCE_V_G_BC
    Set   [source_v_g.f, 848]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 850]   SOURCE_V_G_BC
    Use   [source_v_g.f, 851]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 852]   SOURCE_V_G_BC
    Set   [source_v_g.f, 881]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 883]   SOURCE_V_G_BC
    Use   [source_v_g.f, 884]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 885]   SOURCE_V_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_v_s.f, 108]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 141]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 143]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 146]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 183]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 185]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 192]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 195]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 197]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 209]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 210]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 212]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 213]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 225]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 229]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 231]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 232]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 233]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 241]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 242]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 249]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 250]       CALC_IA_MOMSOURCE_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [transport_coeff_ghd.f, 41]   TRANSPORT_COEFF_GHD
    Set   [transport_coeff_ghd.f, 57]   TRANSPORT_COEFF_GHD

J    (Local Variable)  Declared as: INTEGER
    Define   [get_delh.f, 37]          GET_DEL_H
    Set   [get_delh.f, 153]            GET_DEL_H
    Use   [get_delh.f, 157]            GET_DEL_H
    Use   [get_delh.f, 159]            GET_DEL_H

J    (Local Variable)  Declared as: INTEGER
    Define   [get_delh.f, 195]         GET_DEL_H_DES
    Set   [get_delh.f, 313]            GET_DEL_H_DES
    Use   [get_delh.f, 317]            GET_DEL_H_DES

j    (Dummy Argument)  Declared as: INTEGER
    Define   [chi_ij_GHD.f, 1]         chi_ij_GHD
    Declare   [chi_ij_GHD.f, 8]        chi_ij_GHD
    Use   [chi_ij_GHD.f, 25]           chi_ij_GHD
    Use   [chi_ij_GHD.f, 26]           chi_ij_GHD

j    (Local Variable)  Declared as: INTEGER
    Define   [bulk_viscosity.f, 23]    bulk_viscosity
    Set   [bulk_viscosity.f, 30]       bulk_viscosity
    Use   [bulk_viscosity.f, 31]       bulk_viscosity
    Use   [bulk_viscosity.f, 31]       bulk_viscosity
    Use   [bulk_viscosity.f, 31]       bulk_viscosity
    Use   [bulk_viscosity.f, 32]       bulk_viscosity
    Use   [bulk_viscosity.f, 32]       bulk_viscosity
    Use   [bulk_viscosity.f, 32]       bulk_viscosity
    Use   [bulk_viscosity.f, 33]       bulk_viscosity
    Use   [bulk_viscosity.f, 33]       bulk_viscosity

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 3028]       CALC_BOYLE_MASSOUDI_STRESS
    Set   [calc_mu_s.f, 3043]          CALC_BOYLE_MASSOUDI_STRESS
    Use   [calc_mu_s.f, 3046]          CALC_BOYLE_MASSOUDI_STRESS
    Use   [calc_mu_s.f, 3060]          CALC_BOYLE_MASSOUDI_STRESS
    Use   [calc_mu_s.f, 3061]          CALC_BOYLE_MASSOUDI_STRESS
    Use   [calc_mu_s.f, 3063]          CALC_BOYLE_MASSOUDI_STRESS

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2663]       init1_mu_s
    Set   [calc_mu_s.f, 2691]          init1_mu_s
    Use   [calc_mu_s.f, 2694]          init1_mu_s
    Use Argument   [calc_mu_s.f, 2720]   init1_mu_s
    Use Argument   [calc_mu_s.f, 2761]   init1_mu_s
    Use   [calc_mu_s.f, 2811]          init1_mu_s
    Use   [calc_mu_s.f, 2816]          init1_mu_s
    Use   [calc_mu_s.f, 2818]          init1_mu_s
    Use Argument   [calc_mu_s.f, 2857]   init1_mu_s
    Use Argument   [calc_mu_s.f, 2898]   init1_mu_s
    Use   [calc_mu_s.f, 2948]          init1_mu_s
    Use   [calc_mu_s.f, 2954]          init1_mu_s
    Use   [calc_mu_s.f, 2956]          init1_mu_s

J    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 42]           VF_GS_Y
    Set   [vf_gs_y.f, 53]              VF_GS_Y
    Use Argument   [vf_gs_y.f, 56]     VF_GS_Y
    Set   [vf_gs_y.f, 67]              VF_GS_Y
    Use Argument   [vf_gs_y.f, 70]     VF_GS_Y

J    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 122]          VF_SS_Y
    Set   [vf_gs_y.f, 136]             VF_SS_Y
    Use Argument   [vf_gs_y.f, 138]    VF_SS_Y
    Set   [vf_gs_y.f, 154]             VF_SS_Y
    Use Argument   [vf_gs_y.f, 156]    VF_SS_Y

J    (Local Variable)  Declared as: INTEGER
    Define   [check_odepack_stiff_chem.f, 47]   CHECK_ODEPACK_STIFF_CHEM
    Set   [check_odepack_stiff_chem.f, 77]   CHECK_ODEPACK_STIFF_CHEM
    Use Argument   [check_odepack_stiff_chem.f, 79]   CHECK_ODEPACK_STIFF_CHEM

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_rop_g.f, 94]        CONV_ROP_G0
    Set   [conv_rop_g.f, 118]          CONV_ROP_G0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_rop_g.f, 205]       CONV_ROP_G1
    Set   [conv_rop_g.f, 232]          CONV_ROP_G1

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 275]     MPPIC_COMP_EULERIAN_VELS_CG
    Set   [pic_routines.f, 282]        MPPIC_COMP_EULERIAN_VELS_CG
    Use Argument   [pic_routines.f, 291]   MPPIC_COMP_EULERIAN_VELS_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 195]     MPPIC_COMP_EULERIAN_VELS_NON_CG
    Set   [pic_routines.f, 202]        MPPIC_COMP_EULERIAN_VELS_NON_CG
    Use Argument   [pic_routines.f, 210]   MPPIC_COMP_EULERIAN_VELS_NON_CG
    Use   [pic_routines.f, 221]        MPPIC_COMP_EULERIAN_VELS_NON_CG
    Use   [pic_routines.f, 221]        MPPIC_COMP_EULERIAN_VELS_NON_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 591]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 650]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 668]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 671]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 700]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 720]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 728]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 744]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 777]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 780]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 787]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 790]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 826]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 827]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 828]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 841]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 843]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 847]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 850]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 852]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 854]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 855]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 860]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 860]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 863]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 863]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 865]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 865]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 867]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 871]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 871]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 873]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 873]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 874]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 878]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 878]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 880]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 880]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 882]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 886]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 887]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 888]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 893]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 893]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 895]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 895]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 897]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 897]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 911]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 911]        MPPIC_COMPUTE_PS_GRAD

j    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1227]    WRITE_MPPIC_VEL_S
    Set   [pic_routines.f, 1244]       WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 1246]   WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1254]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1254]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1259]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1259]       WRITE_MPPIC_VEL_S

j    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1188]    WRITE_NODEDATA
    Set   [pic_routines.f, 1195]       WRITE_NODEDATA
    Use Argument   [pic_routines.f, 1197]   WRITE_NODEDATA
    Use   [pic_routines.f, 1200]       WRITE_NODEDATA

J    (Local Variable)  Declared as: INTEGER
    Define   [get_master.f, 32]        GET_U_MASTER_CELLS
    Set   [get_master.f, 69]           GET_U_MASTER_CELLS
    Use   [get_master.f, 132]          GET_U_MASTER_CELLS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_master.f, 187]       GET_V_MASTER_CELLS
    Set   [get_master.f, 212]          GET_V_MASTER_CELLS
    Use   [get_master.f, 277]          GET_V_MASTER_CELLS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_master.f, 330]       GET_W_MASTER_CELLS
    Set   [get_master.f, 355]          GET_W_MASTER_CELLS
    Use   [get_master.f, 420]          GET_W_MASTER_CELLS

J    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_k.f, 35]          MOD_BC_K
    Set   [mod_bc_k.f, 109]            MOD_BC_K
    Use Argument   [mod_bc_k.f, 113]   MOD_BC_K
    Use Argument   [mod_bc_k.f, 114]   MOD_BC_K
    Use   [mod_bc_k.f, 115]            MOD_BC_K
    Use   [mod_bc_k.f, 116]            MOD_BC_K
    Use Argument   [mod_bc_k.f, 118]   MOD_BC_K
    Use Argument   [mod_bc_k.f, 119]   MOD_BC_K
    Set   [mod_bc_k.f, 141]            MOD_BC_K
    Use Argument   [mod_bc_k.f, 145]   MOD_BC_K
    Use Argument   [mod_bc_k.f, 146]   MOD_BC_K
    Use   [mod_bc_k.f, 147]            MOD_BC_K
    Use   [mod_bc_k.f, 148]            MOD_BC_K
    Use Argument   [mod_bc_k.f, 150]   MOD_BC_K
    Use Argument   [mod_bc_k.f, 151]   MOD_BC_K
    Use   [mod_bc_k.f, 157]            MOD_BC_K
    Use   [mod_bc_k.f, 158]            MOD_BC_K

J    (Local Variable)  Declared as: INTEGER
    Define   [adjust_eps_ghd.f, 59]    ADJUST_EPS_GHD
    Set   [adjust_eps_ghd.f, 92]       ADJUST_EPS_GHD
    Use Argument   [adjust_eps_ghd.f, 106]   ADJUST_EPS_GHD

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 31]   CHECK_CELL_MOVEMENT
    Set   [check_cell_movement.f, 49]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 53]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 53]   CHECK_CELL_MOVEMENT

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 97]   CHECK_CELL_MOVEMENT_DEM
    Set   [check_cell_movement.f, 116]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 125]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 125]   CHECK_CELL_MOVEMENT_DEM
    Use Argument   [check_cell_movement.f, 127]   CHECK_CELL_MOVEMENT_DEM

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 205]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 236]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 274]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 274]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 276]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 283]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 295]   CHECK_CELL_MOVEMENT_PIC

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 396]   REPORT_PIC_STATS
    Set   [check_cell_movement.f, 415]   REPORT_PIC_STATS
    Use Argument   [check_cell_movement.f, 417]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 421]   REPORT_PIC_STATS
    Set   [check_cell_movement.f, 441]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 444]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 445]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 445]   REPORT_PIC_STATS

J    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 548]   Calc_mass_flux_sp
    Set   [check_mass_balance.f, 556]   Calc_mass_flux_sp
    Use Argument   [check_mass_balance.f, 558]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 559]   Calc_mass_flux_sp
    Use Argument   [check_mass_balance.f, 563]   Calc_mass_flux_sp
    Use Argument   [check_mass_balance.f, 571]   Calc_mass_flux_sp
    Use Argument   [check_mass_balance.f, 579]   Calc_mass_flux_sp
    Use Argument   [check_mass_balance.f, 587]   Calc_mass_flux_sp
    Use Argument   [check_mass_balance.f, 595]   Calc_mass_flux_sp
    Use Argument   [check_mass_balance.f, 603]   Calc_mass_flux_sp

J    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 731]   Calc_mass_flux_spHR
    Set   [check_mass_balance.f, 745]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 747]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 748]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 752]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 757]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 762]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 767]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 772]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 777]   Calc_mass_flux_spHR

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_s_ddot_s.f, 1131]   SDDOTS
    Set   [calc_s_ddot_s.f, 1146]      SDDOTS
    Use   [calc_s_ddot_s.f, 1161]      SDDOTS
    Use   [calc_s_ddot_s.f, 1165]      SDDOTS
    Use   [calc_s_ddot_s.f, 1166]      SDDOTS

J    (Local Variable)  Declared as: INTEGER
    Define   [DGTSV.f, 81]             DGTSV
    Set   [DGTSV.f, 173]               DGTSV
    Use   [DGTSV.f, 174]               DGTSV
    Use   [DGTSV.f, 174]               DGTSV
    Use   [DGTSV.f, 174]               DGTSV
    Set   [DGTSV.f, 192]               DGTSV
    Use   [DGTSV.f, 193]               DGTSV
    Use   [DGTSV.f, 194]               DGTSV
    Use   [DGTSV.f, 194]               DGTSV
    Use   [DGTSV.f, 195]               DGTSV
    Use   [DGTSV.f, 195]               DGTSV
    Set   [DGTSV.f, 205]               DGTSV
    Use   [DGTSV.f, 206]               DGTSV
    Use   [DGTSV.f, 206]               DGTSV
    Use   [DGTSV.f, 206]               DGTSV
    Set   [DGTSV.f, 218]               DGTSV
    Use   [DGTSV.f, 219]               DGTSV
    Use   [DGTSV.f, 220]               DGTSV
    Use   [DGTSV.f, 220]               DGTSV
    Use   [DGTSV.f, 221]               DGTSV
    Use   [DGTSV.f, 221]               DGTSV
    Set   [DGTSV.f, 234]               DGTSV
    Use   [DGTSV.f, 236]               DGTSV
    Use   [DGTSV.f, 236]               DGTSV
    Use   [DGTSV.f, 238]               DGTSV
    Use   [DGTSV.f, 238]               DGTSV
    Use   [DGTSV.f, 238]               DGTSV
    Use   [DGTSV.f, 240]               DGTSV
    Use   [DGTSV.f, 240]               DGTSV
    Use   [DGTSV.f, 240]               DGTSV
    Use   [DGTSV.f, 241]               DGTSV
    Use   [DGTSV.f, 243]               DGTSV
    Set   [DGTSV.f, 244]               DGTSV
    Use   [DGTSV.f, 244]               DGTSV
    Set   [DGTSV.f, 248]               DGTSV
    Use   [DGTSV.f, 249]               DGTSV
    Use   [DGTSV.f, 249]               DGTSV
    Use   [DGTSV.f, 251]               DGTSV
    Use   [DGTSV.f, 251]               DGTSV
    Use   [DGTSV.f, 251]               DGTSV
    Use   [DGTSV.f, 254]               DGTSV
    Use   [DGTSV.f, 254]               DGTSV
    Use   [DGTSV.f, 254]               DGTSV
    Use   [DGTSV.f, 255]               DGTSV

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mi.f, 158]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 237]       SET_PIC_BCMI_IJK
    Use Argument   [set_bc_pic_mi.f, 241]   SET_PIC_BCMI_IJK
    Use Argument   [set_bc_pic_mi.f, 242]   SET_PIC_BCMI_IJK

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_s.f, 57]     CG_SOURCE_V_S
    Set   [CG_source_v_s.f, 96]        CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 106]   CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 110]   CG_SOURCE_V_S
    Use   [CG_source_v_s.f, 190]       CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 204]   CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 206]   CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 221]   CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 223]   CG_SOURCE_V_S
    Use   [CG_source_v_s.f, 240]       CG_SOURCE_V_S
    Use   [CG_source_v_s.f, 243]       CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 245]   CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 247]   CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 249]   CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 250]   CG_SOURCE_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_ghd_granular_energy.f, 55]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 95]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 98]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 194]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 195]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 212]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 267]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 268]   SOURCE_GHD_GRANULAR_ENERGY

J    (Local Variable)  Declared as: INTEGER
    Define   [set_fluidbed_p.f, 62]    SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 97]       SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 99]   SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 100]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 101]   SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 111]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 112]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 112]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 116]   SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 117]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 118]   SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 130]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 133]   SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 134]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 135]   SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 180]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 187]   SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 188]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 189]   SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 198]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 201]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 208]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 224]   SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 225]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 226]   SET_FLUIDBED_P

J    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 516]    LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 627]       LAYOUT_DEM_MI_EW
    Use Argument   [layout_mi_dem.f, 631]   LAYOUT_DEM_MI_EW
    Use Argument   [layout_mi_dem.f, 635]   LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 637]       LAYOUT_DEM_MI_EW
    Use Argument   [layout_mi_dem.f, 640]   LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 641]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 645]       LAYOUT_DEM_MI_EW
    Use Argument   [layout_mi_dem.f, 647]   LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 648]       LAYOUT_DEM_MI_EW
    Use Argument   [layout_mi_dem.f, 653]   LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 654]       LAYOUT_DEM_MI_EW
    Use Argument   [layout_mi_dem.f, 657]   LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 658]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 694]       LAYOUT_DEM_MI_EW

J    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 122]    LAYOUT_DEM_MI_NS
    Use Argument   [layout_mi_dem.f, 184]   LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 187]       LAYOUT_DEM_MI_NS
    Use Argument   [layout_mi_dem.f, 226]   LAYOUT_DEM_MI_NS
    Use Argument   [layout_mi_dem.f, 238]   LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 244]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 248]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 252]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 255]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 261]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 265]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 301]       LAYOUT_DEM_MI_NS

J    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 910]    LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1018]      LAYOUT_DEM_MI_TB
    Use Argument   [layout_mi_dem.f, 1021]   LAYOUT_DEM_MI_TB
    Use Argument   [layout_mi_dem.f, 1024]   LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1025]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1029]      LAYOUT_DEM_MI_TB
    Use Argument   [layout_mi_dem.f, 1032]   LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1033]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1036]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1070]      LAYOUT_DEM_MI_TB

J    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 1258]   SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1268]      SET_DEM_MI_OWNER
    Use Argument   [layout_mi_dem.f, 1272]   SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1280]      SET_DEM_MI_OWNER
    Use Argument   [layout_mi_dem.f, 1282]   SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1291]      SET_DEM_MI_OWNER
    Use Argument   [layout_mi_dem.f, 1292]   SET_DEM_MI_OWNER

J    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 42]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 136]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 140]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 144]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 145]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 146]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 176]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 180]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 185]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 226]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 230]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 231]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 324]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 326]   COMP_MEAN_FIELDS0
    Use Argument   [comp_mean_fields0.f, 327]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 337]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 337]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 425]   COMP_MEAN_FIELDS0
    Use Argument   [comp_mean_fields0.f, 429]   COMP_MEAN_FIELDS0

J    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 251]      SET_WALL_BC1
    Set   [set_wall_bc.f, 274]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 276]   SET_WALL_BC1
    Use   [set_wall_bc.f, 278]         SET_WALL_BC1

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 87]     CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 182]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 210]       CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 226]   CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 227]   CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 266]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 270]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 274]       CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 277]   CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 279]   CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 281]   CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 282]   CG_SOURCE_U_G

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 409]    CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 464]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 468]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 482]       CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 578]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 582]       CG_SOURCE_U_G_BC
    Use Argument   [CG_source_u_g.f, 585]   CG_SOURCE_U_G_BC
    Use Argument   [CG_source_u_g.f, 587]   CG_SOURCE_U_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 42]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 186]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 189]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 190]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 192]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 211]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 212]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 215]      DIF_PHI_BC_DES

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 288]   DIF_PHI_BC_DES_CG
    Set   [dif_phi_bc_des.f, 297]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 301]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 301]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 333]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 334]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 340]      DIF_PHI_BC_DES_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [adjust_eps.f, 44]        ADJUST_EPS
    Set   [adjust_eps.f, 55]           ADJUST_EPS
    Use   [adjust_eps.f, 58]           ADJUST_EPS
    Use Argument   [adjust_eps.f, 60]   ADJUST_EPS

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1002]      JJ_BC_V_S
    Set   [source_v_s.f, 1008]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1010]   JJ_BC_V_S
    Use   [source_v_s.f, 1011]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1013]   JJ_BC_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1170]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1192]         POINT_SOURCE_V_S
    Use Argument   [source_v_s.f, 1195]   POINT_SOURCE_V_S
    Use   [source_v_s.f, 1196]         POINT_SOURCE_V_S
    Use Argument   [source_v_s.f, 1198]   POINT_SOURCE_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 80]        SOURCE_V_S
    Set   [source_v_s.f, 136]          SOURCE_V_S
    Use Argument   [source_v_s.f, 153]   SOURCE_V_S
    Use Argument   [source_v_s.f, 165]   SOURCE_V_S
    Use Argument   [source_v_s.f, 283]   SOURCE_V_S
    Use Argument   [source_v_s.f, 307]   SOURCE_V_S
    Use Argument   [source_v_s.f, 309]   SOURCE_V_S
    Use Argument   [source_v_s.f, 312]   SOURCE_V_S
    Use Argument   [source_v_s.f, 342]   SOURCE_V_S
    Use Argument   [source_v_s.f, 343]   SOURCE_V_S
    Use Argument   [source_v_s.f, 347]   SOURCE_V_S
    Use Argument   [source_v_s.f, 348]   SOURCE_V_S
    Use Argument   [source_v_s.f, 364]   SOURCE_V_S
    Use Argument   [source_v_s.f, 369]   SOURCE_V_S
    Use Argument   [source_v_s.f, 381]   SOURCE_V_S
    Use Argument   [source_v_s.f, 386]   SOURCE_V_S
    Use Argument   [source_v_s.f, 397]   SOURCE_V_S
    Use Argument   [source_v_s.f, 399]   SOURCE_V_S
    Use Argument   [source_v_s.f, 410]   SOURCE_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 529]       SOURCE_V_S_BC
    Set   [source_v_s.f, 665]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 667]   SOURCE_V_S_BC
    Use   [source_v_s.f, 668]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 669]   SOURCE_V_S_BC
    Use   [source_v_s.f, 671]          SOURCE_V_S_BC
    Set   [source_v_s.f, 705]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 707]   SOURCE_V_S_BC
    Use   [source_v_s.f, 708]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 709]   SOURCE_V_S_BC
    Set   [source_v_s.f, 744]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 746]   SOURCE_V_S_BC
    Use   [source_v_s.f, 747]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 748]   SOURCE_V_S_BC
    Set   [source_v_s.f, 822]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 824]   SOURCE_V_S_BC
    Use   [source_v_s.f, 825]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 826]   SOURCE_V_S_BC
    Set   [source_v_s.f, 849]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 851]   SOURCE_V_S_BC
    Use   [source_v_s.f, 852]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 853]   SOURCE_V_S_BC
    Set   [source_v_s.f, 882]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 884]   SOURCE_V_S_BC
    Use   [source_v_s.f, 885]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 886]   SOURCE_V_S_BC
    Set   [source_v_s.f, 910]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 912]   SOURCE_V_S_BC
    Use   [source_v_s.f, 913]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 914]   SOURCE_V_S_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_i.f, 43]          MOD_BC_I
    Set   [mod_bc_i.f, 122]            MOD_BC_I
    Use Argument   [mod_bc_i.f, 124]   MOD_BC_I
    Use Argument   [mod_bc_i.f, 125]   MOD_BC_I
    Use   [mod_bc_i.f, 126]            MOD_BC_I
    Use   [mod_bc_i.f, 127]            MOD_BC_I
    Use Argument   [mod_bc_i.f, 129]   MOD_BC_I
    Use Argument   [mod_bc_i.f, 130]   MOD_BC_I
    Set   [mod_bc_i.f, 153]            MOD_BC_I
    Use Argument   [mod_bc_i.f, 155]   MOD_BC_I
    Use Argument   [mod_bc_i.f, 156]   MOD_BC_I
    Use   [mod_bc_i.f, 157]            MOD_BC_I
    Use   [mod_bc_i.f, 158]            MOD_BC_I
    Use Argument   [mod_bc_i.f, 160]   MOD_BC_I
    Use Argument   [mod_bc_i.f, 161]   MOD_BC_I
    Use   [mod_bc_i.f, 167]            MOD_BC_I
    Use   [mod_bc_i.f, 168]            MOD_BC_I

J    (Local Variable)  Declared as: INTEGER
    Define   [source_rop_g.f, 53]      SOURCE_ROP_G
    Set   [source_rop_g.f, 65]         SOURCE_ROP_G

J    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 26]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 70]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 74]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 78]            GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 81]   GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 82]   GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 85]   GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 86]   GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 265]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 281]           GET_3D_ALPHA_U_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 430]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 474]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 478]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 482]           GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 485]   GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 486]   GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 489]   GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 490]   GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 666]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 686]           GET_3D_ALPHA_V_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 834]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 876]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 880]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 884]           GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 887]   GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 888]   GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 891]   GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 892]   GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 1067]          GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 1083]          GET_3D_ALPHA_W_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1746]         GATHER_DATA
    Set   [vtk_out.f, 1833]            GATHER_DATA
    Use Argument   [vtk_out.f, 1835]   GATHER_DATA

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1933]         SETUP_VTK_NO_CUTCELL
    Set   [vtk_out.f, 1979]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1985]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1985]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1990]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1990]            SETUP_VTK_NO_CUTCELL
    Set   [vtk_out.f, 2041]            SETUP_VTK_NO_CUTCELL
    Use Argument   [vtk_out.f, 2043]   SETUP_VTK_NO_CUTCELL

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3089]         SETUP_VTK_REGION
    Set   [vtk_out.f, 3161]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3177]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3177]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3180]            SETUP_VTK_REGION
    Set   [vtk_out.f, 3219]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3235]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3235]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3238]            SETUP_VTK_REGION

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 78]           WRITE_VTU_FILE
    Set   [vtk_out.f, 113]             WRITE_VTU_FILE
    Use   [vtk_out.f, 114]             WRITE_VTU_FILE
    Use   [vtk_out.f, 114]             WRITE_VTU_FILE
    Use   [vtk_out.f, 114]             WRITE_VTU_FILE

J    (Dummy Argument)  Declared as: INTEGER
    Define   [set_index1a3.f, 34]      SET_INDEX1A3
    Declare   [set_index1a3.f, 60]     SET_INDEX1A3
    Use Argument   [set_index1a3.f, 76]   SET_INDEX1A3
    Use Argument   [set_index1a3.f, 80]   SET_INDEX1A3
    Use   [set_index1a3.f, 83]         SET_INDEX1A3
    Use   [set_index1a3.f, 84]         SET_INDEX1A3
    Use   [set_index1a3.f, 87]         SET_INDEX1A3
    Use   [set_index1a3.f, 88]         SET_INDEX1A3
    Use Argument   [set_index1a3.f, 92]   SET_INDEX1A3
    Use Argument   [set_index1a3.f, 96]   SET_INDEX1A3

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_rop_s.f, 98]        CONV_ROP_S0
    Set   [conv_rop_s.f, 129]          CONV_ROP_S0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_rop_s.f, 225]       CONV_ROP_S1
    Set   [conv_rop_s.f, 252]          CONV_ROP_S1

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_g.f, 291]          CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 340]             CALC_CG_TAU_w_G
    Use   [tau_w_g.f, 343]             CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 375]    CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 376]    CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 560]    CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 561]    CALC_CG_TAU_w_G

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_g.f, 92]           CALC_TAU_W_G
    Set   [tau_w_g.f, 125]             CALC_TAU_W_G
    Use   [tau_w_g.f, 128]             CALC_TAU_W_G
    Use   [tau_w_g.f, 167]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 174]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 175]    CALC_TAU_W_G

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_g.f, 639]          GET_FULL_TAU_W_G
    Set   [tau_w_g.f, 665]             GET_FULL_TAU_W_G
    Use   [tau_w_g.f, 683]             GET_FULL_TAU_W_G

J    (Local Variable)  Declared as: INTEGER
    Define   [solve_k_epsilon_eq.f, 78]   SOLVE_K_Epsilon_EQ
    Set   [solve_k_epsilon_eq.f, 142]   SOLVE_K_Epsilon_EQ
    Set   [solve_k_epsilon_eq.f, 224]   SOLVE_K_Epsilon_EQ
    Set   [solve_k_epsilon_eq.f, 263]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 276]   SOLVE_K_Epsilon_EQ

j    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 288]     GET_WCELL_GDIFF_TERMS
    Set   [conv_dif_w_g.f, 302]        GET_WCELL_GDIFF_TERMS
    Use   [conv_dif_w_g.f, 306]        GET_WCELL_GDIFF_TERMS
    Use   [conv_dif_w_g.f, 333]        GET_WCELL_GDIFF_TERMS
    Use Argument   [conv_dif_w_g.f, 349]   GET_WCELL_GDIFF_TERMS
    Use Argument   [conv_dif_w_g.f, 350]   GET_WCELL_GDIFF_TERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 577]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 617]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 619]        STORE_A_W_GDC

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 182]        LEQ_BICGS0
    Set   [leq_bicgs.f, 260]           LEQ_BICGS0
    Use Argument   [leq_bicgs.f, 261]   LEQ_BICGS0

J    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_continuum.f, 363]   CHECK_KT_TYPE
    Set   [check_solids_continuum.f, 443]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 444]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 449]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 453]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 453]   CHECK_KT_TYPE

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1048]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1073]         POINT_SOURCE_U_G
    Use Argument   [source_u_g.f, 1076]   POINT_SOURCE_U_G
    Use   [source_u_g.f, 1077]         POINT_SOURCE_U_G
    Use Argument   [source_u_g.f, 1079]   POINT_SOURCE_U_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 84]        SOURCE_U_G
    Set   [source_u_g.f, 132]          SOURCE_U_G
    Use   [source_u_g.f, 257]          SOURCE_U_G
    Use Argument   [source_u_g.f, 258]   SOURCE_U_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 435]       SOURCE_U_G_BC
    Set   [source_u_g.f, 595]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 597]   SOURCE_U_G_BC
    Use   [source_u_g.f, 598]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 599]   SOURCE_U_G_BC
    Set   [source_u_g.f, 630]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 632]   SOURCE_U_G_BC
    Use   [source_u_g.f, 633]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 634]   SOURCE_U_G_BC
    Set   [source_u_g.f, 665]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 667]   SOURCE_U_G_BC
    Use   [source_u_g.f, 668]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 669]   SOURCE_U_G_BC
    Use   [source_u_g.f, 671]          SOURCE_U_G_BC
    Use   [source_u_g.f, 687]          SOURCE_U_G_BC
    Use   [source_u_g.f, 688]          SOURCE_U_G_BC
    Set   [source_u_g.f, 740]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 742]   SOURCE_U_G_BC
    Use   [source_u_g.f, 743]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 744]   SOURCE_U_G_BC
    Use   [source_u_g.f, 746]          SOURCE_U_G_BC
    Use   [source_u_g.f, 757]          SOURCE_U_G_BC
    Set   [source_u_g.f, 797]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 799]   SOURCE_U_G_BC
    Use   [source_u_g.f, 800]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 801]   SOURCE_U_G_BC
    Set   [source_u_g.f, 828]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 830]   SOURCE_U_G_BC
    Use   [source_u_g.f, 831]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 832]   SOURCE_U_G_BC
    Set   [source_u_g.f, 862]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 864]   SOURCE_U_G_BC
    Use   [source_u_g.f, 865]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 866]   SOURCE_U_G_BC
    Set   [source_u_g.f, 896]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 898]   SOURCE_U_G_BC
    Use   [source_u_g.f, 899]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 900]   SOURCE_U_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_u_s.f, 108]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 149]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 150]       CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 189]   CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 190]   CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 193]       CALC_IA_MOMSOURCE_U_S

j    (Local Variable)  Declared as: INTEGER
    Define   [thermal_conductivity.f, 27]   thermal_conductivity
    Set   [thermal_conductivity.f, 41]   thermal_conductivity
    Use   [thermal_conductivity.f, 44]   thermal_conductivity
    Use   [thermal_conductivity.f, 44]   thermal_conductivity
    Use   [thermal_conductivity.f, 45]   thermal_conductivity
    Use   [thermal_conductivity.f, 46]   thermal_conductivity
    Use   [thermal_conductivity.f, 46]   thermal_conductivity
    Use   [thermal_conductivity.f, 47]   thermal_conductivity
    Use   [thermal_conductivity.f, 48]   thermal_conductivity
    Use   [thermal_conductivity.f, 48]   thermal_conductivity
    Use   [thermal_conductivity.f, 49]   thermal_conductivity
    Use   [thermal_conductivity.f, 49]   thermal_conductivity
    Use   [thermal_conductivity.f, 50]   thermal_conductivity
    Use   [thermal_conductivity.f, 50]   thermal_conductivity
    Use   [thermal_conductivity.f, 51]   thermal_conductivity
    Use   [thermal_conductivity.f, 52]   thermal_conductivity
    Use   [thermal_conductivity.f, 52]   thermal_conductivity
    Use   [thermal_conductivity.f, 53]   thermal_conductivity
    Use   [thermal_conductivity.f, 53]   thermal_conductivity
    Use   [thermal_conductivity.f, 54]   thermal_conductivity
    Use   [thermal_conductivity.f, 54]   thermal_conductivity
    Use   [thermal_conductivity.f, 55]   thermal_conductivity
    Use   [thermal_conductivity.f, 55]   thermal_conductivity
    Use   [thermal_conductivity.f, 56]   thermal_conductivity
    Use   [thermal_conductivity.f, 57]   thermal_conductivity
    Use   [thermal_conductivity.f, 57]   thermal_conductivity
    Use   [thermal_conductivity.f, 58]   thermal_conductivity
    Use   [thermal_conductivity.f, 62]   thermal_conductivity
    Use   [thermal_conductivity.f, 62]   thermal_conductivity
    Use   [thermal_conductivity.f, 62]   thermal_conductivity
    Use   [thermal_conductivity.f, 62]   thermal_conductivity
    Use   [thermal_conductivity.f, 63]   thermal_conductivity
    Use   [thermal_conductivity.f, 63]   thermal_conductivity
    Use   [thermal_conductivity.f, 64]   thermal_conductivity
    Use   [thermal_conductivity.f, 64]   thermal_conductivity
    Use   [thermal_conductivity.f, 65]   thermal_conductivity
    Use   [thermal_conductivity.f, 65]   thermal_conductivity
    Use   [thermal_conductivity.f, 66]   thermal_conductivity
    Use   [thermal_conductivity.f, 66]   thermal_conductivity
    Use   [thermal_conductivity.f, 67]   thermal_conductivity
    Use   [thermal_conductivity.f, 68]   thermal_conductivity
    Use   [thermal_conductivity.f, 68]   thermal_conductivity
    Use   [thermal_conductivity.f, 70]   thermal_conductivity
    Use   [thermal_conductivity.f, 70]   thermal_conductivity
    Use   [thermal_conductivity.f, 70]   thermal_conductivity
    Use   [thermal_conductivity.f, 71]   thermal_conductivity
    Use   [thermal_conductivity.f, 71]   thermal_conductivity
    Use   [thermal_conductivity.f, 72]   thermal_conductivity
    Use   [thermal_conductivity.f, 72]   thermal_conductivity
    Use   [thermal_conductivity.f, 72]   thermal_conductivity
    Use   [thermal_conductivity.f, 73]   thermal_conductivity
    Use   [thermal_conductivity.f, 73]   thermal_conductivity
    Use   [thermal_conductivity.f, 73]   thermal_conductivity
    Use   [thermal_conductivity.f, 74]   thermal_conductivity
    Use   [thermal_conductivity.f, 74]   thermal_conductivity
    Use   [thermal_conductivity.f, 75]   thermal_conductivity
    Use   [thermal_conductivity.f, 75]   thermal_conductivity
    Use   [thermal_conductivity.f, 76]   thermal_conductivity
    Use   [thermal_conductivity.f, 78]   thermal_conductivity
    Use   [thermal_conductivity.f, 78]   thermal_conductivity
    Use   [thermal_conductivity.f, 78]   thermal_conductivity
    Use   [thermal_conductivity.f, 79]   thermal_conductivity
    Use   [thermal_conductivity.f, 79]   thermal_conductivity
    Use   [thermal_conductivity.f, 80]   thermal_conductivity
    Use   [thermal_conductivity.f, 80]   thermal_conductivity
    Use   [thermal_conductivity.f, 81]   thermal_conductivity
    Use   [thermal_conductivity.f, 81]   thermal_conductivity
    Use   [thermal_conductivity.f, 81]   thermal_conductivity
    Use   [thermal_conductivity.f, 82]   thermal_conductivity
    Use   [thermal_conductivity.f, 82]   thermal_conductivity
    Use   [thermal_conductivity.f, 83]   thermal_conductivity
    Use   [thermal_conductivity.f, 83]   thermal_conductivity
    Use   [thermal_conductivity.f, 84]   thermal_conductivity
    Use   [thermal_conductivity.f, 85]   thermal_conductivity
    Use   [thermal_conductivity.f, 85]   thermal_conductivity
    Use   [thermal_conductivity.f, 86]   thermal_conductivity
    Use   [thermal_conductivity.f, 87]   thermal_conductivity
    Use   [thermal_conductivity.f, 87]   thermal_conductivity
    Use   [thermal_conductivity.f, 88]   thermal_conductivity
    Use   [thermal_conductivity.f, 88]   thermal_conductivity
    Use   [thermal_conductivity.f, 88]   thermal_conductivity
    Use   [thermal_conductivity.f, 89]   thermal_conductivity
    Use   [thermal_conductivity.f, 89]   thermal_conductivity
    Use   [thermal_conductivity.f, 90]   thermal_conductivity
    Use   [thermal_conductivity.f, 91]   thermal_conductivity
    Use   [thermal_conductivity.f, 91]   thermal_conductivity
    Use   [thermal_conductivity.f, 91]   thermal_conductivity
    Set   [thermal_conductivity.f, 102]   thermal_conductivity
    Use   [thermal_conductivity.f, 103]   thermal_conductivity
    Use   [thermal_conductivity.f, 104]   thermal_conductivity
    Use   [thermal_conductivity.f, 104]   thermal_conductivity
    Use   [thermal_conductivity.f, 104]   thermal_conductivity
    Use   [thermal_conductivity.f, 105]   thermal_conductivity
    Use   [thermal_conductivity.f, 105]   thermal_conductivity
    Use   [thermal_conductivity.f, 106]   thermal_conductivity
    Use   [thermal_conductivity.f, 106]   thermal_conductivity
    Use   [thermal_conductivity.f, 107]   thermal_conductivity
    Use   [thermal_conductivity.f, 107]   thermal_conductivity
    Use   [thermal_conductivity.f, 108]   thermal_conductivity
    Use   [thermal_conductivity.f, 109]   thermal_conductivity
    Use   [thermal_conductivity.f, 109]   thermal_conductivity
    Use   [thermal_conductivity.f, 109]   thermal_conductivity
    Use   [thermal_conductivity.f, 110]   thermal_conductivity
    Use   [thermal_conductivity.f, 110]   thermal_conductivity
    Use   [thermal_conductivity.f, 111]   thermal_conductivity
    Use   [thermal_conductivity.f, 111]   thermal_conductivity
    Use   [thermal_conductivity.f, 111]   thermal_conductivity
    Set   [thermal_conductivity.f, 123]   thermal_conductivity
    Use   [thermal_conductivity.f, 125]   thermal_conductivity
    Use   [thermal_conductivity.f, 130]   thermal_conductivity
    Use   [thermal_conductivity.f, 131]   thermal_conductivity
    Use   [thermal_conductivity.f, 131]   thermal_conductivity
    Use   [thermal_conductivity.f, 131]   thermal_conductivity
    Use   [thermal_conductivity.f, 131]   thermal_conductivity
    Use   [thermal_conductivity.f, 133]   thermal_conductivity
    Use   [thermal_conductivity.f, 133]   thermal_conductivity
    Use   [thermal_conductivity.f, 133]   thermal_conductivity
    Use   [thermal_conductivity.f, 134]   thermal_conductivity
    Use   [thermal_conductivity.f, 134]   thermal_conductivity
    Use   [thermal_conductivity.f, 134]   thermal_conductivity
    Use   [thermal_conductivity.f, 135]   thermal_conductivity
    Use   [thermal_conductivity.f, 136]   thermal_conductivity
    Use   [thermal_conductivity.f, 136]   thermal_conductivity
    Use   [thermal_conductivity.f, 138]   thermal_conductivity
    Use   [thermal_conductivity.f, 139]   thermal_conductivity
    Use   [thermal_conductivity.f, 139]   thermal_conductivity
    Use   [thermal_conductivity.f, 139]   thermal_conductivity
    Use   [thermal_conductivity.f, 139]   thermal_conductivity
    Use   [thermal_conductivity.f, 141]   thermal_conductivity
    Use   [thermal_conductivity.f, 141]   thermal_conductivity
    Use   [thermal_conductivity.f, 142]   thermal_conductivity
    Use   [thermal_conductivity.f, 142]   thermal_conductivity
    Use   [thermal_conductivity.f, 142]   thermal_conductivity
    Use   [thermal_conductivity.f, 142]   thermal_conductivity
    Use   [thermal_conductivity.f, 143]   thermal_conductivity
    Use   [thermal_conductivity.f, 144]   thermal_conductivity
    Use   [thermal_conductivity.f, 144]   thermal_conductivity
    Use   [thermal_conductivity.f, 144]   thermal_conductivity
    Use   [thermal_conductivity.f, 145]   thermal_conductivity
    Use   [thermal_conductivity.f, 145]   thermal_conductivity
    Use   [thermal_conductivity.f, 146]   thermal_conductivity
    Use   [thermal_conductivity.f, 146]   thermal_conductivity
    Use   [thermal_conductivity.f, 146]   thermal_conductivity
    Use   [thermal_conductivity.f, 146]   thermal_conductivity
    Use   [thermal_conductivity.f, 147]   thermal_conductivity
    Set   [thermal_conductivity.f, 156]   thermal_conductivity
    Use   [thermal_conductivity.f, 157]   thermal_conductivity
    Use   [thermal_conductivity.f, 164]   thermal_conductivity
    Use   [thermal_conductivity.f, 164]   thermal_conductivity
    Use   [thermal_conductivity.f, 166]   thermal_conductivity
    Use   [thermal_conductivity.f, 166]   thermal_conductivity
    Use   [thermal_conductivity.f, 167]   thermal_conductivity
    Use   [thermal_conductivity.f, 167]   thermal_conductivity
    Use   [thermal_conductivity.f, 167]   thermal_conductivity
    Use   [thermal_conductivity.f, 168]   thermal_conductivity
    Use   [thermal_conductivity.f, 168]   thermal_conductivity
    Use   [thermal_conductivity.f, 169]   thermal_conductivity
    Use   [thermal_conductivity.f, 169]   thermal_conductivity
    Use   [thermal_conductivity.f, 169]   thermal_conductivity
    Use   [thermal_conductivity.f, 170]   thermal_conductivity
    Use   [thermal_conductivity.f, 172]   thermal_conductivity
    Use   [thermal_conductivity.f, 172]   thermal_conductivity
    Set   [thermal_conductivity.f, 193]   thermal_conductivity
    Use   [thermal_conductivity.f, 194]   thermal_conductivity
    Use   [thermal_conductivity.f, 194]   thermal_conductivity
    Use   [thermal_conductivity.f, 195]   thermal_conductivity
    Use   [thermal_conductivity.f, 195]   thermal_conductivity
    Use   [thermal_conductivity.f, 196]   thermal_conductivity
    Use   [thermal_conductivity.f, 196]   thermal_conductivity
    Use   [thermal_conductivity.f, 197]   thermal_conductivity
    Use   [thermal_conductivity.f, 197]   thermal_conductivity
    Use   [thermal_conductivity.f, 197]   thermal_conductivity
    Use   [thermal_conductivity.f, 198]   thermal_conductivity
    Use   [thermal_conductivity.f, 198]   thermal_conductivity
    Use   [thermal_conductivity.f, 198]   thermal_conductivity
    Use   [thermal_conductivity.f, 199]   thermal_conductivity
    Use   [thermal_conductivity.f, 199]   thermal_conductivity
    Use   [thermal_conductivity.f, 199]   thermal_conductivity
    Use   [thermal_conductivity.f, 199]   thermal_conductivity
    Use   [thermal_conductivity.f, 200]   thermal_conductivity
    Use   [thermal_conductivity.f, 200]   thermal_conductivity
    Use   [thermal_conductivity.f, 201]   thermal_conductivity
    Use   [thermal_conductivity.f, 201]   thermal_conductivity
    Use   [thermal_conductivity.f, 201]   thermal_conductivity
    Use   [thermal_conductivity.f, 202]   thermal_conductivity
    Use   [thermal_conductivity.f, 202]   thermal_conductivity
    Use   [thermal_conductivity.f, 203]   thermal_conductivity
    Use   [thermal_conductivity.f, 203]   thermal_conductivity
    Use   [thermal_conductivity.f, 203]   thermal_conductivity
    Use   [thermal_conductivity.f, 204]   thermal_conductivity
    Use   [thermal_conductivity.f, 204]   thermal_conductivity
    Use   [thermal_conductivity.f, 204]   thermal_conductivity
    Use   [thermal_conductivity.f, 205]   thermal_conductivity
    Use   [thermal_conductivity.f, 205]   thermal_conductivity
    Use   [thermal_conductivity.f, 205]   thermal_conductivity
    Use   [thermal_conductivity.f, 206]   thermal_conductivity
    Use   [thermal_conductivity.f, 206]   thermal_conductivity
    Use   [thermal_conductivity.f, 207]   thermal_conductivity
    Use   [thermal_conductivity.f, 207]   thermal_conductivity
    Use   [thermal_conductivity.f, 207]   thermal_conductivity
    Use   [thermal_conductivity.f, 208]   thermal_conductivity
    Use   [thermal_conductivity.f, 208]   thermal_conductivity
    Use   [thermal_conductivity.f, 208]   thermal_conductivity
    Use   [thermal_conductivity.f, 209]   thermal_conductivity
    Use   [thermal_conductivity.f, 209]   thermal_conductivity

J    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 494]      CFNEWVALUES_MPPIC
    Set   [cfnewvalues.f, 585]         CFNEWVALUES_MPPIC

J    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 207]      CFNEWVALUES_MPPIC_SNIDER
    Set   [cfnewvalues.f, 298]         CFNEWVALUES_MPPIC_SNIDER

J    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 36]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 55]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 57]      MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 58]   MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 61]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 62]      MAKE_ARRAYS_DES

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 30]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 74]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 78]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 81]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 83]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 201]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 390]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 398]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 465]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 479]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 493]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 590]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 658]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 740]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 887]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 948]   GET_CUT_CELL_VOLUME_AND_AREAS

J    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_gas_drag.f, 63]    QMOMK_GAS_DRAG
    Set   [qmomk_gas_drag.f, 77]       QMOMK_GAS_DRAG
    Set   [qmomk_gas_drag.f, 99]       QMOMK_GAS_DRAG
    Use Argument   [qmomk_gas_drag.f, 104]   QMOMK_GAS_DRAG
    Set   [qmomk_gas_drag.f, 122]      QMOMK_GAS_DRAG

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 45]          DIF_V_IS
    Set   [dif_v_is.f, 64]             DIF_V_IS
    Use Argument   [dif_v_is.f, 66]    DIF_V_IS
    Use   [dif_v_is.f, 67]             DIF_V_IS
    Use Argument   [dif_v_is.f, 68]    DIF_V_IS
    Use Argument   [dif_v_is.f, 75]    DIF_V_IS
    Set   [dif_v_is.f, 87]             DIF_V_IS
    Use Argument   [dif_v_is.f, 89]    DIF_V_IS
    Use   [dif_v_is.f, 90]             DIF_V_IS
    Use Argument   [dif_v_is.f, 91]    DIF_V_IS
    Use Argument   [dif_v_is.f, 98]    DIF_V_IS

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_grad_des.f, 179]    CALC_GRAD_DES_CG
    Set   [calc_grad_des.f, 189]       CALC_GRAD_DES_CG
    Use   [calc_grad_des.f, 218]       CALC_GRAD_DES_CG
    Use   [calc_grad_des.f, 224]       CALC_GRAD_DES_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_grad_des.f, 77]     CALC_GRAD_DES_STD
    Set   [calc_grad_des.f, 104]       CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 108]       CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 108]       CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 109]       CALC_GRAD_DES_STD
    Use Argument   [calc_grad_des.f, 109]   CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 110]       CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 111]       CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 112]       CALC_GRAD_DES_STD
    Use Argument   [calc_grad_des.f, 113]   CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 114]       CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 115]       CALC_GRAD_DES_STD
    Use   [calc_grad_des.f, 116]       CALC_GRAD_DES_STD

J    (Dummy Argument)  Declared as: INTEGER
    Define   [set_index1a.f, 34]       SET_INDEX1A
    Declare   [set_index1a.f, 60]      SET_INDEX1A
    Use Argument   [set_index1a.f, 97]   SET_INDEX1A
    Use Argument   [set_index1a.f, 120]   SET_INDEX1A
    Use   [set_index1a.f, 132]         SET_INDEX1A
    Use   [set_index1a.f, 143]         SET_INDEX1A
    Use   [set_index1a.f, 155]         SET_INDEX1A
    Use   [set_index1a.f, 166]         SET_INDEX1A
    Use Argument   [set_index1a.f, 189]   SET_INDEX1A
    Use Argument   [set_index1a.f, 212]   SET_INDEX1A

J    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 246]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 303]    PARTIAL_ELIM_GHD_V
    Use Argument   [partial_elim_ghd.f, 305]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 376]    PARTIAL_ELIM_GHD_V
    Use Argument   [partial_elim_ghd.f, 378]   PARTIAL_ELIM_GHD_V

J    (Local Variable)  Declared as: INTEGER
    Define   [solid_drag.f, 103]       SOLID_DRAG_V
    Set   [solid_drag.f, 110]          SOLID_DRAG_V
    Use Argument   [solid_drag.f, 114]   SOLID_DRAG_V
    Use Argument   [solid_drag.f, 117]   SOLID_DRAG_V

j    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 696]       copy_d_to_r
    Set   [write_spx1.f, 702]          copy_d_to_r
    Use   [write_spx1.f, 705]          copy_d_to_r

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_s.f, 70]     CG_SOURCE_U_S
    Set   [CG_source_u_s.f, 177]       CG_SOURCE_U_S
    Use   [CG_source_u_s.f, 202]       CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 217]   CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 218]   CG_SOURCE_U_S
    Set   [CG_source_u_s.f, 249]       CG_SOURCE_U_S
    Use   [CG_source_u_s.f, 252]       CG_SOURCE_U_S
    Use   [CG_source_u_s.f, 255]       CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 257]   CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 259]   CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 261]   CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 262]   CG_SOURCE_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 26]           NSQUARE
    Set   [nsquare.f, 103]             NSQUARE
    Use   [nsquare.f, 105]             NSQUARE

j    (Local Variable)  Declared as: INTEGER
    Define   [shear_viscosity.f, 25]   shear_viscosity
    Set   [shear_viscosity.f, 41]      shear_viscosity
    Use   [shear_viscosity.f, 42]      shear_viscosity
    Use   [shear_viscosity.f, 43]      shear_viscosity
    Use   [shear_viscosity.f, 43]      shear_viscosity
    Use   [shear_viscosity.f, 43]      shear_viscosity
    Use   [shear_viscosity.f, 44]      shear_viscosity
    Use   [shear_viscosity.f, 44]      shear_viscosity
    Use   [shear_viscosity.f, 45]      shear_viscosity
    Use   [shear_viscosity.f, 45]      shear_viscosity
    Use   [shear_viscosity.f, 46]      shear_viscosity
    Use   [shear_viscosity.f, 47]      shear_viscosity
    Use   [shear_viscosity.f, 47]      shear_viscosity
    Use   [shear_viscosity.f, 48]      shear_viscosity
    Use   [shear_viscosity.f, 49]      shear_viscosity
    Use   [shear_viscosity.f, 51]      shear_viscosity
    Use   [shear_viscosity.f, 51]      shear_viscosity
    Use   [shear_viscosity.f, 52]      shear_viscosity
    Use   [shear_viscosity.f, 52]      shear_viscosity
    Use   [shear_viscosity.f, 52]      shear_viscosity
    Use   [shear_viscosity.f, 52]      shear_viscosity
    Use   [shear_viscosity.f, 53]      shear_viscosity
    Use   [shear_viscosity.f, 53]      shear_viscosity
    Use   [shear_viscosity.f, 53]      shear_viscosity
    Use   [shear_viscosity.f, 54]      shear_viscosity
    Use   [shear_viscosity.f, 54]      shear_viscosity
    Set   [shear_viscosity.f, 60]      shear_viscosity
    Use   [shear_viscosity.f, 61]      shear_viscosity
    Use   [shear_viscosity.f, 66]      shear_viscosity
    Use   [shear_viscosity.f, 66]      shear_viscosity
    Use   [shear_viscosity.f, 68]      shear_viscosity
    Use   [shear_viscosity.f, 69]      shear_viscosity
    Use   [shear_viscosity.f, 69]      shear_viscosity
    Use   [shear_viscosity.f, 69]      shear_viscosity
    Use   [shear_viscosity.f, 69]      shear_viscosity
    Use   [shear_viscosity.f, 70]      shear_viscosity
    Use   [shear_viscosity.f, 70]      shear_viscosity
    Use   [shear_viscosity.f, 71]      shear_viscosity
    Use   [shear_viscosity.f, 71]      shear_viscosity
    Use   [shear_viscosity.f, 72]      shear_viscosity
    Use   [shear_viscosity.f, 72]      shear_viscosity
    Use   [shear_viscosity.f, 72]      shear_viscosity
    Use   [shear_viscosity.f, 73]      shear_viscosity
    Use   [shear_viscosity.f, 74]      shear_viscosity
    Use   [shear_viscosity.f, 74]      shear_viscosity
    Use   [shear_viscosity.f, 76]      shear_viscosity
    Use   [shear_viscosity.f, 76]      shear_viscosity
    Set   [shear_viscosity.f, 94]      shear_viscosity
    Use   [shear_viscosity.f, 95]      shear_viscosity
    Use   [shear_viscosity.f, 95]      shear_viscosity
    Use   [shear_viscosity.f, 96]      shear_viscosity
    Use   [shear_viscosity.f, 96]      shear_viscosity
    Use   [shear_viscosity.f, 96]      shear_viscosity

j    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m.f, 68]        WRITE_AB_M
    Set   [write_ab_m.f, 103]          WRITE_AB_M
    Use   [write_ab_m.f, 105]          WRITE_AB_M
    Use Argument   [write_ab_m.f, 108]   WRITE_AB_M
    Set   [write_ab_m.f, 121]          WRITE_AB_M
    Use   [write_ab_m.f, 123]          WRITE_AB_M
    Use Argument   [write_ab_m.f, 125]   WRITE_AB_M
    Use Argument   [write_ab_m.f, 127]   WRITE_AB_M
    Use   [write_ab_m.f, 127]          WRITE_AB_M

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments3.f, 37]   SET_INCREMENTS3
    Set   [set_increments3.f, 79]      SET_INCREMENTS3
    Use   [set_increments3.f, 81]      SET_INCREMENTS3
    Use   [set_increments3.f, 81]      SET_INCREMENTS3
    Use   [set_increments3.f, 81]      SET_INCREMENTS3
    Use   [set_increments3.f, 82]      SET_INCREMENTS3
    Use   [set_increments3.f, 82]      SET_INCREMENTS3
    Use   [set_increments3.f, 82]      SET_INCREMENTS3
    Use   [set_increments3.f, 85]      SET_INCREMENTS3
    Use   [set_increments3.f, 85]      SET_INCREMENTS3
    Use   [set_increments3.f, 86]      SET_INCREMENTS3
    Use   [set_increments3.f, 86]      SET_INCREMENTS3
    Use   [set_increments3.f, 88]      SET_INCREMENTS3
    Use   [set_increments3.f, 88]      SET_INCREMENTS3
    Use   [set_increments3.f, 89]      SET_INCREMENTS3
    Use   [set_increments3.f, 89]      SET_INCREMENTS3
    Set   [set_increments3.f, 110]     SET_INCREMENTS3
    Use   [set_increments3.f, 112]     SET_INCREMENTS3
    Use   [set_increments3.f, 115]     SET_INCREMENTS3
    Set   [set_increments3.f, 126]     SET_INCREMENTS3
    Use   [set_increments3.f, 129]     SET_INCREMENTS3
    Use Argument   [set_increments3.f, 132]   SET_INCREMENTS3

J    (Local Variable)  Declared as: INTEGER
    Define   [source_rop_s.f, 157]     POINT_SOURCE_ROP_S
    Set   [source_rop_s.f, 170]        POINT_SOURCE_ROP_S
    Use Argument   [source_rop_s.f, 173]   POINT_SOURCE_ROP_S
    Use   [source_rop_s.f, 174]        POINT_SOURCE_ROP_S
    Use Argument   [source_rop_s.f, 176]   POINT_SOURCE_ROP_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_rop_s.f, 56]      SOURCE_ROP_S
    Set   [source_rop_s.f, 69]         SOURCE_ROP_S

j    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate_tc.f, 26]   cooling_rate_tc
    Set   [cooling_rate_tc.f, 38]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 39]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 40]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 42]      cooling_rate_tc
    Set   [cooling_rate_tc.f, 51]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 52]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 53]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 53]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 54]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 54]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 54]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 55]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 55]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 56]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 57]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 57]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 58]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 58]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 59]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 59]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 60]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 61]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 61]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 62]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 62]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 63]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 63]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 64]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 64]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 64]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 65]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 65]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 66]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 66]      cooling_rate_tc
    Set   [cooling_rate_tc.f, 76]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 77]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 88]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 89]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 89]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 89]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 89]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 90]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 90]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 91]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 91]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 92]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 92]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 92]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 93]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 93]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 94]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 94]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 95]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 95]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 96]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 96]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 96]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 97]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 97]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 97]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 98]      cooling_rate_tc
    Use   [cooling_rate_tc.f, 100]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 100]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 101]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 101]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 101]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 102]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 103]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 103]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 103]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 104]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 104]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 104]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 105]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 105]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 106]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 106]     cooling_rate_tc
    Set   [cooling_rate_tc.f, 111]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 112]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 112]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 112]     cooling_rate_tc
    Set   [cooling_rate_tc.f, 128]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 129]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 129]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 130]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 130]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 130]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 132]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 132]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 132]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 132]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 133]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 133]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 133]     cooling_rate_tc
    Use   [cooling_rate_tc.f, 134]     cooling_rate_tc

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 76]     CHECK_FLOW_CELL_PROPS
    Set   [check_data_30.f, 88]        CHECK_FLOW_CELL_PROPS
    Use   [check_data_30.f, 91]        CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 93]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 99]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 103]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 106]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 110]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 116]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 119]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 122]   CHECK_FLOW_CELL_PROPS
    Use Argument   [check_data_30.f, 126]   CHECK_FLOW_CELL_PROPS

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 186]    CHECK_PHYSICAL_BOUNDS
    Set   [check_data_30.f, 198]       CHECK_PHYSICAL_BOUNDS
    Use   [check_data_30.f, 200]       CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 201]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 206]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 210]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 216]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 219]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 222]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 224]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 229]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 231]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 233]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 247]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 249]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 259]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 265]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 269]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 273]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 275]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 281]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 293]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 295]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 304]   CHECK_PHYSICAL_BOUNDS
    Use Argument   [check_data_30.f, 306]   CHECK_PHYSICAL_BOUNDS

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 572]    CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 591]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 593]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 594]   CHECK_RXN_MASS_BALANCE

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 363]    REPORT_SPECIES_STATS
    Set   [check_data_30.f, 391]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 393]       REPORT_SPECIES_STATS
    Use Argument   [check_data_30.f, 394]   REPORT_SPECIES_STATS

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_ghd.f, 327]       CALC_D_ghd_N
    Set   [calc_d_ghd.f, 369]          CALC_D_ghd_N
    Use Argument   [calc_d_ghd.f, 371]   CALC_D_ghd_N
    Use Argument   [calc_d_ghd.f, 376]   CALC_D_ghd_N
    Set   [calc_d_ghd.f, 443]          CALC_D_ghd_N
    Use Argument   [calc_d_ghd.f, 445]   CALC_D_ghd_N
    Set   [calc_d_ghd.f, 473]          CALC_D_ghd_N
    Use Argument   [calc_d_ghd.f, 479]   CALC_D_ghd_N

J    (Local Variable)  Declared as: INTEGER
    Define   [read_res1.f, 693]        PATCH_AFTER_RESTART
    Set   [read_res1.f, 715]           PATCH_AFTER_RESTART
    Use   [read_res1.f, 733]           PATCH_AFTER_RESTART
    Use   [read_res1.f, 793]           PATCH_AFTER_RESTART

J    (Local Variable)  Declared as: INTEGER
    Define   [source_phi.f, 195]       POINT_SOURCE_PHI
    Set   [source_phi.f, 209]          POINT_SOURCE_PHI
    Use Argument   [source_phi.f, 212]   POINT_SOURCE_PHI
    Use   [source_phi.f, 213]          POINT_SOURCE_PHI
    Use Argument   [source_phi.f, 215]   POINT_SOURCE_PHI

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 45]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 130]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 133]       SET_BC_DEM_MO
    Use Argument   [set_bc_dem_mo.f, 135]   SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 170]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 173]       SET_BC_DEM_MO
    Use Argument   [set_bc_dem_mo.f, 175]   SET_BC_DEM_MO

j    (Local Variable)  Declared as: INTEGER
    Define   [pressure.f, 22]          pressure
    Set   [pressure.f, 31]             pressure
    Use   [pressure.f, 32]             pressure
    Use   [pressure.f, 32]             pressure
    Use   [pressure.f, 32]             pressure
    Use   [pressure.f, 33]             pressure
    Use   [pressure.f, 33]             pressure

J    (Local Variable)  Declared as: INTEGER
    Define   [get_stats.f, 59]         GET_STATS
    Set   [get_stats.f, 89]            GET_STATS
    Use   [get_stats.f, 109]           GET_STATS
    Use   [get_stats.f, 111]           GET_STATS
    Set   [get_stats.f, 152]           GET_STATS
    Use   [get_stats.f, 171]           GET_STATS
    Use   [get_stats.f, 173]           GET_STATS

j    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m_var.f, 66]    WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 98]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 100]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 102]      WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 119]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 121]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 124]      WRITE_AB_M_VAR
    Use Argument   [write_ab_m_var.f, 126]   WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 126]      WRITE_AB_M_VAR

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 298]          CALC_CG_TAU_W_S
    Set   [tau_w_s.f, 318]             CALC_CG_TAU_W_S
    Use   [tau_w_s.f, 321]             CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 354]    CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 355]    CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 535]    CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 536]    CALC_CG_TAU_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 148]          CALC_REG_TAU_W_S
    Set   [tau_w_s.f, 158]             CALC_REG_TAU_W_S
    Use   [tau_w_s.f, 161]             CALC_REG_TAU_W_S
    Use   [tau_w_s.f, 200]             CALC_REG_TAU_W_S
    Use Argument   [tau_w_s.f, 206]    CALC_REG_TAU_W_S
    Use Argument   [tau_w_s.f, 207]    CALC_REG_TAU_W_S

j    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 310]     GET_WCELL_SDIFF_TERMS
    Set   [conv_dif_w_s.f, 323]        GET_WCELL_SDIFF_TERMS
    Use   [conv_dif_w_s.f, 327]        GET_WCELL_SDIFF_TERMS
    Use   [conv_dif_w_s.f, 354]        GET_WCELL_SDIFF_TERMS
    Use Argument   [conv_dif_w_s.f, 370]   GET_WCELL_SDIFF_TERMS
    Use Argument   [conv_dif_w_s.f, 371]   GET_WCELL_SDIFF_TERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 586]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 626]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 628]        STORE_A_W_SDC

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1010]      JJ_BC_U_S
    Set   [source_u_s.f, 1016]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1018]   JJ_BC_U_S
    Use   [source_u_s.f, 1019]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1021]   JJ_BC_U_S
    Use   [source_u_s.f, 1023]         JJ_BC_U_S
    Use   [source_u_s.f, 1058]         JJ_BC_U_S
    Use   [source_u_s.f, 1059]         JJ_BC_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1178]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1203]         POINT_SOURCE_U_S
    Use Argument   [source_u_s.f, 1206]   POINT_SOURCE_U_S
    Use   [source_u_s.f, 1207]         POINT_SOURCE_U_S
    Use Argument   [source_u_s.f, 1209]   POINT_SOURCE_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 77]        SOURCE_U_S
    Set   [source_u_s.f, 130]          SOURCE_U_S
    Use   [source_u_s.f, 341]          SOURCE_U_S
    Use Argument   [source_u_s.f, 342]   SOURCE_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 534]       SOURCE_U_S_BC
    Set   [source_u_s.f, 671]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 673]   SOURCE_U_S_BC
    Use   [source_u_s.f, 674]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 675]   SOURCE_U_S_BC
    Set   [source_u_s.f, 710]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 712]   SOURCE_U_S_BC
    Use   [source_u_s.f, 713]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 714]   SOURCE_U_S_BC
    Set   [source_u_s.f, 749]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 751]   SOURCE_U_S_BC
    Use   [source_u_s.f, 752]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 753]   SOURCE_U_S_BC
    Use   [source_u_s.f, 755]          SOURCE_U_S_BC
    Use   [source_u_s.f, 771]          SOURCE_U_S_BC
    Use   [source_u_s.f, 772]          SOURCE_U_S_BC
    Set   [source_u_s.f, 827]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 829]   SOURCE_U_S_BC
    Use   [source_u_s.f, 830]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 831]   SOURCE_U_S_BC
    Set   [source_u_s.f, 854]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 856]   SOURCE_U_S_BC
    Use   [source_u_s.f, 857]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 858]   SOURCE_U_S_BC
    Set   [source_u_s.f, 888]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 890]   SOURCE_U_S_BC
    Use   [source_u_s.f, 891]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 892]   SOURCE_U_S_BC
    Set   [source_u_s.f, 917]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 919]   SOURCE_U_S_BC
    Use   [source_u_s.f, 920]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 922]   SOURCE_U_S_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_external_forces.f, 47]   CALC_EXTERNAL_FORCES
    Set   [calc_external_forces.f, 76]   CALC_EXTERNAL_FORCES
    Use   [calc_external_forces.f, 100]   CALC_EXTERNAL_FORCES
    Use Argument   [calc_external_forces.f, 123]   CALC_EXTERNAL_FORCES
    Use Argument   [calc_external_forces.f, 127]   CALC_EXTERNAL_FORCES
    Use Argument   [calc_external_forces.f, 131]   CALC_EXTERNAL_FORCES
    Use Argument   [calc_external_forces.f, 153]   CALC_EXTERNAL_FORCES
    Use Argument   [calc_external_forces.f, 156]   CALC_EXTERNAL_FORCES

J    (Local Variable)  Declared as: INTEGER
    Define   [cfassign.f, 209]         compute_volume_of_nodes
    Set   [cfassign.f, 252]            compute_volume_of_nodes
    Use Argument   [cfassign.f, 261]   compute_volume_of_nodes
    Use   [cfassign.f, 267]            compute_volume_of_nodes
    Use   [cfassign.f, 268]            compute_volume_of_nodes
    Use Argument   [cfassign.f, 302]   compute_volume_of_nodes
    Use Argument   [cfassign.f, 303]   compute_volume_of_nodes
    Use   [cfassign.f, 307]            compute_volume_of_nodes
    Use   [cfassign.f, 308]            compute_volume_of_nodes

J    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 70]          BC_THETA
    Set   [bc_theta.f, 91]             BC_THETA
    Use Argument   [bc_theta.f, 94]    BC_THETA
    Use   [bc_theta.f, 95]             BC_THETA
    Use Argument   [bc_theta.f, 96]    BC_THETA
    Use   [bc_theta.f, 99]             BC_THETA
    Use   [bc_theta.f, 181]            BC_THETA
    Use   [bc_theta.f, 182]            BC_THETA

j    (Local Variable)  Declared as: INTEGER
    Define   [source_population_eq.f, 17]   Source_population_eq
    Set   [source_population_eq.f, 36]   Source_population_eq
    Use   [source_population_eq.f, 37]   Source_population_eq
    Use   [source_population_eq.f, 38]   Source_population_eq
    Use   [source_population_eq.f, 39]   Source_population_eq
    Use   [source_population_eq.f, 40]   Source_population_eq
    Set   [source_population_eq.f, 59]   Source_population_eq
    Use   [source_population_eq.f, 60]   Source_population_eq
    Use   [source_population_eq.f, 60]   Source_population_eq
    Use   [source_population_eq.f, 60]   Source_population_eq
    Set   [source_population_eq.f, 69]   Source_population_eq
    Use   [source_population_eq.f, 72]   Source_population_eq
    Use   [source_population_eq.f, 72]   Source_population_eq
    Use   [source_population_eq.f, 73]   Source_population_eq
    Use   [source_population_eq.f, 75]   Source_population_eq
    Use   [source_population_eq.f, 75]   Source_population_eq
    Use   [source_population_eq.f, 76]   Source_population_eq
    Use   [source_population_eq.f, 76]   Source_population_eq
    Set   [source_population_eq.f, 86]   Source_population_eq
    Use   [source_population_eq.f, 88]   Source_population_eq
    Use   [source_population_eq.f, 92]   Source_population_eq
    Use   [source_population_eq.f, 92]   Source_population_eq
    Use   [source_population_eq.f, 93]   Source_population_eq
    Use   [source_population_eq.f, 96]   Source_population_eq
    Use   [source_population_eq.f, 98]   Source_population_eq
    Use   [source_population_eq.f, 98]   Source_population_eq
    Use   [source_population_eq.f, 100]   Source_population_eq
    Use   [source_population_eq.f, 100]   Source_population_eq
    Use   [source_population_eq.f, 103]   Source_population_eq
    Use   [source_population_eq.f, 103]   Source_population_eq
    Use   [source_population_eq.f, 104]   Source_population_eq
    Use   [source_population_eq.f, 105]   Source_population_eq
    Use   [source_population_eq.f, 105]   Source_population_eq
    Set   [source_population_eq.f, 147]   Source_population_eq
    Use   [source_population_eq.f, 148]   Source_population_eq
    Use   [source_population_eq.f, 149]   Source_population_eq
    Set   [source_population_eq.f, 152]   Source_population_eq
    Use   [source_population_eq.f, 153]   Source_population_eq
    Use   [source_population_eq.f, 154]   Source_population_eq
    Set   [source_population_eq.f, 158]   Source_population_eq
    Use   [source_population_eq.f, 159]   Source_population_eq
    Use   [source_population_eq.f, 159]   Source_population_eq
    Set   [source_population_eq.f, 162]   Source_population_eq
    Use   [source_population_eq.f, 163]   Source_population_eq
    Use   [source_population_eq.f, 163]   Source_population_eq
    Set   [source_population_eq.f, 193]   Source_population_eq
    Use   [source_population_eq.f, 195]   Source_population_eq
    Use   [source_population_eq.f, 195]   Source_population_eq
    Use   [source_population_eq.f, 196]   Source_population_eq
    Set   [source_population_eq.f, 202]   Source_population_eq
    Use   [source_population_eq.f, 203]   Source_population_eq
    Use   [source_population_eq.f, 203]   Source_population_eq
    Set   [source_population_eq.f, 213]   Source_population_eq
    Use   [source_population_eq.f, 215]   Source_population_eq
    Use   [source_population_eq.f, 215]   Source_population_eq

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_outflow.f, 43]      CALC_OUTFLOW
    Set   [calc_outflow.f, 52]         CALC_OUTFLOW
    Use Argument   [calc_outflow.f, 55]   CALC_OUTFLOW
    Use   [calc_outflow.f, 56]         CALC_OUTFLOW
    Use Argument   [calc_outflow.f, 57]   CALC_OUTFLOW
    Use   [calc_outflow.f, 61]         CALC_OUTFLOW
    Use   [calc_outflow.f, 63]         CALC_OUTFLOW
    Use   [calc_outflow.f, 67]         CALC_OUTFLOW
    Use   [calc_outflow.f, 69]         CALC_OUTFLOW
    Use   [calc_outflow.f, 85]         CALC_OUTFLOW
    Use   [calc_outflow.f, 87]         CALC_OUTFLOW
    Use   [calc_outflow.f, 91]         CALC_OUTFLOW
    Use   [calc_outflow.f, 93]         CALC_OUTFLOW
    Use   [calc_outflow.f, 101]        CALC_OUTFLOW
    Use   [calc_outflow.f, 103]        CALC_OUTFLOW
    Use   [calc_outflow.f, 107]        CALC_OUTFLOW
    Use   [calc_outflow.f, 109]        CALC_OUTFLOW
    Use   [calc_outflow.f, 125]        CALC_OUTFLOW
    Use   [calc_outflow.f, 127]        CALC_OUTFLOW
    Use   [calc_outflow.f, 131]        CALC_OUTFLOW
    Use   [calc_outflow.f, 133]        CALC_OUTFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_g.f, 231]          CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 277]             CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 279]    CALC_CG_TAU_V_G
    Use   [tau_v_g.f, 283]             CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 311]    CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 314]    CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 324]    CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 327]    CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 444]    CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 447]    CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 520]    CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 523]    CALC_CG_TAU_V_G

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_g.f, 66]           CALC_TAU_V_G
    Set   [tau_v_g.f, 91]              CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 93]     CALC_TAU_V_G
    Use   [tau_v_g.f, 97]              CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 131]    CALC_TAU_V_G
    Use   [tau_v_g.f, 132]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 134]    CALC_TAU_V_G
    Use   [tau_v_g.f, 135]             CALC_TAU_V_G
    Use   [tau_v_g.f, 142]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 149]    CALC_TAU_V_G
    Use   [tau_v_g.f, 150]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 152]    CALC_TAU_V_G
    Use   [tau_v_g.f, 153]             CALC_TAU_V_G

j    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 300]     GET_VCELL_GDIFF_TERMS
    Set   [conv_dif_v_g.f, 314]        GET_VCELL_GDIFF_TERMS
    Use   [conv_dif_v_g.f, 317]        GET_VCELL_GDIFF_TERMS
    Use   [conv_dif_v_g.f, 342]        GET_VCELL_GDIFF_TERMS
    Use Argument   [conv_dif_v_g.f, 349]   GET_VCELL_GDIFF_TERMS
    Use Argument   [conv_dif_v_g.f, 353]   GET_VCELL_GDIFF_TERMS
    Use Argument   [conv_dif_v_g.f, 371]   GET_VCELL_GDIFF_TERMS
    Use Argument   [conv_dif_v_g.f, 375]   GET_VCELL_GDIFF_TERMS
    Use Argument   [conv_dif_v_g.f, 388]   GET_VCELL_GDIFF_TERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 93]      GET_VCELL_GVTERMS
    Set   [conv_dif_v_g.f, 100]        GET_VCELL_GVTERMS
    Use Argument   [conv_dif_v_g.f, 129]   GET_VCELL_GVTERMS
    Use Argument   [conv_dif_v_g.f, 131]   GET_VCELL_GVTERMS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 602]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 642]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 644]        STORE_A_V_GDC

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ic.f, 37]            SET_IC
    Set   [set_ic.f, 94]               SET_IC
    Use Argument   [set_ic.f, 96]      SET_IC
    Use   [set_ic.f, 97]               SET_IC
    Use Argument   [set_ic.f, 98]      SET_IC

J    (Variable)  Declared as: INTEGER
    Define   [check_data_20.f, 59]     CHECK_DATA_20
    Set   [check_data_20.f, 99]        CHECK_DATA_20
    Use Argument   [check_data_20.f, 101]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 110]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 112]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 114]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 116]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 118]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 121]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 123]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 125]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 128]   CHECK_DATA_20
    Use   [check_data_20.f, 130]       CHECK_DATA_20
    Use Argument   [check_data_20.f, 132]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 137]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 144]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 150]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 159]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 162]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 165]   CHECK_DATA_20
    Use   [check_data_20.f, 166]       CHECK_DATA_20
    Use Argument   [check_data_20.f, 167]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 169]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 172]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 174]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 176]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 180]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 186]   CHECK_DATA_20
    Set   [check_data_20.f, 211]       CHECK_DATA_20
    Use Argument   [check_data_20.f, 213]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 222]   CHECK_DATA_20
    Use Argument   [check_data_20.f, 230]   CHECK_DATA_20
    Use   [check_data_20.f, 293]       REPORT_ERROR
    Use   [check_data_20.f, 318]       REPORT_UNPHYSICAL

J1    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 459]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 689]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 767]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 844]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 859]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 881]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 1420]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1422]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1426]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1490]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1492]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1496]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1569]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1571]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1575]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1636]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1638]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1642]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1698]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1700]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1703]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1709]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1733]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1735]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1739]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1745]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1770]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1772]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1776]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1782]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1803]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1805]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1809]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1815]     RE_INDEX_ARRAYS

J1    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1488]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1583]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1590]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1630]   CAD_INTERSECT

J1    (Local Variable)  Declared as: INTEGER
    Define   [cal_d.f, 40]             CAL_D
    Set   [cal_d.f, 45]                CAL_D
    Use   [cal_d.f, 46]                CAL_D
    Use   [cal_d.f, 47]                CAL_D
    Use   [cal_d.f, 49]                CAL_D
    Use   [cal_d.f, 49]                CAL_D
    Set   [cal_d.f, 75]                CAL_D
    Use   [cal_d.f, 76]                CAL_D
    Use   [cal_d.f, 77]                CAL_D
    Use   [cal_d.f, 78]                CAL_D
    Use   [cal_d.f, 80]                CAL_D
    Use   [cal_d.f, 81]                CAL_D
    Use   [cal_d.f, 81]                CAL_D

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 46]          DIF_W_IS
    Set   [dif_w_is.f, 55]             DIF_W_IS
    Use   [dif_w_is.f, 62]             DIF_W_IS
    Use   [dif_w_is.f, 84]             DIF_W_IS

J1    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1861]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1930]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1944]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1972]   GET_POTENTIAL_CUT_CELLS

J1    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 47]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 508]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 532]   SET_3D_CUT_CELL_FLAGS

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 495]       SOURCE_W_G_BC
    Set   [source_w_g.f, 519]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 522]   SOURCE_W_G_BC
    Use   [source_w_g.f, 523]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 524]   SOURCE_W_G_BC
    Set   [source_w_g.f, 548]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 551]   SOURCE_W_G_BC
    Use   [source_w_g.f, 552]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 553]   SOURCE_W_G_BC
    Set   [source_w_g.f, 583]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 584]   SOURCE_W_G_BC
    Use   [source_w_g.f, 585]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 586]   SOURCE_W_G_BC
    Set   [source_w_g.f, 612]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 613]   SOURCE_W_G_BC
    Use   [source_w_g.f, 614]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 615]   SOURCE_W_G_BC
    Set   [source_w_g.f, 650]          SOURCE_W_G_BC
    Use   [source_w_g.f, 655]          SOURCE_W_G_BC
    Set   [source_w_g.f, 685]          SOURCE_W_G_BC
    Use   [source_w_g.f, 690]          SOURCE_W_G_BC
    Set   [source_w_g.f, 720]          SOURCE_W_G_BC
    Use   [source_w_g.f, 725]          SOURCE_W_G_BC
    Set   [source_w_g.f, 810]          SOURCE_W_G_BC
    Use   [source_w_g.f, 815]          SOURCE_W_G_BC
    Set   [source_w_g.f, 896]          SOURCE_W_G_BC
    Use   [source_w_g.f, 901]          SOURCE_W_G_BC
    Set   [source_w_g.f, 927]          SOURCE_W_G_BC
    Use   [source_w_g.f, 932]          SOURCE_W_G_BC
    Set   [source_w_g.f, 960]          SOURCE_W_G_BC
    Use   [source_w_g.f, 965]          SOURCE_W_G_BC
    Set   [source_w_g.f, 993]          SOURCE_W_G_BC
    Use   [source_w_g.f, 998]          SOURCE_W_G_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [k_epsilon_prop.f, 62]    K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 245]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 247]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 247]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 248]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 248]      K_Epsilon_PROP

J1    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_init_bc.f, 31]     QMOMK_INIT_BC
    Set   [qmomk_init_bc.f, 38]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 47]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 52]        QMOMK_INIT_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 2542]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2860]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2865]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2873]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2875]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2880]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2885]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2892]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2897]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2904]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2904]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2905]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2906]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2912]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2919]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2926]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2926]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2929]   GET_DXYZ_FROM_CONTROL_POINTS

J1    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 59]            BC_PHI
    Set   [bc_phi.f, 73]               BC_PHI
    Use Argument   [bc_phi.f, 75]      BC_PHI
    Use   [bc_phi.f, 76]               BC_PHI
    Use Argument   [bc_phi.f, 77]      BC_PHI
    Set   [bc_phi.f, 99]               BC_PHI
    Use Argument   [bc_phi.f, 101]     BC_PHI
    Use   [bc_phi.f, 102]              BC_PHI
    Use Argument   [bc_phi.f, 103]     BC_PHI
    Set   [bc_phi.f, 122]              BC_PHI
    Use Argument   [bc_phi.f, 126]     BC_PHI
    Use   [bc_phi.f, 127]              BC_PHI
    Use Argument   [bc_phi.f, 128]     BC_PHI
    Set   [bc_phi.f, 146]              BC_PHI
    Use Argument   [bc_phi.f, 150]     BC_PHI
    Use   [bc_phi.f, 151]              BC_PHI
    Use Argument   [bc_phi.f, 152]     BC_PHI
    Set   [bc_phi.f, 173]              BC_PHI
    Use Argument   [bc_phi.f, 174]     BC_PHI
    Use   [bc_phi.f, 175]              BC_PHI
    Use Argument   [bc_phi.f, 176]     BC_PHI
    Set   [bc_phi.f, 197]              BC_PHI
    Use Argument   [bc_phi.f, 198]     BC_PHI
    Use   [bc_phi.f, 199]              BC_PHI
    Use Argument   [bc_phi.f, 200]     BC_PHI
    Set   [bc_phi.f, 232]              BC_PHI
    Use   [bc_phi.f, 238]              BC_PHI
    Set   [bc_phi.f, 351]              BC_PHI
    Use   [bc_phi.f, 357]              BC_PHI
    Set   [bc_phi.f, 405]              BC_PHI
    Use   [bc_phi.f, 411]              BC_PHI

J1    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 775]     DIF_PHI_IS
    Set   [conv_dif_phi.f, 787]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 794]        DIF_PHI_IS
    Set   [conv_dif_phi.f, 794]        DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 794]   DIF_PHI_IS
    Use   [conv_dif_phi.f, 802]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 818]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 835]        DIF_PHI_IS

J1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_w_s.f, 1006]      JJ_BC_W_S
    Declare   [source_w_s.f, 1039]     JJ_BC_W_S
    Use   [source_w_s.f, 1056]         JJ_BC_W_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 567]       SOURCE_W_S_BC
    Set   [source_w_s.f, 572]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 575]   SOURCE_W_S_BC
    Use   [source_w_s.f, 576]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 577]   SOURCE_W_S_BC
    Set   [source_w_s.f, 602]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 605]   SOURCE_W_S_BC
    Use   [source_w_s.f, 606]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 607]   SOURCE_W_S_BC
    Set   [source_w_s.f, 632]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 633]   SOURCE_W_S_BC
    Use   [source_w_s.f, 634]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 635]   SOURCE_W_S_BC
    Set   [source_w_s.f, 660]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 661]   SOURCE_W_S_BC
    Use   [source_w_s.f, 662]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 663]   SOURCE_W_S_BC
    Set   [source_w_s.f, 696]          SOURCE_W_S_BC
    Use   [source_w_s.f, 702]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 729]   SOURCE_W_S_BC
    Set   [source_w_s.f, 735]          SOURCE_W_S_BC
    Use   [source_w_s.f, 741]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 768]   SOURCE_W_S_BC
    Set   [source_w_s.f, 774]          SOURCE_W_S_BC
    Use   [source_w_s.f, 780]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 857]   SOURCE_W_S_BC
    Set   [source_w_s.f, 865]          SOURCE_W_S_BC
    Use   [source_w_s.f, 870]          SOURCE_W_S_BC
    Set   [source_w_s.f, 892]          SOURCE_W_S_BC
    Use   [source_w_s.f, 897]          SOURCE_W_S_BC
    Set   [source_w_s.f, 925]          SOURCE_W_S_BC
    Use   [source_w_s.f, 930]          SOURCE_W_S_BC
    Set   [source_w_s.f, 953]          SOURCE_W_S_BC
    Use   [source_w_s.f, 958]          SOURCE_W_S_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 48]          DIF_U_IS
    Set   [dif_u_is.f, 58]             DIF_U_IS
    Use   [dif_u_is.f, 65]             DIF_U_IS
    Set   [dif_u_is.f, 65]             DIF_U_IS
    Use Argument   [dif_u_is.f, 65]    DIF_U_IS
    Use   [dif_u_is.f, 73]             DIF_U_IS
    Use   [dif_u_is.f, 96]             DIF_U_IS

J1    (Local Variable)  Declared as: INTEGER
    Define   [get_philoss.f, 74]       GET_PHILOSS
    Set   [get_philoss.f, 85]          GET_PHILOSS
    Use   [get_philoss.f, 90]          GET_PHILOSS

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 424]       SOURCE_V_G_BC
    Set   [source_v_g.f, 448]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 450]   SOURCE_V_G_BC
    Use   [source_v_g.f, 451]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 452]   SOURCE_V_G_BC
    Set   [source_v_g.f, 481]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 483]   SOURCE_V_G_BC
    Use   [source_v_g.f, 484]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 485]   SOURCE_V_G_BC
    Set   [source_v_g.f, 513]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 514]   SOURCE_V_G_BC
    Use   [source_v_g.f, 515]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 516]   SOURCE_V_G_BC
    Set   [source_v_g.f, 542]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 543]   SOURCE_V_G_BC
    Use   [source_v_g.f, 544]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 545]   SOURCE_V_G_BC
    Set   [source_v_g.f, 579]          SOURCE_V_G_BC
    Use   [source_v_g.f, 584]          SOURCE_V_G_BC
    Set   [source_v_g.f, 614]          SOURCE_V_G_BC
    Use   [source_v_g.f, 619]          SOURCE_V_G_BC
    Set   [source_v_g.f, 649]          SOURCE_V_G_BC
    Use   [source_v_g.f, 654]          SOURCE_V_G_BC
    Set   [source_v_g.f, 722]          SOURCE_V_G_BC
    Use   [source_v_g.f, 727]          SOURCE_V_G_BC
    Set   [source_v_g.f, 779]          SOURCE_V_G_BC
    Use   [source_v_g.f, 784]          SOURCE_V_G_BC
    Set   [source_v_g.f, 810]          SOURCE_V_G_BC
    Use   [source_v_g.f, 815]          SOURCE_V_G_BC
    Set   [source_v_g.f, 843]          SOURCE_V_G_BC
    Use   [source_v_g.f, 848]          SOURCE_V_G_BC
    Set   [source_v_g.f, 876]          SOURCE_V_G_BC
    Use   [source_v_g.f, 881]          SOURCE_V_G_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 972]     MPPIC_BC_U_S
    Set   [pic_routines.f, 979]        MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 981]   MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 982]   MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 983]   MPPIC_BC_U_S
    Set   [pic_routines.f, 989]        MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 991]   MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 992]   MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 993]   MPPIC_BC_U_S
    Set   [pic_routines.f, 999]        MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 1002]   MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 1003]   MPPIC_BC_U_S
    Use   [pic_routines.f, 1004]       MPPIC_BC_U_S
    Set   [pic_routines.f, 1008]       MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 1011]   MPPIC_BC_U_S
    Use Argument   [pic_routines.f, 1012]   MPPIC_BC_U_S
    Use   [pic_routines.f, 1013]       MPPIC_BC_U_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1047]    MPPIC_BC_V_S
    Set   [pic_routines.f, 1054]       MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1056]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1057]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1058]   MPPIC_BC_V_S
    Set   [pic_routines.f, 1063]       MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1065]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1066]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1067]   MPPIC_BC_V_S
    Set   [pic_routines.f, 1075]       MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1076]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1077]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1078]   MPPIC_BC_V_S
    Set   [pic_routines.f, 1085]       MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1086]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1087]   MPPIC_BC_V_S
    Use Argument   [pic_routines.f, 1088]   MPPIC_BC_V_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1120]    MPPIC_BC_W_S
    Set   [pic_routines.f, 1125]       MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1128]   MPPIC_BC_W_S
    Use   [pic_routines.f, 1129]       MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1130]   MPPIC_BC_W_S
    Set   [pic_routines.f, 1134]       MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1137]   MPPIC_BC_W_S
    Use   [pic_routines.f, 1138]       MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1139]   MPPIC_BC_W_S
    Set   [pic_routines.f, 1145]       MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1146]   MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1147]   MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1148]   MPPIC_BC_W_S
    Set   [pic_routines.f, 1154]       MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1155]   MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1156]   MPPIC_BC_W_S
    Use Argument   [pic_routines.f, 1157]   MPPIC_BC_W_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 598]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 694]        MPPIC_COMPUTE_PS_GRAD
    Use Argument   [pic_routines.f, 697]   MPPIC_COMPUTE_PS_GRAD
    Use Argument   [pic_routines.f, 698]   MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 712]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 716]        MPPIC_COMPUTE_PS_GRAD
    Use Argument   [pic_routines.f, 717]   MPPIC_COMPUTE_PS_GRAD
    Use Argument   [pic_routines.f, 718]   MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 738]        MPPIC_COMPUTE_PS_GRAD
    Use Argument   [pic_routines.f, 741]   MPPIC_COMPUTE_PS_GRAD
    Use Argument   [pic_routines.f, 742]   MPPIC_COMPUTE_PS_GRAD

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 463]   Calc_mass_flux
    Declare   [check_mass_balance.f, 470]   Calc_mass_flux
    Use Argument   [check_mass_balance.f, 492]   Calc_mass_flux

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 513]   Calc_mass_flux_sp
    Declare   [check_mass_balance.f, 526]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 556]   Calc_mass_flux_sp

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 690]   Calc_mass_flux_spHR
    Declare   [check_mass_balance.f, 705]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 745]   Calc_mass_flux_spHR

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 643]   Calc_mass_fluxHR
    Declare   [check_mass_balance.f, 650]   Calc_mass_fluxHR
    Use Argument   [check_mass_balance.f, 669]   Calc_mass_fluxHR

J1    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 71]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 144]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 151]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 153]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 161]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 163]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 179]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 185]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 188]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 209]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 216]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 220]   CHECK_Mass_balance

J1    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 44]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 230]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 238]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 262]   COMP_MEAN_FIELDS0

J1    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 61]       SET_WALL_BC
    Set   [set_wall_bc.f, 74]          SET_WALL_BC
    Use Argument   [set_wall_bc.f, 81]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 85]   SET_WALL_BC
    Set   [set_wall_bc.f, 100]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 103]   SET_WALL_BC
    Use   [set_wall_bc.f, 104]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 105]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 107]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 107]   SET_WALL_BC
    Set   [set_wall_bc.f, 113]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 116]   SET_WALL_BC
    Use   [set_wall_bc.f, 117]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 118]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 120]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 120]   SET_WALL_BC
    Set   [set_wall_bc.f, 125]         SET_WALL_BC
    Use   [set_wall_bc.f, 128]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 129]   SET_WALL_BC
    Use   [set_wall_bc.f, 130]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 131]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 133]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 133]   SET_WALL_BC
    Set   [set_wall_bc.f, 138]         SET_WALL_BC
    Use   [set_wall_bc.f, 141]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 142]   SET_WALL_BC
    Use   [set_wall_bc.f, 143]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 144]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 146]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 146]   SET_WALL_BC
    Set   [set_wall_bc.f, 153]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 155]   SET_WALL_BC
    Use   [set_wall_bc.f, 156]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 157]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 159]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 159]   SET_WALL_BC
    Set   [set_wall_bc.f, 177]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 179]   SET_WALL_BC
    Use   [set_wall_bc.f, 180]         SET_WALL_BC
    Use Argument   [set_wall_bc.f, 181]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 183]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 183]   SET_WALL_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 253]      SET_WALL_BC1
    Set   [set_wall_bc.f, 261]         SET_WALL_BC1
    Use   [set_wall_bc.f, 267]         SET_WALL_BC1
    Set   [set_wall_bc.f, 267]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 267]   SET_WALL_BC1
    Use   [set_wall_bc.f, 274]         SET_WALL_BC1

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 42]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 56]       DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 57]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 58]       DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 59]   DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 75]       DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 76]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 77]       DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 78]   DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 92]       DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 95]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 96]       DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 97]   DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 111]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 114]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 115]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 116]   DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 132]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 134]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 135]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 136]   DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 153]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 155]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 156]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 157]   DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 180]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 186]      DIF_PHI_BC_DES

J1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_v_s.f, 959]       JJ_BC_V_S
    Declare   [source_v_s.f, 991]      JJ_BC_V_S
    Use   [source_v_s.f, 1008]         JJ_BC_V_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 529]       SOURCE_V_S_BC
    Set   [source_v_s.f, 536]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 538]   SOURCE_V_S_BC
    Use   [source_v_s.f, 539]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 540]   SOURCE_V_S_BC
    Set   [source_v_s.f, 566]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 568]   SOURCE_V_S_BC
    Use   [source_v_s.f, 569]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 570]   SOURCE_V_S_BC
    Set   [source_v_s.f, 596]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 597]   SOURCE_V_S_BC
    Use   [source_v_s.f, 598]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 599]   SOURCE_V_S_BC
    Set   [source_v_s.f, 624]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 625]   SOURCE_V_S_BC
    Use   [source_v_s.f, 626]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 627]   SOURCE_V_S_BC
    Set   [source_v_s.f, 659]          SOURCE_V_S_BC
    Use   [source_v_s.f, 665]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 693]   SOURCE_V_S_BC
    Set   [source_v_s.f, 699]          SOURCE_V_S_BC
    Use   [source_v_s.f, 705]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 732]   SOURCE_V_S_BC
    Set   [source_v_s.f, 738]          SOURCE_V_S_BC
    Use   [source_v_s.f, 744]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 809]   SOURCE_V_S_BC
    Set   [source_v_s.f, 817]          SOURCE_V_S_BC
    Use   [source_v_s.f, 822]          SOURCE_V_S_BC
    Set   [source_v_s.f, 844]          SOURCE_V_S_BC
    Use   [source_v_s.f, 849]          SOURCE_V_S_BC
    Set   [source_v_s.f, 877]          SOURCE_V_S_BC
    Use   [source_v_s.f, 882]          SOURCE_V_S_BC
    Set   [source_v_s.f, 905]          SOURCE_V_S_BC
    Use   [source_v_s.f, 910]          SOURCE_V_S_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [radial_vel_correction.f, 33]   RADIAL_VEL_CORRECTION
    Set   [radial_vel_correction.f, 54]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 56]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 58]   RADIAL_VEL_CORRECTION
    Set   [radial_vel_correction.f, 70]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 71]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 72]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 81]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 82]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 84]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 84]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 85]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 85]   RADIAL_VEL_CORRECTION
    Set   [radial_vel_correction.f, 89]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 92]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 93]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 95]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 96]   RADIAL_VEL_CORRECTION
    Set   [radial_vel_correction.f, 115]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 117]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 118]   RADIAL_VEL_CORRECTION
    Set   [radial_vel_correction.f, 126]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 127]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 128]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 136]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 137]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 139]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 139]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 140]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 140]   RADIAL_VEL_CORRECTION
    Set   [radial_vel_correction.f, 144]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 146]   RADIAL_VEL_CORRECTION
    Use Argument   [radial_vel_correction.f, 147]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 149]   RADIAL_VEL_CORRECTION
    Use   [radial_vel_correction.f, 150]   RADIAL_VEL_CORRECTION

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 435]       SOURCE_U_G_BC
    Set   [source_u_g.f, 459]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 461]   SOURCE_U_G_BC
    Use   [source_u_g.f, 462]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 463]   SOURCE_U_G_BC
    Set   [source_u_g.f, 492]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 494]   SOURCE_U_G_BC
    Use   [source_u_g.f, 495]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 496]   SOURCE_U_G_BC
    Set   [source_u_g.f, 521]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 524]   SOURCE_U_G_BC
    Use   [source_u_g.f, 525]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 526]   SOURCE_U_G_BC
    Set   [source_u_g.f, 550]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 553]   SOURCE_U_G_BC
    Use   [source_u_g.f, 554]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 555]   SOURCE_U_G_BC
    Set   [source_u_g.f, 590]          SOURCE_U_G_BC
    Use   [source_u_g.f, 595]          SOURCE_U_G_BC
    Set   [source_u_g.f, 625]          SOURCE_U_G_BC
    Use   [source_u_g.f, 630]          SOURCE_U_G_BC
    Set   [source_u_g.f, 660]          SOURCE_U_G_BC
    Use   [source_u_g.f, 665]          SOURCE_U_G_BC
    Set   [source_u_g.f, 735]          SOURCE_U_G_BC
    Use   [source_u_g.f, 740]          SOURCE_U_G_BC
    Set   [source_u_g.f, 792]          SOURCE_U_G_BC
    Use   [source_u_g.f, 797]          SOURCE_U_G_BC
    Set   [source_u_g.f, 823]          SOURCE_U_G_BC
    Use   [source_u_g.f, 828]          SOURCE_U_G_BC
    Set   [source_u_g.f, 857]          SOURCE_U_G_BC
    Use   [source_u_g.f, 862]          SOURCE_U_G_BC
    Set   [source_u_g.f, 891]          SOURCE_U_G_BC
    Use   [source_u_g.f, 896]          SOURCE_U_G_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 37]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 61]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 68]      MAKE_ARRAYS_DES

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 45]          DIF_V_IS
    Set   [dif_v_is.f, 57]             DIF_V_IS
    Use   [dif_v_is.f, 64]             DIF_V_IS
    Use   [dif_v_is.f, 87]             DIF_V_IS

J1    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_set_bc.f, 31]      QMOMK_SET_BC
    Set   [qmomk_set_bc.f, 38]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 47]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 52]         QMOMK_SET_BC

J1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_u_s.f, 967]       JJ_BC_U_S
    Declare   [source_u_s.f, 999]      JJ_BC_U_S
    Use   [source_u_s.f, 1016]         JJ_BC_U_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 534]       SOURCE_U_S_BC
    Set   [source_u_s.f, 541]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 543]   SOURCE_U_S_BC
    Use   [source_u_s.f, 544]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 545]   SOURCE_U_S_BC
    Set   [source_u_s.f, 571]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 573]   SOURCE_U_S_BC
    Use   [source_u_s.f, 574]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 575]   SOURCE_U_S_BC
    Set   [source_u_s.f, 599]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 602]   SOURCE_U_S_BC
    Use   [source_u_s.f, 603]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 604]   SOURCE_U_S_BC
    Set   [source_u_s.f, 627]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 630]   SOURCE_U_S_BC
    Use   [source_u_s.f, 631]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 632]   SOURCE_U_S_BC
    Set   [source_u_s.f, 665]          SOURCE_U_S_BC
    Use   [source_u_s.f, 671]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 698]   SOURCE_U_S_BC
    Set   [source_u_s.f, 704]          SOURCE_U_S_BC
    Use   [source_u_s.f, 710]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 737]   SOURCE_U_S_BC
    Set   [source_u_s.f, 743]          SOURCE_U_S_BC
    Use   [source_u_s.f, 749]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 814]   SOURCE_U_S_BC
    Set   [source_u_s.f, 822]          SOURCE_U_S_BC
    Use   [source_u_s.f, 827]          SOURCE_U_S_BC
    Set   [source_u_s.f, 849]          SOURCE_U_S_BC
    Use   [source_u_s.f, 854]          SOURCE_U_S_BC
    Set   [source_u_s.f, 883]          SOURCE_U_S_BC
    Use   [source_u_s.f, 888]          SOURCE_U_S_BC
    Set   [source_u_s.f, 912]          SOURCE_U_S_BC
    Use   [source_u_s.f, 917]          SOURCE_U_S_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 70]          BC_THETA
    Set   [bc_theta.f, 84]             BC_THETA
    Use   [bc_theta.f, 91]             BC_THETA

J2    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 459]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 690]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 768]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 845]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 860]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 881]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 1421]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1422]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1426]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1491]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1492]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1496]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1570]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1571]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1575]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1637]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1638]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1642]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1699]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1700]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1703]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1734]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1735]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1739]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1771]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1772]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1776]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1804]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1805]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1809]     RE_INDEX_ARRAYS

J2    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1488]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1584]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1598]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1630]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1734]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1736]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1893]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1894]   CAD_INTERSECT

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 46]          DIF_W_IS
    Set   [dif_w_is.f, 56]             DIF_W_IS
    Use   [dif_w_is.f, 62]             DIF_W_IS
    Use   [dif_w_is.f, 84]             DIF_W_IS

J2    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1861]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1931]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1944]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1972]   GET_POTENTIAL_CUT_CELLS

J2    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 47]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 509]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 532]   SET_3D_CUT_CELL_FLAGS

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 495]       SOURCE_W_G_BC
    Set   [source_w_g.f, 651]          SOURCE_W_G_BC
    Use   [source_w_g.f, 655]          SOURCE_W_G_BC
    Set   [source_w_g.f, 686]          SOURCE_W_G_BC
    Use   [source_w_g.f, 690]          SOURCE_W_G_BC
    Set   [source_w_g.f, 721]          SOURCE_W_G_BC
    Use   [source_w_g.f, 725]          SOURCE_W_G_BC
    Set   [source_w_g.f, 811]          SOURCE_W_G_BC
    Use   [source_w_g.f, 815]          SOURCE_W_G_BC
    Set   [source_w_g.f, 897]          SOURCE_W_G_BC
    Use   [source_w_g.f, 901]          SOURCE_W_G_BC
    Set   [source_w_g.f, 928]          SOURCE_W_G_BC
    Use   [source_w_g.f, 932]          SOURCE_W_G_BC
    Set   [source_w_g.f, 961]          SOURCE_W_G_BC
    Use   [source_w_g.f, 965]          SOURCE_W_G_BC
    Set   [source_w_g.f, 994]          SOURCE_W_G_BC
    Use   [source_w_g.f, 998]          SOURCE_W_G_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_init_bc.f, 31]     QMOMK_INIT_BC
    Set   [qmomk_init_bc.f, 39]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 47]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 52]        QMOMK_INIT_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 2542]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2861]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2865]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2875]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2880]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2885]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2893]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2897]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2906]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2910]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2910]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2911]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2912]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2919]   GET_DXYZ_FROM_CONTROL_POINTS

J2    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 59]            BC_PHI
    Set   [bc_phi.f, 233]              BC_PHI
    Use   [bc_phi.f, 238]              BC_PHI
    Set   [bc_phi.f, 352]              BC_PHI
    Use   [bc_phi.f, 357]              BC_PHI
    Set   [bc_phi.f, 406]              BC_PHI
    Use   [bc_phi.f, 411]              BC_PHI

J2    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 775]     DIF_PHI_IS
    Set   [conv_dif_phi.f, 788]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 797]        DIF_PHI_IS
    Set   [conv_dif_phi.f, 797]        DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 797]   DIF_PHI_IS
    Use   [conv_dif_phi.f, 802]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 818]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 835]        DIF_PHI_IS

J2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_w_s.f, 1006]      JJ_BC_W_S
    Declare   [source_w_s.f, 1039]     JJ_BC_W_S
    Use   [source_w_s.f, 1056]         JJ_BC_W_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 567]       SOURCE_W_S_BC
    Set   [source_w_s.f, 697]          SOURCE_W_S_BC
    Use   [source_w_s.f, 702]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 729]   SOURCE_W_S_BC
    Set   [source_w_s.f, 736]          SOURCE_W_S_BC
    Use   [source_w_s.f, 741]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 768]   SOURCE_W_S_BC
    Set   [source_w_s.f, 775]          SOURCE_W_S_BC
    Use   [source_w_s.f, 780]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 857]   SOURCE_W_S_BC
    Set   [source_w_s.f, 866]          SOURCE_W_S_BC
    Use   [source_w_s.f, 870]          SOURCE_W_S_BC
    Set   [source_w_s.f, 893]          SOURCE_W_S_BC
    Use   [source_w_s.f, 897]          SOURCE_W_S_BC
    Set   [source_w_s.f, 926]          SOURCE_W_S_BC
    Use   [source_w_s.f, 930]          SOURCE_W_S_BC
    Set   [source_w_s.f, 954]          SOURCE_W_S_BC
    Use   [source_w_s.f, 958]          SOURCE_W_S_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 48]          DIF_U_IS
    Set   [dif_u_is.f, 59]             DIF_U_IS
    Use   [dif_u_is.f, 68]             DIF_U_IS
    Set   [dif_u_is.f, 68]             DIF_U_IS
    Use Argument   [dif_u_is.f, 68]    DIF_U_IS
    Use   [dif_u_is.f, 73]             DIF_U_IS
    Use   [dif_u_is.f, 96]             DIF_U_IS

J2    (Local Variable)  Declared as: INTEGER
    Define   [get_philoss.f, 74]       GET_PHILOSS
    Set   [get_philoss.f, 86]          GET_PHILOSS
    Use   [get_philoss.f, 90]          GET_PHILOSS

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 424]       SOURCE_V_G_BC
    Set   [source_v_g.f, 580]          SOURCE_V_G_BC
    Use   [source_v_g.f, 584]          SOURCE_V_G_BC
    Set   [source_v_g.f, 615]          SOURCE_V_G_BC
    Use   [source_v_g.f, 619]          SOURCE_V_G_BC
    Set   [source_v_g.f, 650]          SOURCE_V_G_BC
    Use   [source_v_g.f, 654]          SOURCE_V_G_BC
    Set   [source_v_g.f, 723]          SOURCE_V_G_BC
    Use   [source_v_g.f, 727]          SOURCE_V_G_BC
    Set   [source_v_g.f, 780]          SOURCE_V_G_BC
    Use   [source_v_g.f, 784]          SOURCE_V_G_BC
    Set   [source_v_g.f, 811]          SOURCE_V_G_BC
    Use   [source_v_g.f, 815]          SOURCE_V_G_BC
    Set   [source_v_g.f, 844]          SOURCE_V_G_BC
    Use   [source_v_g.f, 848]          SOURCE_V_G_BC
    Set   [source_v_g.f, 877]          SOURCE_V_G_BC
    Use   [source_v_g.f, 881]          SOURCE_V_G_BC

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 463]   Calc_mass_flux
    Declare   [check_mass_balance.f, 470]   Calc_mass_flux
    Use Argument   [check_mass_balance.f, 492]   Calc_mass_flux

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 513]   Calc_mass_flux_sp
    Declare   [check_mass_balance.f, 526]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 556]   Calc_mass_flux_sp

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 690]   Calc_mass_flux_spHR
    Declare   [check_mass_balance.f, 705]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 745]   Calc_mass_flux_spHR

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 643]   Calc_mass_fluxHR
    Declare   [check_mass_balance.f, 650]   Calc_mass_fluxHR
    Use Argument   [check_mass_balance.f, 669]   Calc_mass_fluxHR

J2    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 71]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 145]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 151]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 153]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 161]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 163]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 180]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 185]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 188]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 210]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 216]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 220]   CHECK_Mass_balance

J2    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 44]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 231]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 238]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 262]   COMP_MEAN_FIELDS0

J2    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 61]       SET_WALL_BC
    Set   [set_wall_bc.f, 75]          SET_WALL_BC
    Use Argument   [set_wall_bc.f, 81]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 85]   SET_WALL_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 253]      SET_WALL_BC1
    Set   [set_wall_bc.f, 262]         SET_WALL_BC1
    Use   [set_wall_bc.f, 270]         SET_WALL_BC1
    Set   [set_wall_bc.f, 270]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 270]   SET_WALL_BC1
    Use   [set_wall_bc.f, 274]         SET_WALL_BC1

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 42]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 181]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 186]      DIF_PHI_BC_DES

J2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_v_s.f, 959]       JJ_BC_V_S
    Declare   [source_v_s.f, 991]      JJ_BC_V_S
    Use   [source_v_s.f, 1008]         JJ_BC_V_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 529]       SOURCE_V_S_BC
    Set   [source_v_s.f, 660]          SOURCE_V_S_BC
    Use   [source_v_s.f, 665]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 693]   SOURCE_V_S_BC
    Set   [source_v_s.f, 700]          SOURCE_V_S_BC
    Use   [source_v_s.f, 705]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 732]   SOURCE_V_S_BC
    Set   [source_v_s.f, 739]          SOURCE_V_S_BC
    Use   [source_v_s.f, 744]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 809]   SOURCE_V_S_BC
    Set   [source_v_s.f, 818]          SOURCE_V_S_BC
    Use   [source_v_s.f, 822]          SOURCE_V_S_BC
    Set   [source_v_s.f, 845]          SOURCE_V_S_BC
    Use   [source_v_s.f, 849]          SOURCE_V_S_BC
    Set   [source_v_s.f, 878]          SOURCE_V_S_BC
    Use   [source_v_s.f, 882]          SOURCE_V_S_BC
    Set   [source_v_s.f, 906]          SOURCE_V_S_BC
    Use   [source_v_s.f, 910]          SOURCE_V_S_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 435]       SOURCE_U_G_BC
    Set   [source_u_g.f, 591]          SOURCE_U_G_BC
    Use   [source_u_g.f, 595]          SOURCE_U_G_BC
    Set   [source_u_g.f, 626]          SOURCE_U_G_BC
    Use   [source_u_g.f, 630]          SOURCE_U_G_BC
    Set   [source_u_g.f, 661]          SOURCE_U_G_BC
    Use   [source_u_g.f, 665]          SOURCE_U_G_BC
    Set   [source_u_g.f, 736]          SOURCE_U_G_BC
    Use   [source_u_g.f, 740]          SOURCE_U_G_BC
    Set   [source_u_g.f, 793]          SOURCE_U_G_BC
    Use   [source_u_g.f, 797]          SOURCE_U_G_BC
    Set   [source_u_g.f, 824]          SOURCE_U_G_BC
    Use   [source_u_g.f, 828]          SOURCE_U_G_BC
    Set   [source_u_g.f, 858]          SOURCE_U_G_BC
    Use   [source_u_g.f, 862]          SOURCE_U_G_BC
    Set   [source_u_g.f, 892]          SOURCE_U_G_BC
    Use   [source_u_g.f, 896]          SOURCE_U_G_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 37]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 62]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 68]      MAKE_ARRAYS_DES

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 45]          DIF_V_IS
    Set   [dif_v_is.f, 58]             DIF_V_IS
    Use   [dif_v_is.f, 64]             DIF_V_IS
    Use   [dif_v_is.f, 87]             DIF_V_IS

J2    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_set_bc.f, 31]      QMOMK_SET_BC
    Set   [qmomk_set_bc.f, 39]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 47]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 52]         QMOMK_SET_BC

J2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_u_s.f, 967]       JJ_BC_U_S
    Declare   [source_u_s.f, 999]      JJ_BC_U_S
    Use   [source_u_s.f, 1016]         JJ_BC_U_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 534]       SOURCE_U_S_BC
    Set   [source_u_s.f, 666]          SOURCE_U_S_BC
    Use   [source_u_s.f, 671]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 698]   SOURCE_U_S_BC
    Set   [source_u_s.f, 705]          SOURCE_U_S_BC
    Use   [source_u_s.f, 710]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 737]   SOURCE_U_S_BC
    Set   [source_u_s.f, 744]          SOURCE_U_S_BC
    Use   [source_u_s.f, 749]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 814]   SOURCE_U_S_BC
    Set   [source_u_s.f, 823]          SOURCE_U_S_BC
    Use   [source_u_s.f, 827]          SOURCE_U_S_BC
    Set   [source_u_s.f, 850]          SOURCE_U_S_BC
    Use   [source_u_s.f, 854]          SOURCE_U_S_BC
    Set   [source_u_s.f, 884]          SOURCE_U_S_BC
    Use   [source_u_s.f, 888]          SOURCE_U_S_BC
    Set   [source_u_s.f, 913]          SOURCE_U_S_BC
    Use   [source_u_s.f, 917]          SOURCE_U_S_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 70]          BC_THETA
    Set   [bc_theta.f, 85]             BC_THETA
    Use   [bc_theta.f, 91]             BC_THETA

J23    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1458]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1568]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1573]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1617]   SET_GHOST_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1622]   SET_GHOST_CELL_FLAGS

J_CELL    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 803]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 822]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use Argument   [pic_bc_routines.f, 826]   CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [pic_bc_routines.f, 844]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [pic_bc_routines.f, 845]     CHECK_IF_PARCEL_OVERLAPS_STL

J_CELL    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 39]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 123]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 129]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 130]     MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 135]   MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 143]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 144]     MAKE_ARRAYS_DES

j_end    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 55]    SET_INCREMENTS
    Set   [set_increments.f, 279]      SET_INCREMENTS
    Set   [set_increments.f, 281]      SET_INCREMENTS
    Set   [set_increments.f, 289]      SET_INCREMENTS
    Set   [set_increments.f, 291]      SET_INCREMENTS
    Set   [set_increments.f, 294]      SET_INCREMENTS
    Set   [set_increments.f, 296]      SET_INCREMENTS
    Use   [set_increments.f, 301]      SET_INCREMENTS

J_FLUID    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_j.f, 39]          MOD_BC_J
    Set   [mod_bc_j.f, 104]            MOD_BC_J
    Use Argument   [mod_bc_j.f, 112]   MOD_BC_J
    Use   [mod_bc_j.f, 114]            MOD_BC_J
    Use Argument   [mod_bc_j.f, 118]   MOD_BC_J
    Use Argument   [mod_bc_j.f, 145]   MOD_BC_J
    Use   [mod_bc_j.f, 147]            MOD_BC_J
    Use Argument   [mod_bc_j.f, 151]   MOD_BC_J
    Use   [mod_bc_j.f, 158]            MOD_BC_J

J_n    (Local Variable)  Declared as: INTEGER
    Define   [get_ps.f, 35]            GET_PS
    Use Argument   [get_ps.f, 76]      GET_PS
    Use Argument   [get_ps.f, 83]      GET_PS
    Use   [get_ps.f, 87]               GET_PS

J_n    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mo.f, 42]     SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 95]        SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 101]       SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 102]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 112]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 118]       SET_BC_PIC_MO

J_n    (Local Variable)  Declared as: INTEGER
    Define   [check_initial_conditions.f, 131]   CHECK_IC_GEOMETRY
    Set   [check_initial_conditions.f, 275]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 279]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 283]   CHECK_IC_GEOMETRY
    Use   [check_initial_conditions.f, 286]   CHECK_IC_GEOMETRY

J_n    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 357]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 420]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 429]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 432]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 450]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 456]       SET_DEM_BCMI_IJK

J_n    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mi.f, 159]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 214]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 220]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 221]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 231]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 237]       SET_PIC_BCMI_IJK

J_n    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_j.f, 30]          MOD_BC_J
    Set   [mod_bc_j.f, 48]             MOD_BC_J
    Set   [mod_bc_j.f, 64]             MOD_BC_J
    Use   [mod_bc_j.f, 64]             MOD_BC_J
    Set   [mod_bc_j.f, 69]             MOD_BC_J
    Use   [mod_bc_j.f, 69]             MOD_BC_J
    Use Argument   [mod_bc_j.f, 78]    MOD_BC_J
    Use   [mod_bc_j.f, 86]             MOD_BC_J
    Use   [mod_bc_j.f, 100]            MOD_BC_J

J_N    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3089]         SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3115]   SETUP_VTK_REGION
    Use   [vtk_out.f, 3177]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3235]            SETUP_VTK_REGION

J_n    (Local Variable)  Declared as: INTEGER
    Define   [get_is.f, 35]            GET_IS
    Use Argument   [get_is.f, 76]      GET_IS
    Use Argument   [get_is.f, 83]      GET_IS
    Use   [get_is.f, 87]               GET_IS

J_n    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 46]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 107]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 113]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 114]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 124]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 130]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 145]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 156]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 156]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 164]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 170]       SET_BC_DEM_MO

J_n    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 428]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 477]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 483]   CHECK_BC_GEOMETRY_FLOW
    Use   [check_bc_geometry.f, 487]   CHECK_BC_GEOMETRY_FLOW

J_n    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 245]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 294]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 298]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 303]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 306]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 314]   CHECK_BC_GEOMETRY_WALL
    Use   [check_bc_geometry.f, 317]   CHECK_BC_GEOMETRY_WALL

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3381]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3639]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3641]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3643]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3643]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3647]   ADJUST_IJK_SIZE

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4096]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4193]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4195]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4197]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4197]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4201]   REPORT_BEST_IJK_SIZE

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4919]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5052]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5054]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5056]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5056]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5060]   REPORT_BEST_IJK_SIZE0

J_s    (Local Variable)  Declared as: INTEGER
    Define   [get_ps.f, 35]            GET_PS
    Use Argument   [get_ps.f, 75]      GET_PS
    Set   [get_ps.f, 79]               GET_PS
    Use   [get_ps.f, 79]               GET_PS
    Use Argument   [get_ps.f, 82]      GET_PS
    Use   [get_ps.f, 86]               GET_PS

J_s    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mo.f, 42]     SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 95]        SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 101]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 101]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 101]       SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 102]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 102]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 102]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 112]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 118]       SET_BC_PIC_MO

J_s    (Local Variable)  Declared as: INTEGER
    Define   [check_initial_conditions.f, 131]   CHECK_IC_GEOMETRY
    Set   [check_initial_conditions.f, 274]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 277]   CHECK_IC_GEOMETRY
    Set   [check_initial_conditions.f, 278]   CHECK_IC_GEOMETRY
    Use   [check_initial_conditions.f, 278]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 282]   CHECK_IC_GEOMETRY
    Use   [check_initial_conditions.f, 285]   CHECK_IC_GEOMETRY

J_s    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 357]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 419]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 428]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 431]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 450]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 456]       SET_DEM_BCMI_IJK

J_s    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_k.f, 31]          MOD_BC_K
    Set   [mod_bc_k.f, 52]             MOD_BC_K
    Use Argument   [mod_bc_k.f, 56]    MOD_BC_K
    Use Argument   [mod_bc_k.f, 61]    MOD_BC_K
    Use Argument   [mod_bc_k.f, 62]    MOD_BC_K
    Use   [mod_bc_k.f, 87]             MOD_BC_K

J_s    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mi.f, 159]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 214]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 220]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 221]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 231]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 237]       SET_PIC_BCMI_IJK

J_s    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_j.f, 30]          MOD_BC_J
    Set   [mod_bc_j.f, 47]             MOD_BC_J
    Use Argument   [mod_bc_j.f, 54]    MOD_BC_J
    Use Argument   [mod_bc_j.f, 59]    MOD_BC_J
    Use   [mod_bc_j.f, 60]             MOD_BC_J
    Set   [mod_bc_j.f, 63]             MOD_BC_J
    Use   [mod_bc_j.f, 63]             MOD_BC_J
    Set   [mod_bc_j.f, 68]             MOD_BC_J
    Use   [mod_bc_j.f, 68]             MOD_BC_J
    Use Argument   [mod_bc_j.f, 77]    MOD_BC_J
    Use   [mod_bc_j.f, 86]             MOD_BC_J
    Use   [mod_bc_j.f, 99]             MOD_BC_J

J_s    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_i.f, 36]          MOD_BC_I
    Set   [mod_bc_i.f, 56]             MOD_BC_I
    Use Argument   [mod_bc_i.f, 60]    MOD_BC_I
    Use Argument   [mod_bc_i.f, 65]    MOD_BC_I
    Use Argument   [mod_bc_i.f, 66]    MOD_BC_I
    Use   [mod_bc_i.f, 97]             MOD_BC_I

J_S    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3089]         SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3113]   SETUP_VTK_REGION
    Set   [vtk_out.f, 3114]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3114]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3177]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3235]            SETUP_VTK_REGION

J_s    (Local Variable)  Declared as: INTEGER
    Define   [get_is.f, 35]            GET_IS
    Use Argument   [get_is.f, 75]      GET_IS
    Set   [get_is.f, 79]               GET_IS
    Use   [get_is.f, 79]               GET_IS
    Use Argument   [get_is.f, 82]      GET_IS
    Use   [get_is.f, 86]               GET_IS

J_s    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 46]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 107]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 113]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 113]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 113]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 114]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 114]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 114]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 124]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 130]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 145]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 156]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 156]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 164]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 170]       SET_BC_DEM_MO

J_s    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 428]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 476]   CHECK_BC_GEOMETRY_FLOW
    Set   [check_bc_geometry.f, 480]   CHECK_BC_GEOMETRY_FLOW
    Use   [check_bc_geometry.f, 480]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 482]   CHECK_BC_GEOMETRY_FLOW
    Use   [check_bc_geometry.f, 486]   CHECK_BC_GEOMETRY_FLOW

J_s    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 245]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 293]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 296]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 297]   CHECK_BC_GEOMETRY_WALL
    Use   [check_bc_geometry.f, 297]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 302]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 305]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 313]   CHECK_BC_GEOMETRY_WALL
    Use   [check_bc_geometry.f, 316]   CHECK_BC_GEOMETRY_WALL

J_SIZE    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 485]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 2000]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 2003]     RE_INDEX_ARRAYS

J_SLICE    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3091]         SETUP_VTK_REGION
    Set   [vtk_out.f, 3136]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3180]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3238]            SETUP_VTK_REGION

j_start    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 55]    SET_INCREMENTS
    Set   [set_increments.f, 278]      SET_INCREMENTS
    Set   [set_increments.f, 280]      SET_INCREMENTS
    Set   [set_increments.f, 288]      SET_INCREMENTS
    Set   [set_increments.f, 290]      SET_INCREMENTS
    Set   [set_increments.f, 293]      SET_INCREMENTS
    Set   [set_increments.f, 295]      SET_INCREMENTS
    Use   [set_increments.f, 301]      SET_INCREMENTS

J_TMP    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3090]         SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3135]   SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3136]   SETUP_VTK_REGION

J_WALL    (Local Variable)  Declared as: INTEGER
    Define   [mod_bc_j.f, 40]          MOD_BC_J
    Set   [mod_bc_j.f, 103]            MOD_BC_J
    Use   [mod_bc_j.f, 104]            MOD_BC_J
    Use   [mod_bc_j.f, 104]            MOD_BC_J
    Use Argument   [mod_bc_j.f, 113]   MOD_BC_J
    Use   [mod_bc_j.f, 115]            MOD_BC_J
    Use Argument   [mod_bc_j.f, 117]   MOD_BC_J
    Use Argument   [mod_bc_j.f, 146]   MOD_BC_J
    Use   [mod_bc_j.f, 148]            MOD_BC_J
    Use Argument   [mod_bc_j.f, 150]   MOD_BC_J
    Use   [mod_bc_j.f, 157]            MOD_BC_J

JC    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 47]   CALC_INTERP_WEIGHTS1
    Set   [calc_interp_weights.f, 97]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 99]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 100]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 101]   CALC_INTERP_WEIGHTS1

JDEBUG    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [leq_gmres.f, 151]        LEQ_GMRES0
    Declare   [leq_gmres.f, 152]       LEQ_GMRES0
    Set   [leq_gmres.f, 152]           LEQ_GMRES0
    Use   [leq_gmres.f, 254]           LEQ_GMRES0
    Use   [leq_gmres.f, 383]           LEQ_GMRES0
    Use   [leq_gmres.f, 468]           LEQ_GMRES0
    Use   [leq_gmres.f, 536]           LEQ_GMRES0
    Use   [leq_gmres.f, 557]           LEQ_GMRES0

jendl    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 681]        leq_check
    Set   [leq_gmres.f, 691]           leq_check
    Use   [leq_gmres.f, 703]           leq_check

JFLUID    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 331]   PIC_MI_BC
    Set   [pic_bc_routines.f, 389]     PIC_MI_BC
    Use   [pic_bc_routines.f, 394]     PIC_MI_BC
    Use   [pic_bc_routines.f, 394]     PIC_MI_BC
    Use   [pic_bc_routines.f, 400]     PIC_MI_BC
    Use   [pic_bc_routines.f, 473]     PIC_MI_BC

jj    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 459]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 1426]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1427]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1496]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1497]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1575]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1576]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1642]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1643]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1703]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1704]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1707]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1709]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1739]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1740]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1743]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1745]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1776]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1777]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1780]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1782]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1809]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1810]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1813]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1815]     RE_INDEX_ARRAYS

JJ    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1860]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1944]   GET_POTENTIAL_CUT_CELLS
    Use Argument   [get_cut_cell_flags.f, 1946]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1972]   GET_POTENTIAL_CUT_CELLS
    Use Argument   [get_cut_cell_flags.f, 1974]   GET_POTENTIAL_CUT_CELLS

JJ    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 47]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 532]   SET_3D_CUT_CELL_FLAGS
    Use Argument   [get_cut_cell_flags.f, 534]   SET_3D_CUT_CELL_FLAGS

JJ    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 43]      DRAG_GS_DES0
    Set   [drag_gs_des0.f, 117]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 119]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 120]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 121]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 122]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 125]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 131]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 132]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 133]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 134]        DRAG_GS_DES0

JJ    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 238]     DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 325]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 327]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 328]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 329]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 330]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 332]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 338]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 339]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 340]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 341]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 389]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 394]        DRAG_GS_GAS0

JJ    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 494]     DRAG_INTERPOLATION
    Set   [drag_gs_des0.f, 516]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 518]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 518]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 519]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 519]        DRAG_INTERPOLATION
    Set   [drag_gs_des0.f, 529]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 531]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 531]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 532]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 532]        DRAG_INTERPOLATION

jj    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 682]        leq_check
    Set   [leq_gmres.f, 734]           leq_check
    Use   [leq_gmres.f, 737]           leq_check
    Use   [leq_gmres.f, 737]           leq_check

JJ    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 173]        LEQ_GMRES0
    Set   [leq_gmres.f, 236]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 238]   LEQ_GMRES0
    Set   [leq_gmres.f, 271]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 273]   LEQ_GMRES0
    Set   [leq_gmres.f, 289]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 291]   LEQ_GMRES0
    Set   [leq_gmres.f, 316]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 318]   LEQ_GMRES0
    Set   [leq_gmres.f, 333]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 335]   LEQ_GMRES0
    Set   [leq_gmres.f, 376]           LEQ_GMRES0
    Use   [leq_gmres.f, 377]           LEQ_GMRES0
    Use   [leq_gmres.f, 377]           LEQ_GMRES0
    Use   [leq_gmres.f, 377]           LEQ_GMRES0
    Set   [leq_gmres.f, 426]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 428]   LEQ_GMRES0
    Set   [leq_gmres.f, 461]           LEQ_GMRES0
    Use   [leq_gmres.f, 462]           LEQ_GMRES0
    Use   [leq_gmres.f, 462]           LEQ_GMRES0
    Use   [leq_gmres.f, 462]           LEQ_GMRES0
    Set   [leq_gmres.f, 506]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 508]   LEQ_GMRES0
    Set   [leq_gmres.f, 520]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 522]   LEQ_GMRES0
    Set   [leq_gmres.f, 563]           LEQ_GMRES0
    Use Argument   [leq_gmres.f, 565]   LEQ_GMRES0

jj    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 598]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 790]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 792]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 793]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 794]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 795]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 814]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 815]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 816]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 817]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 827]        MPPIC_COMPUTE_PS_GRAD

JJ    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 43]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 140]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 142]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 145]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 180]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 183]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 238]   COMP_MEAN_FIELDS0
    Use Argument   [comp_mean_fields0.f, 241]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 262]   COMP_MEAN_FIELDS0
    Use Argument   [comp_mean_fields0.f, 264]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 337]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 339]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 341]   COMP_MEAN_FIELDS0
    Use Argument   [comp_mean_fields0.f, 342]   COMP_MEAN_FIELDS0

JJ    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 466]   DRAG_WEIGHTFACTOR
    Set   [comp_mean_fields0.f, 486]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 488]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 488]   DRAG_WEIGHTFACTOR
    Set   [comp_mean_fields0.f, 498]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 500]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 500]   DRAG_WEIGHTFACTOR

JJ    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 37]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 68]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 70]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 71]      MAKE_ARRAYS_DES

jj    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 614]       gatherWriteSpx_netcdf
    Set   [write_spx1.f, 627]          gatherWriteSpx_netcdf
    Use   [write_spx1.f, 630]          gatherWriteSpx_netcdf

jj    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 659]       gatherWriteSpx_netcdf_int
    Set   [write_spx1.f, 672]          gatherWriteSpx_netcdf_int
    Use   [write_spx1.f, 675]          gatherWriteSpx_netcdf_int

JJ    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 33]           NSQUARE
    Set   [nsquare.f, 65]              NSQUARE
    Set   [nsquare.f, 79]              NSQUARE
    Use   [nsquare.f, 80]              NSQUARE
    Set   [nsquare.f, 82]              NSQUARE
    Use   [nsquare.f, 83]              NSQUARE
    Use   [nsquare.f, 103]             NSQUARE

JJ1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_wall_bc.f, 216]      SET_WALL_BC1
    Declare   [set_wall_bc.f, 240]     SET_WALL_BC1
    Use   [set_wall_bc.f, 261]         SET_WALL_BC1

JJ2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_wall_bc.f, 216]      SET_WALL_BC1
    Declare   [set_wall_bc.f, 240]     SET_WALL_BC1
    Use   [set_wall_bc.f, 262]         SET_WALL_BC1

jlistsize    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4068]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4203]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4205]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4206]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4216]   REPORT_BEST_IJK_SIZE

JM    (Dummy Argument)  Declared as: INTEGER
    Define   [set_index1.f, 38]        SET_INDEX1
    Declare   [set_index1.f, 67]       SET_INDEX1
    Set   [set_index1.f, 76]           SET_INDEX1

JM    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1479]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1637]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1647]   CAD_INTERSECT

JM    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 729]   CLEAN_INTERSECT
    Set   [cut_cell_preprocessing.f, 756]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 765]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 773]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 774]   CLEAN_INTERSECT

JM    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1118]   SET_SNAP_FLAG
    Set   [cut_cell_preprocessing.f, 1145]   SET_SNAP_FLAG
    Use Argument   [cut_cell_preprocessing.f, 1149]   SET_SNAP_FLAG

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 333]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 345]    GET_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 349]   GET_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 352]   GET_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 354]   GET_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 356]   GET_CELL_NODE_COORDINATES

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 27]   GET_CONNECTIVITY
    Set   [get_connectivity.f, 51]     GET_CONNECTIVITY
    Use Argument   [get_connectivity.f, 55]   GET_CONNECTIVITY
    Use Argument   [get_connectivity.f, 58]   GET_CONNECTIVITY
    Use Argument   [get_connectivity.f, 60]   GET_CONNECTIVITY
    Use Argument   [get_connectivity.f, 62]   GET_CONNECTIVITY

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 511]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 523]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 527]   GET_GLOBAL_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 530]   GET_GLOBAL_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 532]   GET_GLOBAL_CELL_NODE_COORDINATES
    Use Argument   [get_connectivity.f, 534]   GET_GLOBAL_CELL_NODE_COORDINATES

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_g.f, 89]     CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 214]       CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 239]   CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 240]   CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 269]       CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 277]   CG_SOURCE_W_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1318]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Set   [get_cut_cell_flags.f, 1355]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1359]   SET_3D_CUT_CELL_TREATMENT_FLAGS

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1459]   SET_GHOST_CELL_FLAGS

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_g.f, 277]          CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 331]             CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 365]    CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 366]    CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 505]    CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 506]    CALC_CG_TAU_U_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_g.f, 82]           CALC_TAU_U_G
    Set   [tau_u_g.f, 121]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 165]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 166]    CALC_TAU_U_G

jm    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 297]     GET_UCELL_GDIFF_TERMS
    Set   [conv_dif_u_g.f, 314]        GET_UCELL_GDIFF_TERMS
    Use   [conv_dif_u_g.f, 339]        GET_UCELL_GDIFF_TERMS
    Use Argument   [conv_dif_u_g.f, 355]   GET_UCELL_GDIFF_TERMS
    Use Argument   [conv_dif_u_g.f, 356]   GET_UCELL_GDIFF_TERMS

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 496]       SOURCE_W_G_BC
    Set   [source_w_g.f, 732]          SOURCE_W_G_BC
    Use   [source_w_g.f, 793]          SOURCE_W_G_BC
    Use   [source_w_g.f, 794]          SOURCE_W_G_BC
    Set   [source_w_g.f, 822]          SOURCE_W_G_BC
    Use   [source_w_g.f, 875]          SOURCE_W_G_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_w_s.f, 110]    CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 152]       CALC_IA_MOMSOURCE_W_S
    Use Argument   [kintheory_w_s.f, 193]   CALC_IA_MOMSOURCE_W_S
    Use Argument   [kintheory_w_s.f, 194]   CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 196]       CALC_IA_MOMSOURCE_W_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [k_epsilon_prop.f, 58]    K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 148]      K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 170]   K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 186]   K_Epsilon_PROP

JM    (Local Variable)  Declared as: INTEGER
    Define   [b_m_p_star.f, 564]       B_M_P_STAR_S
    Set   [b_m_p_star.f, 595]          B_M_P_STAR_S
    Use Argument   [b_m_p_star.f, 606]   B_M_P_STAR_S
    Use Argument   [b_m_p_star.f, 617]   B_M_P_STAR_S
    Use Argument   [b_m_p_star.f, 620]   B_M_P_STAR_S
    Use Argument   [b_m_p_star.f, 623]   B_M_P_STAR_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_des.f, 44]       DIF_PHI_DES
    Set   [dif_phi_des.f, 105]         DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 107]   DIF_PHI_DES
    Use   [dif_phi_des.f, 107]         DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 110]   DIF_PHI_DES
    Use   [dif_phi_des.f, 110]         DIF_PHI_DES

JM    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_g.f, 74]         CALC_MU_G
    Set   [calc_mu_g.f, 224]           CALC_MU_G
    Use Argument   [calc_mu_g.f, 247]   CALC_MU_G
    Use Argument   [calc_mu_g.f, 263]   CALC_MU_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_s.f, 71]     CG_SOURCE_W_S
    Set   [CG_source_w_s.f, 200]       CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 221]   CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 222]   CG_SOURCE_W_S
    Set   [CG_source_w_s.f, 247]       CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 253]   CG_SOURCE_W_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 60]            BC_PHI
    Set   [bc_phi.f, 244]              BC_PHI
    Use   [bc_phi.f, 300]              BC_PHI
    Use   [bc_phi.f, 301]              BC_PHI

JM    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 502]           BC_PHI_CG
    Set   [bc_phi.f, 537]              BC_PHI_CG
    Use   [bc_phi.f, 618]              BC_PHI_CG
    Use   [bc_phi.f, 619]              BC_PHI_CG

jm    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 131]     GET_PHICELL_DIFF_TERMS
    Set   [conv_dif_phi.f, 147]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 158]        GET_PHICELL_DIFF_TERMS
    Use   [conv_dif_phi.f, 170]        GET_PHICELL_DIFF_TERMS
    Use Argument   [conv_dif_phi.f, 185]   GET_PHICELL_DIFF_TERMS

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 320]          CALC_CG_TAU_U_S
    Set   [tau_u_s.f, 344]             CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 380]    CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 381]    CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 523]    CALC_CG_TAU_U_S
    Use Argument   [tau_u_s.f, 524]    CALC_CG_TAU_U_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 170]          CALC_REG_TAU_U_S
    Set   [tau_u_s.f, 184]             CALC_REG_TAU_U_S
    Use Argument   [tau_u_s.f, 229]    CALC_REG_TAU_U_S
    Use Argument   [tau_u_s.f, 230]    CALC_REG_TAU_U_S

jm    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 318]     GET_UCELL_SDIFF_TERMS
    Set   [conv_dif_u_s.f, 334]        GET_UCELL_SDIFF_TERMS
    Use   [conv_dif_u_s.f, 359]        GET_UCELL_SDIFF_TERMS
    Use Argument   [conv_dif_u_s.f, 375]   GET_UCELL_SDIFF_TERMS
    Use Argument   [conv_dif_u_s.f, 376]   GET_UCELL_SDIFF_TERMS

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_g.f, 89]     CG_SOURCE_V_G
    Set   [CG_source_v_g.f, 267]       CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 275]   CG_SOURCE_V_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_g.f, 408]    CG_SOURCE_V_G_BC
    Set   [CG_source_v_g.f, 469]       CG_SOURCE_V_G_BC
    Set   [CG_source_v_g.f, 581]       CG_SOURCE_V_G_BC
    Use   [CG_source_v_g.f, 616]       CG_SOURCE_V_G_BC
    Use   [CG_source_v_g.f, 617]       CG_SOURCE_V_G_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1050]      JJ_BC_W_S
    Set   [source_w_s.f, 1063]         JJ_BC_W_S
    Use   [source_w_s.f, 1170]         JJ_BC_W_S
    Use   [source_w_s.f, 1171]         JJ_BC_W_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 568]       SOURCE_W_S_BC
    Set   [source_w_s.f, 787]          SOURCE_W_S_BC
    Use   [source_w_s.f, 848]          SOURCE_W_S_BC
    Use   [source_w_s.f, 849]          SOURCE_W_S_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 87]   SOURCE_GRANULAR_ENERGY
    Set   [source_granular_energy.f, 112]   SOURCE_GRANULAR_ENERGY
    Use Argument   [source_granular_energy.f, 205]   SOURCE_GRANULAR_ENERGY
    Use   [source_granular_energy.f, 216]   SOURCE_GRANULAR_ENERGY

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 631]   SOURCE_GRANULAR_ENERGY_GD
    Set   [source_granular_energy.f, 659]   SOURCE_GRANULAR_ENERGY_GD
    Use Argument   [source_granular_energy.f, 750]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 763]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 764]   SOURCE_GRANULAR_ENERGY_GD

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 298]   SOURCE_GRANULAR_ENERGY_IA
    Set   [source_granular_energy.f, 341]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 489]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 497]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 512]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 513]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 525]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 538]   SOURCE_GRANULAR_ENERGY_IA

JM    (Local Variable)  Declared as: INTEGER
    Define   [calc_vort_out.f, 32]     CALC_VORTICITY
    Set   [calc_vort_out.f, 48]        CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 60]   CALC_VORTICITY

JM    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 3028]       CALC_BOYLE_MASSOUDI_STRESS
    Set   [calc_mu_s.f, 3046]          CALC_BOYLE_MASSOUDI_STRESS
    Use   [calc_mu_s.f, 3061]          CALC_BOYLE_MASSOUDI_STRESS
    Use   [calc_mu_s.f, 3062]          CALC_BOYLE_MASSOUDI_STRESS
    Use   [calc_mu_s.f, 3063]          CALC_BOYLE_MASSOUDI_STRESS

JM    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2665]       init1_mu_s
    Set   [calc_mu_s.f, 2694]          init1_mu_s
    Use Argument   [calc_mu_s.f, 2723]   init1_mu_s
    Use Argument   [calc_mu_s.f, 2764]   init1_mu_s
    Use Argument   [calc_mu_s.f, 2860]   init1_mu_s
    Use Argument   [calc_mu_s.f, 2901]   init1_mu_s

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_s.f, 69]     CG_SOURCE_V_S
    Set   [CG_source_v_s.f, 240]       CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 246]   CG_SOURCE_V_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_ghd_granular_energy.f, 55]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 98]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 202]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 203]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 213]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 275]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 276]   SOURCE_GHD_GRANULAR_ENERGY

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 87]     CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 210]       CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 229]   CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 230]   CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 270]       CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 278]   CG_SOURCE_U_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 410]    CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 468]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 486]       CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 582]       CG_SOURCE_U_G_BC
    Use Argument   [CG_source_u_g.f, 586]   CG_SOURCE_U_G_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 43]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 215]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 216]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 217]      DIF_PHI_BC_DES

JM    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 288]   DIF_PHI_BC_DES_CG
    Set   [dif_phi_bc_des.f, 340]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 341]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 342]      DIF_PHI_BC_DES_CG

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 26]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 74]            GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 83]   GET_3D_ALPHA_U_CUT_CELL

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 430]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 478]           GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 487]   GET_3D_ALPHA_V_CUT_CELL

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 834]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 880]           GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 889]   GET_3D_ALPHA_W_CUT_CELL

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_g.f, 291]          CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 343]             CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 378]    CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 379]    CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 563]    CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 564]    CALC_CG_TAU_w_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_g.f, 92]           CALC_TAU_W_G
    Set   [tau_w_g.f, 128]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 177]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 178]    CALC_TAU_W_G

jm    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 288]     GET_WCELL_GDIFF_TERMS
    Set   [conv_dif_w_g.f, 306]        GET_WCELL_GDIFF_TERMS
    Use   [conv_dif_w_g.f, 334]        GET_WCELL_GDIFF_TERMS
    Use Argument   [conv_dif_w_g.f, 353]   GET_WCELL_GDIFF_TERMS
    Use Argument   [conv_dif_w_g.f, 354]   GET_WCELL_GDIFF_TERMS

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 436]       SOURCE_U_G_BC
    Set   [source_u_g.f, 671]          SOURCE_U_G_BC
    Use   [source_u_g.f, 697]          SOURCE_U_G_BC
    Use   [source_u_g.f, 698]          SOURCE_U_G_BC
    Set   [source_u_g.f, 746]          SOURCE_U_G_BC
    Use   [source_u_g.f, 762]          SOURCE_U_G_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_u_s.f, 108]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 150]       CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 191]   CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 192]   CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 194]       CALC_IA_MOMSOURCE_U_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 31]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 78]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 82]   GET_CUT_CELL_VOLUME_AND_AREAS

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_s.f, 70]     CG_SOURCE_U_S
    Set   [CG_source_u_s.f, 202]       CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 219]   CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 220]   CG_SOURCE_U_S
    Set   [CG_source_u_s.f, 252]       CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 258]   CG_SOURCE_U_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 298]          CALC_CG_TAU_W_S
    Set   [tau_w_s.f, 321]             CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 357]    CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 358]    CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 538]    CALC_CG_TAU_W_S
    Use Argument   [tau_w_s.f, 539]    CALC_CG_TAU_W_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 148]          CALC_REG_TAU_W_S
    Set   [tau_w_s.f, 161]             CALC_REG_TAU_W_S
    Use Argument   [tau_w_s.f, 209]    CALC_REG_TAU_W_S
    Use Argument   [tau_w_s.f, 210]    CALC_REG_TAU_W_S

jm    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 310]     GET_WCELL_SDIFF_TERMS
    Set   [conv_dif_w_s.f, 327]        GET_WCELL_SDIFF_TERMS
    Use   [conv_dif_w_s.f, 355]        GET_WCELL_SDIFF_TERMS
    Use Argument   [conv_dif_w_s.f, 374]   GET_WCELL_SDIFF_TERMS
    Use Argument   [conv_dif_w_s.f, 375]   GET_WCELL_SDIFF_TERMS

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1010]      JJ_BC_U_S
    Set   [source_u_s.f, 1023]         JJ_BC_U_S
    Use   [source_u_s.f, 1081]         JJ_BC_U_S
    Use   [source_u_s.f, 1082]         JJ_BC_U_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 535]       SOURCE_U_S_BC
    Set   [source_u_s.f, 755]          SOURCE_U_S_BC
    Use   [source_u_s.f, 781]          SOURCE_U_S_BC
    Use   [source_u_s.f, 782]          SOURCE_U_S_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 71]          BC_THETA
    Set   [bc_theta.f, 99]             BC_THETA
    Use   [bc_theta.f, 205]            BC_THETA
    Use   [bc_theta.f, 206]            BC_THETA

JM_COPY    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 449]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 917]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 933]      RE_INDEX_ARRAYS

JMINUS1    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 804]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 845]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [pic_bc_routines.f, 851]     CHECK_IF_PARCEL_OVERLAPS_STL

JMINUS1    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 40]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 130]     MAKE_ARRAYS_DES

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 609]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 686]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 687]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 687]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 687]        STORE_A_V_SDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 605]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 683]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 684]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 684]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 684]        STORE_A_U_GDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 415]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 473]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 474]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 474]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 474]        CONV_DIF_PHI_DC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 605]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 682]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 683]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 683]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 683]        STORE_A_U_SDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 580]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 659]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 660]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 660]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 660]        STORE_A_W_GDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 589]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 667]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 668]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 668]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 668]        STORE_A_W_SDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 605]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 683]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 684]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 684]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 684]        STORE_A_V_GDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 609]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 687]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 741]        STORE_A_V_SDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 605]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 684]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 738]        STORE_A_U_GDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 415]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 474]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 552]        CONV_DIF_PHI_DC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 605]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 683]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 737]        STORE_A_U_SDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 580]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 660]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 731]        STORE_A_W_GDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 589]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 668]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 722]        STORE_A_W_SDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 605]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 684]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 759]        STORE_A_V_GDC

JN    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 48]      DRAG_GS_DES0
    Set   [drag_gs_des0.f, 109]        DRAG_GS_DES0

JN    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 244]     DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 317]        DRAG_GS_GAS0

jn    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 596]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 782]        MPPIC_COMPUTE_PS_GRAD

JN    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 49]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 130]   COMP_MEAN_FIELDS0

Joii    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [ghdmassflux.f, 934]      VELOCITY_UPDATE
    Declare   [ghdmassflux.f, 947]     VELOCITY_UPDATE
    Use   [ghdmassflux.f, 977]         VELOCITY_UPDATE

JoiM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [ghdmassflux.f, 447]      UpdateSpeciesVelocities
    Set   [ghdmassflux.f, 507]         UpdateSpeciesVelocities
    Set   [ghdmassflux.f, 509]         UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 531]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 534]   UpdateSpeciesVelocities
    Set   [ghdmassflux.f, 599]         UpdateSpeciesVelocities
    Set   [ghdmassflux.f, 601]         UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 625]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 629]   UpdateSpeciesVelocities
    Set   [ghdmassflux.f, 693]         UpdateSpeciesVelocities
    Set   [ghdmassflux.f, 695]         UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 717]   UpdateSpeciesVelocities
    Use Argument   [ghdmassflux.f, 720]   UpdateSpeciesVelocities

JoiM    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [ghdmassflux.f, 839]      Ur_JACOBI_EVAL
    Declare   [ghdmassflux.f, 852]     Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 902]         Ur_JACOBI_EVAL

JoiM    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [ghdmassflux.f, 772]      UrNEWT
    Declare   [ghdmassflux.f, 787]     UrNEWT
    Use Argument   [ghdmassflux.f, 802]   UrNEWT

JoiXC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 69]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 327]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 336]   SOURCE_GHD_GRANULAR_ENERGY

JoiYC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 69]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 328]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 336]   SOURCE_GHD_GRANULAR_ENERGY

JoiZC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 69]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 329]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 336]   SOURCE_GHD_GRANULAR_ENERGY

JP    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1479]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1588]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1589]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1596]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1597]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1641]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1648]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1652]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1654]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1734]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1736]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1893]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1894]   CAD_INTERSECT

JP    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 729]   CLEAN_INTERSECT
    Set   [cut_cell_preprocessing.f, 760]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 766]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 770]   CLEAN_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 777]   CLEAN_INTERSECT

JP    (Local Variable)  Declared as: INTEGER
    Define   [cut_cell_preprocessing.f, 1348]   REMOVE_INTERSECT_FLAG
    Set   [cut_cell_preprocessing.f, 1357]   REMOVE_INTERSECT_FLAG
    Use Argument   [cut_cell_preprocessing.f, 1361]   REMOVE_INTERSECT_FLAG

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 333]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 341]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 406]    GET_CELL_NODE_COORDINATES

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 511]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 519]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 581]    GET_GLOBAL_CELL_NODE_COORDINATES

JP    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 284]          CALC_CG_TAU_V_S
    Set   [tau_v_s.f, 304]             CALC_CG_TAU_V_S

JP    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 165]          CALC_REG_TAU_V_S
    Set   [tau_v_s.f, 173]             CALC_REG_TAU_V_S
    Use   [tau_v_s.f, 219]             CALC_REG_TAU_V_S

jp    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 324]     GET_VCELL_SDIFF_TERMS
    Set   [conv_dif_v_s.f, 339]        GET_VCELL_SDIFF_TERMS
    Use   [conv_dif_v_s.f, 363]        GET_VCELL_SDIFF_TERMS

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_g.f, 89]     CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 273]       CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 279]   CG_SOURCE_W_G

JP    (Local Variable)  Declared as: INTEGER
    Define   [set_Odxyz.f, 35]         SET_ODXYZ_U_CUT_CELL
    Set   [set_Odxyz.f, 86]            SET_ODXYZ_U_CUT_CELL
    Use Argument   [set_Odxyz.f, 87]   SET_ODXYZ_U_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [set_Odxyz.f, 166]        SET_ODXYZ_V_CUT_CELL
    Set   [set_Odxyz.f, 217]           SET_ODXYZ_V_CUT_CELL
    Use Argument   [set_Odxyz.f, 218]   SET_ODXYZ_V_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [set_Odxyz.f, 301]        SET_ODXYZ_W_CUT_CELL
    Set   [set_Odxyz.f, 347]           SET_ODXYZ_W_CUT_CELL
    Use Argument   [set_Odxyz.f, 348]   SET_ODXYZ_W_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1318]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Set   [get_cut_cell_flags.f, 1351]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use Argument   [get_cut_cell_flags.f, 1363]   SET_3D_CUT_CELL_TREATMENT_FLAGS

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1459]   SET_GHOST_CELL_FLAGS

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_s.f, 71]     CG_SOURCE_W_S
    Set   [CG_source_w_s.f, 250]       CG_SOURCE_W_S
    Use Argument   [CG_source_w_s.f, 255]   CG_SOURCE_W_S

JP    (Local Variable)  Declared as: INTEGER
    Define   [set_geometry1.f, 48]     SET_GEOMETRY1
    Set   [set_geometry1.f, 74]        SET_GEOMETRY1
    Use   [set_geometry1.f, 84]        SET_GEOMETRY1
    Use   [set_geometry1.f, 89]        SET_GEOMETRY1
    Use   [set_geometry1.f, 94]        SET_GEOMETRY1
    Use   [set_geometry1.f, 106]       SET_GEOMETRY1
    Use   [set_geometry1.f, 111]       SET_GEOMETRY1
    Use   [set_geometry1.f, 116]       SET_GEOMETRY1

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_g.f, 89]     CG_SOURCE_V_G
    Set   [CG_source_v_g.f, 202]       CG_SOURCE_V_G
    Set   [CG_source_v_g.f, 271]       CG_SOURCE_V_G
    Use Argument   [CG_source_v_g.f, 277]   CG_SOURCE_V_G

JP    (Local Variable)  Declared as: INTEGER
    Define   [calc_vort_out.f, 32]     CALC_VORTICITY
    Set   [calc_vort_out.f, 49]        CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 56]   CALC_VORTICITY

JP    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_v_s.f, 108]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 146]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 191]       CALC_IA_MOMSOURCE_V_S

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_s.f, 69]     CG_SOURCE_V_S
    Set   [CG_source_v_s.f, 190]       CG_SOURCE_V_S
    Set   [CG_source_v_s.f, 243]       CG_SOURCE_V_S
    Use Argument   [CG_source_v_s.f, 248]   CG_SOURCE_V_S

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 87]     CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 274]       CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 280]   CG_SOURCE_U_G

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 26]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 78]            GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 84]   GET_3D_ALPHA_U_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 430]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 482]           GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 488]   GET_3D_ALPHA_V_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 834]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 884]           GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 890]   GET_3D_ALPHA_W_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_s.f, 70]     CG_SOURCE_U_S
    Set   [CG_source_u_s.f, 255]       CG_SOURCE_U_S
    Use Argument   [CG_source_u_s.f, 260]   CG_SOURCE_U_S

jp    (Local Variable)  Declared as: INTEGER
    Define   [cfassign.f, 209]         compute_volume_of_nodes
    Set   [cfassign.f, 255]            compute_volume_of_nodes
    Use Argument   [cfassign.f, 262]   compute_volume_of_nodes
    Use Argument   [cfassign.f, 263]   compute_volume_of_nodes
    Use   [cfassign.f, 269]            compute_volume_of_nodes
    Use   [cfassign.f, 270]            compute_volume_of_nodes
    Use Argument   [cfassign.f, 304]   compute_volume_of_nodes
    Use Argument   [cfassign.f, 305]   compute_volume_of_nodes
    Use   [cfassign.f, 309]            compute_volume_of_nodes
    Use   [cfassign.f, 310]            compute_volume_of_nodes

JP    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_g.f, 231]          CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 283]             CALC_CG_TAU_V_G

JP    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_g.f, 66]           CALC_TAU_V_G
    Set   [tau_v_g.f, 97]              CALC_TAU_V_G
    Use   [tau_v_g.f, 140]             CALC_TAU_V_G

jp    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 300]     GET_VCELL_GDIFF_TERMS
    Set   [conv_dif_v_g.f, 317]        GET_VCELL_GDIFF_TERMS
    Use   [conv_dif_v_g.f, 341]        GET_VCELL_GDIFF_TERMS

JP_COPY    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 449]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 918]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 934]      RE_INDEX_ARRAYS

JPLUS1    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 804]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 844]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [pic_bc_routines.f, 851]     CHECK_IF_PARCEL_OVERLAPS_STL

JPLUS1    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 40]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 129]     MAKE_ARRAYS_DES

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 608]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 684]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 685]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 685]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 685]        STORE_A_V_SDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 604]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 681]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 682]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 682]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 682]        STORE_A_U_GDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 414]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 471]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 472]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 472]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 472]        CONV_DIF_PHI_DC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 604]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 680]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 681]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 681]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 681]        STORE_A_U_SDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 579]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 657]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 658]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 658]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 658]        STORE_A_W_GDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 588]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 665]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 666]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 666]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 666]        STORE_A_W_SDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 604]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 681]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 682]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 682]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 682]        STORE_A_V_GDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 608]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 685]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 731]        STORE_A_V_SDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 604]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 682]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 728]        STORE_A_U_GDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 414]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 472]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 504]        CONV_DIF_PHI_DC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 604]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 681]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 727]        STORE_A_U_SDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 579]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 658]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 690]        STORE_A_W_GDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 588]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 666]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 712]        STORE_A_W_SDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 604]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 682]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 714]        STORE_A_V_GDC

jraw    (Local Variable)  Declared as: INTEGER
    Define   [cfassign.f, 206]         compute_volume_of_nodes
    Set   [cfassign.f, 230]            compute_volume_of_nodes
    Use   [cfassign.f, 244]            compute_volume_of_nodes
    Use   [cfassign.f, 244]            compute_volume_of_nodes
    Use   [cfassign.f, 252]            compute_volume_of_nodes
    Use   [cfassign.f, 255]            compute_volume_of_nodes

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3376]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3747]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3748]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3749]   ADJUST_IJK_SIZE

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4093]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4363]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4364]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4365]   REPORT_BEST_IJK_SIZE

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4914]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5147]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5148]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5149]   REPORT_BEST_IJK_SIZE0

JS    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 48]      DRAG_GS_DES0
    Set   [drag_gs_des0.f, 109]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 117]        DRAG_GS_DES0

JS    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 244]     DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 317]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 325]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 389]        DRAG_GS_GAS0

js    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 596]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 782]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 790]        MPPIC_COMPUTE_PS_GRAD

JS    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 49]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 130]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 140]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 180]   COMP_MEAN_FIELDS0

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3376]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3744]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3745]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3747]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3749]   ADJUST_IJK_SIZE

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4093]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4360]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4361]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4363]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4365]   REPORT_BEST_IJK_SIZE

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4914]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5144]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5145]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5147]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5149]   REPORT_BEST_IJK_SIZE0

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3374]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3745]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3749]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3760]   ADJUST_IJK_SIZE

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4090]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4361]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4365]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4368]   REPORT_BEST_IJK_SIZE

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4912]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5145]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5149]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5154]   REPORT_BEST_IJK_SIZE0

jstartl    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 681]        leq_check
    Set   [leq_gmres.f, 690]           leq_check
    Use   [leq_gmres.f, 703]           leq_check

JUSTIFICATION    (Dummy Argument)  Declared as: CHARACTER
    Define   [write_progress_bar.f, 148]   ERASE_PROGRESS_BAR
    Declare   [write_progress_bar.f, 169]   ERASE_PROGRESS_BAR
    Use   [write_progress_bar.f, 181]   ERASE_PROGRESS_BAR
    Use   [write_progress_bar.f, 192]   ERASE_PROGRESS_BAR

JUSTIFICATION    (Dummy Argument)  Declared as: CHARACTER
    Define   [write_progress_bar.f, 24]   WRITE_PROGRESS_BAR
    Declare   [write_progress_bar.f, 48]   WRITE_PROGRESS_BAR
    Use Argument   [write_progress_bar.f, 59]   WRITE_PROGRESS_BAR
    Use   [write_progress_bar.f, 78]   WRITE_PROGRESS_BAR
    Use   [write_progress_bar.f, 102]   WRITE_PROGRESS_BAR

Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ