Object Cross Reference


Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ

L    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 46]    SET_INCREMENTS
    Set   [set_increments.f, 218]      SET_INCREMENTS
    Use   [set_increments.f, 219]      SET_INCREMENTS
    Use   [set_increments.f, 220]      SET_INCREMENTS
    Use   [set_increments.f, 222]      SET_INCREMENTS
    Use   [set_increments.f, 222]      SET_INCREMENTS
    Use   [set_increments.f, 222]      SET_INCREMENTS
    Use   [set_increments.f, 223]      SET_INCREMENTS
    Use   [set_increments.f, 223]      SET_INCREMENTS
    Use   [set_increments.f, 223]      SET_INCREMENTS

L    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2429]   SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Set   [set_increments.f, 2451]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2454]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2457]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2459]     SHIFT_CONNECTIVITY_FOR_BDIST_IO

L    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2610]   WRITE_INT_TABLE
    Set   [set_increments.f, 2616]     WRITE_INT_TABLE

L    (Local Variable)  Declared as: INTEGER
    Define   [ghdmassflux.f, 49]       GHDMASSFLUX
    Set   [ghdmassflux.f, 188]         GHDMASSFLUX
    Use   [ghdmassflux.f, 189]         GHDMASSFLUX
    Use   [ghdmassflux.f, 189]         GHDMASSFLUX
    Use   [ghdmassflux.f, 191]         GHDMASSFLUX
    Use   [ghdmassflux.f, 192]         GHDMASSFLUX
    Use   [ghdmassflux.f, 193]         GHDMASSFLUX
    Use   [ghdmassflux.f, 194]         GHDMASSFLUX
    Use   [ghdmassflux.f, 198]         GHDMASSFLUX
    Use   [ghdmassflux.f, 199]         GHDMASSFLUX
    Use   [ghdmassflux.f, 200]         GHDMASSFLUX
    Use   [ghdmassflux.f, 201]         GHDMASSFLUX
    Use   [ghdmassflux.f, 206]         GHDMASSFLUX
    Use   [ghdmassflux.f, 209]         GHDMASSFLUX
    Use   [ghdmassflux.f, 212]         GHDMASSFLUX
    Use   [ghdmassflux.f, 224]         GHDMASSFLUX
    Use   [ghdmassflux.f, 225]         GHDMASSFLUX
    Use   [ghdmassflux.f, 226]         GHDMASSFLUX
    Use   [ghdmassflux.f, 227]         GHDMASSFLUX
    Use   [ghdmassflux.f, 231]         GHDMASSFLUX
    Use   [ghdmassflux.f, 234]         GHDMASSFLUX
    Use   [ghdmassflux.f, 237]         GHDMASSFLUX
    Use   [ghdmassflux.f, 249]         GHDMASSFLUX
    Use   [ghdmassflux.f, 250]         GHDMASSFLUX
    Use   [ghdmassflux.f, 251]         GHDMASSFLUX
    Use   [ghdmassflux.f, 252]         GHDMASSFLUX
    Use   [ghdmassflux.f, 256]         GHDMASSFLUX
    Use   [ghdmassflux.f, 259]         GHDMASSFLUX
    Use   [ghdmassflux.f, 262]         GHDMASSFLUX
    Use   [ghdmassflux.f, 273]         GHDMASSFLUX
    Use   [ghdmassflux.f, 273]         GHDMASSFLUX
    Use   [ghdmassflux.f, 274]         GHDMASSFLUX
    Use   [ghdmassflux.f, 274]         GHDMASSFLUX
    Use   [ghdmassflux.f, 275]         GHDMASSFLUX
    Use   [ghdmassflux.f, 275]         GHDMASSFLUX
    Use   [ghdmassflux.f, 276]         GHDMASSFLUX
    Use   [ghdmassflux.f, 276]         GHDMASSFLUX
    Use   [ghdmassflux.f, 277]         GHDMASSFLUX
    Use   [ghdmassflux.f, 277]         GHDMASSFLUX
    Use   [ghdmassflux.f, 278]         GHDMASSFLUX
    Use   [ghdmassflux.f, 278]         GHDMASSFLUX
    Use   [ghdmassflux.f, 283]         GHDMASSFLUX
    Use   [ghdmassflux.f, 286]         GHDMASSFLUX
    Use   [ghdmassflux.f, 291]         GHDMASSFLUX
    Use   [ghdmassflux.f, 294]         GHDMASSFLUX
    Use   [ghdmassflux.f, 299]         GHDMASSFLUX
    Use   [ghdmassflux.f, 302]         GHDMASSFLUX
    Use   [ghdmassflux.f, 305]         GHDMASSFLUX
    Use   [ghdmassflux.f, 311]         GHDMASSFLUX
    Use   [ghdmassflux.f, 317]         GHDMASSFLUX
    Use   [ghdmassflux.f, 328]         GHDMASSFLUX
    Use   [ghdmassflux.f, 329]         GHDMASSFLUX
    Use   [ghdmassflux.f, 330]         GHDMASSFLUX
    Use   [ghdmassflux.f, 332]         GHDMASSFLUX
    Use   [ghdmassflux.f, 333]         GHDMASSFLUX
    Use   [ghdmassflux.f, 334]         GHDMASSFLUX
    Use   [ghdmassflux.f, 336]         GHDMASSFLUX
    Use   [ghdmassflux.f, 337]         GHDMASSFLUX
    Use   [ghdmassflux.f, 338]         GHDMASSFLUX

l    (Local Variable)  Declared as: INTEGER
    Define   [ghdmassflux.f, 960]      VELOCITY_UPDATE
    Set   [ghdmassflux.f, 982]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 984]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 985]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 985]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 987]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 991]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 991]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 991]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 991]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 995]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 996]         VELOCITY_UPDATE
    Use   [ghdmassflux.f, 996]         VELOCITY_UPDATE

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs.f, 78]           DRAG_GS
    Set   [drag_gs.f, 135]             DRAG_GS
    Use   [drag_gs.f, 136]             DRAG_GS
    Use   [drag_gs.f, 137]             DRAG_GS
    Use   [drag_gs.f, 138]             DRAG_GS
    Set   [drag_gs.f, 178]             DRAG_GS
    Use   [drag_gs.f, 180]             DRAG_GS
    Set   [drag_gs.f, 187]             DRAG_GS
    Use   [drag_gs.f, 189]             DRAG_GS
    Use   [drag_gs.f, 190]             DRAG_GS
    Use   [drag_gs.f, 192]             DRAG_GS
    Set   [drag_gs.f, 261]             DRAG_GS
    Use   [drag_gs.f, 262]             DRAG_GS
    Use   [drag_gs.f, 263]             DRAG_GS
    Use   [drag_gs.f, 263]             DRAG_GS
    Use   [drag_gs.f, 264]             DRAG_GS
    Use   [drag_gs.f, 265]             DRAG_GS
    Use   [drag_gs.f, 265]             DRAG_GS
    Use   [drag_gs.f, 266]             DRAG_GS
    Use   [drag_gs.f, 267]             DRAG_GS
    Use   [drag_gs.f, 267]             DRAG_GS

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs.f, 1396]         DRAG_HYS
    Set   [drag_gs.f, 1435]            DRAG_HYS
    Use   [drag_gs.f, 1436]            DRAG_HYS
    Set   [drag_gs.f, 1461]            DRAG_HYS
    Use   [drag_gs.f, 1462]            DRAG_HYS
    Use   [drag_gs.f, 1463]            DRAG_HYS
    Use   [drag_gs.f, 1466]            DRAG_HYS
    Use   [drag_gs.f, 1467]            DRAG_HYS
    Use   [drag_gs.f, 1472]            DRAG_HYS
    Use   [drag_gs.f, 1475]            DRAG_HYS
    Use   [drag_gs.f, 1476]            DRAG_HYS
    Use   [drag_gs.f, 1476]            DRAG_HYS
    Use   [drag_gs.f, 1477]            DRAG_HYS
    Use   [drag_gs.f, 1478]            DRAG_HYS

L    (Local Variable)  Declared as: INTEGER
    Define   [check_chemical_rxns.f, 148]   CHECK_CHEMICAL_RXNS_COMMON
    Set   [check_chemical_rxns.f, 168]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 170]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 173]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 179]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 188]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 201]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 201]   CHECK_CHEMICAL_RXNS_COMMON
    Set   [check_chemical_rxns.f, 259]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 260]   CHECK_CHEMICAL_RXNS_COMMON

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_nflux.f, 57]        CALC_NFLUX
    Set   [calc_nflux.f, 71]           CALC_NFLUX
    Use   [calc_nflux.f, 72]           CALC_NFLUX
    Use   [calc_nflux.f, 72]           CALC_NFLUX
    Use   [calc_nflux.f, 73]           CALC_NFLUX
    Use   [calc_nflux.f, 76]           CALC_NFLUX
    Use   [calc_nflux.f, 78]           CALC_NFLUX
    Use   [calc_nflux.f, 81]           CALC_NFLUX
    Use   [calc_nflux.f, 85]           CALC_NFLUX
    Use   [calc_nflux.f, 88]           CALC_NFLUX

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [cfwallposvel.f, 11]      CFWALLPOSVEL
    Declare   [cfwallposvel.f, 35]     CFWALLPOSVEL
    Use   [cfwallposvel.f, 55]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 59]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 64]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 65]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 78]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 79]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 91]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 93]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 105]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 107]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 119]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 120]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 133]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 134]        CFWALLPOSVEL

L    (Local Variable)  Declared as: INTEGER
    Define   [check_output_control.f, 48]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 124]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 125]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 126]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 126]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 127]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 127]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 128]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 128]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 129]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 129]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 130]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 130]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 131]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 131]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 133]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 152]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 153]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 153]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 153]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 157]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 159]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 163]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 166]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 169]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 170]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 173]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 177]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 182]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 186]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 188]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 193]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 198]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 204]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 209]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 214]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 219]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 220]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 224]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 225]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 228]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 231]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 234]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 238]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 243]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 247]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 250]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 253]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 256]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 259]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 262]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 265]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 268]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 271]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 274]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 277]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 280]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 283]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 286]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 289]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 292]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 295]   CHECK_OUTPUT_CONTROL
    Use Argument   [check_output_control.f, 303]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 304]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 330]   CHECK_OUTPUT_CONTROL

L    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 330]   PIC_MI_BC
    Set   [pic_bc_routines.f, 525]     PIC_MI_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 234]   INIT_PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 254]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 256]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 261]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 263]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 265]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 267]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 271]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 273]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 275]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 280]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 283]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 283]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 283]   INIT_PARTICLES_IN_CELL

L    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 51]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 68]    PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 70]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 72]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 74]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 77]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 78]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 80]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 81]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 83]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 84]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 87]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 92]    PARTICLES_IN_CELL
    Use   [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
    Use   [particles_in_cell.f, 100]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 101]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 103]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 104]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 107]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 116]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 118]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 121]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 122]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 124]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 125]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 127]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 128]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 131]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 141]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 142]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 143]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 144]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 147]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 147]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 147]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 179]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 183]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 187]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 187]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 187]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 188]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 190]   PARTICLES_IN_CELL

L    (Local Variable)  Declared as: INTEGER
    Define   [mfix.f, 107]             MFIX
    Set   [mfix.f, 222]                MFIX
    Use   [mfix.f, 223]                MFIX
    Set   [mfix.f, 247]                MFIX
    Use Argument   [mfix.f, 248]       MFIX
    Set   [mfix.f, 280]                MFIX
    Use Argument   [mfix.f, 281]       MFIX
    Use Argument   [mfix.f, 282]       MFIX
    Set   [mfix.f, 396]                MFIX
    Use Argument   [mfix.f, 397]       MFIX
    Use Argument   [mfix.f, 398]       MFIX

L    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 251]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 305]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 307]   WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 309]   WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 309]   WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 309]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 312]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 312]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 313]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 313]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 316]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 316]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 317]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 317]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 317]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 359]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 360]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 360]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 363]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 364]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 364]      WRITE_DES_TECPLOT

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 44]          DIF_W_IS
    Set   [dif_w_is.f, 51]             DIF_W_IS
    Use   [dif_w_is.f, 52]             DIF_W_IS
    Use   [dif_w_is.f, 53]             DIF_W_IS
    Use   [dif_w_is.f, 54]             DIF_W_IS
    Use   [dif_w_is.f, 55]             DIF_W_IS
    Use   [dif_w_is.f, 56]             DIF_W_IS
    Use   [dif_w_is.f, 57]             DIF_W_IS
    Use   [dif_w_is.f, 58]             DIF_W_IS
    Use   [dif_w_is.f, 60]             DIF_W_IS
    Use   [dif_w_is.f, 82]             DIF_W_IS

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [calc_grbdry.f, 21]       CALC_GRBDRY
    Declare   [calc_grbdry.f, 57]      CALC_GRBDRY
    Use   [calc_grbdry.f, 160]         CALC_GRBDRY
    Use   [calc_grbdry.f, 354]         CALC_GRBDRY
    Use   [calc_grbdry.f, 557]         CALC_GRBDRY
    Use   [calc_grbdry.f, 737]         CALC_GRBDRY
    Use   [calc_grbdry.f, 737]         CALC_GRBDRY
    Use   [calc_grbdry.f, 738]         CALC_GRBDRY

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [calc_grbdry.f, 1224]     CG_CALC_GRBDRY
    Declare   [calc_grbdry.f, 1257]    CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1367]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1367]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1368]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1434]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1434]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1435]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1502]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1502]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1503]        CG_CALC_GRBDRY

L    (Local Variable)  Declared as: INTEGER
    Define   [check_numerics.f, 54]    CHECK_NUMERICS
    Set   [check_numerics.f, 63]       CHECK_NUMERICS
    Use   [check_numerics.f, 64]       CHECK_NUMERICS
    Use   [check_numerics.f, 64]       CHECK_NUMERICS
    Use   [check_numerics.f, 65]       CHECK_NUMERICS
    Use   [check_numerics.f, 66]       CHECK_NUMERICS
    Set   [check_numerics.f, 76]       CHECK_NUMERICS
    Use   [check_numerics.f, 77]       CHECK_NUMERICS

L    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 53]           CALC_TAU_V_S
    Set   [tau_v_s.f, 79]              CALC_TAU_V_S
    Use   [tau_v_s.f, 80]              CALC_TAU_V_S
    Use   [tau_v_s.f, 80]              CALC_TAU_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [out_bin_512i.f, 54]      OUT_BIN_512I
    Use   [out_bin_512i.f, 75]         OUT_BIN_512I
    Set   [out_bin_512i.f, 75]         OUT_BIN_512I
    Use   [out_bin_512i.f, 88]         OUT_BIN_512I
    Set   [out_bin_512i.f, 88]         OUT_BIN_512I
    Use   [out_bin_512i.f, 94]         OUT_BIN_512I
    Set   [out_bin_512i.f, 94]         OUT_BIN_512I

L    (Local Variable)  Declared as: INTEGER
    Define   [write_error.f, 45]       WRITE_ERROR
    Set   [write_error.f, 52]          WRITE_ERROR
    Use   [write_error.f, 53]          WRITE_ERROR

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 43]   CALC_INTERP_WEIGHTS1
    Set   [calc_interp_weights.f, 60]   CALC_INTERP_WEIGHTS1
    Use Argument   [calc_interp_weights.f, 62]   CALC_INTERP_WEIGHTS1
    Use Argument   [calc_interp_weights.f, 62]   CALC_INTERP_WEIGHTS1
    Use Argument   [calc_interp_weights.f, 62]   CALC_INTERP_WEIGHTS1
    Use Argument   [calc_interp_weights.f, 62]   CALC_INTERP_WEIGHTS1
    Use Argument   [calc_interp_weights.f, 62]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 64]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 65]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 66]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 69]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 70]   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, 81]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 82]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 90]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 103]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 104]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 106]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 107]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 110]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 111]   CALC_INTERP_WEIGHTS1

L    (Local Variable)  Declared as: INTEGER
    Define   [time_march.f, 66]        TIME_MARCH
    Set   [time_march.f, 160]          TIME_MARCH

l    (Local Variable)  Declared as: INTEGER
    Define   [ordinary_diff.f, 30]     ordinary_diff
    Set   [ordinary_diff.f, 75]        ordinary_diff
    Use   [ordinary_diff.f, 76]        ordinary_diff
    Use   [ordinary_diff.f, 76]        ordinary_diff
    Use   [ordinary_diff.f, 77]        ordinary_diff
    Use   [ordinary_diff.f, 77]        ordinary_diff
    Use   [ordinary_diff.f, 78]        ordinary_diff
    Use   [ordinary_diff.f, 78]        ordinary_diff
    Use   [ordinary_diff.f, 79]        ordinary_diff
    Use   [ordinary_diff.f, 79]        ordinary_diff
    Use   [ordinary_diff.f, 81]        ordinary_diff
    Use   [ordinary_diff.f, 81]        ordinary_diff
    Set   [ordinary_diff.f, 89]        ordinary_diff
    Use   [ordinary_diff.f, 90]        ordinary_diff
    Use   [ordinary_diff.f, 91]        ordinary_diff
    Use   [ordinary_diff.f, 92]        ordinary_diff
    Use   [ordinary_diff.f, 93]        ordinary_diff
    Use   [ordinary_diff.f, 94]        ordinary_diff
    Use   [ordinary_diff.f, 95]        ordinary_diff
    Use   [ordinary_diff.f, 96]        ordinary_diff
    Use   [ordinary_diff.f, 97]        ordinary_diff
    Use   [ordinary_diff.f, 98]        ordinary_diff
    Use   [ordinary_diff.f, 99]        ordinary_diff
    Use   [ordinary_diff.f, 100]       ordinary_diff
    Use   [ordinary_diff.f, 101]       ordinary_diff
    Use   [ordinary_diff.f, 102]       ordinary_diff
    Use   [ordinary_diff.f, 103]       ordinary_diff
    Use   [ordinary_diff.f, 104]       ordinary_diff
    Use   [ordinary_diff.f, 105]       ordinary_diff
    Use   [ordinary_diff.f, 106]       ordinary_diff
    Use   [ordinary_diff.f, 107]       ordinary_diff
    Use   [ordinary_diff.f, 109]       ordinary_diff
    Use   [ordinary_diff.f, 110]       ordinary_diff
    Use   [ordinary_diff.f, 112]       ordinary_diff
    Use   [ordinary_diff.f, 113]       ordinary_diff
    Use   [ordinary_diff.f, 114]       ordinary_diff
    Use   [ordinary_diff.f, 115]       ordinary_diff
    Use   [ordinary_diff.f, 118]       ordinary_diff
    Use   [ordinary_diff.f, 119]       ordinary_diff
    Use   [ordinary_diff.f, 120]       ordinary_diff
    Use   [ordinary_diff.f, 121]       ordinary_diff
    Use   [ordinary_diff.f, 122]       ordinary_diff
    Use   [ordinary_diff.f, 123]       ordinary_diff
    Use   [ordinary_diff.f, 125]       ordinary_diff
    Use   [ordinary_diff.f, 128]       ordinary_diff
    Use   [ordinary_diff.f, 129]       ordinary_diff
    Use   [ordinary_diff.f, 130]       ordinary_diff
    Set   [ordinary_diff.f, 137]       ordinary_diff
    Use   [ordinary_diff.f, 139]       ordinary_diff
    Use   [ordinary_diff.f, 140]       ordinary_diff
    Use   [ordinary_diff.f, 141]       ordinary_diff
    Use   [ordinary_diff.f, 142]       ordinary_diff
    Use   [ordinary_diff.f, 143]       ordinary_diff
    Use   [ordinary_diff.f, 144]       ordinary_diff
    Use   [ordinary_diff.f, 145]       ordinary_diff
    Use   [ordinary_diff.f, 146]       ordinary_diff
    Use   [ordinary_diff.f, 147]       ordinary_diff
    Use   [ordinary_diff.f, 149]       ordinary_diff
    Use   [ordinary_diff.f, 150]       ordinary_diff
    Use   [ordinary_diff.f, 151]       ordinary_diff
    Use   [ordinary_diff.f, 152]       ordinary_diff
    Use   [ordinary_diff.f, 153]       ordinary_diff
    Use   [ordinary_diff.f, 154]       ordinary_diff
    Use   [ordinary_diff.f, 155]       ordinary_diff
    Use   [ordinary_diff.f, 156]       ordinary_diff
    Set   [ordinary_diff.f, 206]       ordinary_diff
    Use   [ordinary_diff.f, 208]       ordinary_diff
    Set   [ordinary_diff.f, 257]       ordinary_diff
    Use   [ordinary_diff.f, 258]       ordinary_diff
    Use   [ordinary_diff.f, 258]       ordinary_diff
    Use   [ordinary_diff.f, 258]       ordinary_diff
    Use   [ordinary_diff.f, 258]       ordinary_diff
    Use   [ordinary_diff.f, 259]       ordinary_diff
    Use   [ordinary_diff.f, 259]       ordinary_diff
    Use   [ordinary_diff.f, 260]       ordinary_diff
    Use   [ordinary_diff.f, 260]       ordinary_diff
    Use   [ordinary_diff.f, 260]       ordinary_diff
    Set   [ordinary_diff.f, 302]       ordinary_diff
    Use   [ordinary_diff.f, 303]       ordinary_diff
    Use   [ordinary_diff.f, 303]       ordinary_diff
    Use   [ordinary_diff.f, 303]       ordinary_diff
    Use   [ordinary_diff.f, 303]       ordinary_diff
    Use   [ordinary_diff.f, 304]       ordinary_diff
    Use   [ordinary_diff.f, 304]       ordinary_diff
    Use   [ordinary_diff.f, 305]       ordinary_diff
    Use   [ordinary_diff.f, 305]       ordinary_diff
    Use   [ordinary_diff.f, 305]       ordinary_diff
    Set   [ordinary_diff.f, 325]       ordinary_diff
    Use   [ordinary_diff.f, 326]       ordinary_diff
    Use   [ordinary_diff.f, 326]       ordinary_diff
    Use   [ordinary_diff.f, 326]       ordinary_diff
    Set   [ordinary_diff.f, 356]       ordinary_diff
    Use   [ordinary_diff.f, 357]       ordinary_diff
    Use   [ordinary_diff.f, 357]       ordinary_diff
    Use   [ordinary_diff.f, 358]       ordinary_diff
    Use   [ordinary_diff.f, 358]       ordinary_diff
    Use   [ordinary_diff.f, 359]       ordinary_diff
    Use   [ordinary_diff.f, 359]       ordinary_diff
    Use   [ordinary_diff.f, 359]       ordinary_diff
    Use   [ordinary_diff.f, 360]       ordinary_diff
    Use   [ordinary_diff.f, 360]       ordinary_diff
    Use   [ordinary_diff.f, 361]       ordinary_diff
    Use   [ordinary_diff.f, 361]       ordinary_diff
    Use   [ordinary_diff.f, 362]       ordinary_diff
    Use   [ordinary_diff.f, 362]       ordinary_diff
    Use   [ordinary_diff.f, 362]       ordinary_diff

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 90]        SOURCE_W_G
    Set   [source_w_g.f, 308]          SOURCE_W_G
    Use   [source_w_g.f, 309]          SOURCE_W_G
    Use   [source_w_g.f, 309]          SOURCE_W_G
    Use   [source_w_g.f, 311]          SOURCE_W_G
    Use   [source_w_g.f, 311]          SOURCE_W_G
    Use   [source_w_g.f, 311]          SOURCE_W_G
    Set   [source_w_g.f, 320]          SOURCE_W_G
    Use   [source_w_g.f, 321]          SOURCE_W_G
    Use   [source_w_g.f, 322]          SOURCE_W_G
    Use   [source_w_g.f, 322]          SOURCE_W_G
    Use   [source_w_g.f, 323]          SOURCE_W_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 493]       SOURCE_W_G_BC
    Set   [source_w_g.f, 642]          SOURCE_W_G_BC
    Use   [source_w_g.f, 643]          SOURCE_W_G_BC
    Use   [source_w_g.f, 647]          SOURCE_W_G_BC
    Use   [source_w_g.f, 648]          SOURCE_W_G_BC
    Use   [source_w_g.f, 649]          SOURCE_W_G_BC
    Use   [source_w_g.f, 650]          SOURCE_W_G_BC
    Use   [source_w_g.f, 651]          SOURCE_W_G_BC
    Use   [source_w_g.f, 652]          SOURCE_W_G_BC
    Use   [source_w_g.f, 653]          SOURCE_W_G_BC
    Use   [source_w_g.f, 682]          SOURCE_W_G_BC
    Use   [source_w_g.f, 683]          SOURCE_W_G_BC
    Use   [source_w_g.f, 684]          SOURCE_W_G_BC
    Use   [source_w_g.f, 685]          SOURCE_W_G_BC
    Use   [source_w_g.f, 686]          SOURCE_W_G_BC
    Use   [source_w_g.f, 687]          SOURCE_W_G_BC
    Use   [source_w_g.f, 688]          SOURCE_W_G_BC
    Use   [source_w_g.f, 717]          SOURCE_W_G_BC
    Use   [source_w_g.f, 718]          SOURCE_W_G_BC
    Use   [source_w_g.f, 719]          SOURCE_W_G_BC
    Use   [source_w_g.f, 720]          SOURCE_W_G_BC
    Use   [source_w_g.f, 721]          SOURCE_W_G_BC
    Use   [source_w_g.f, 722]          SOURCE_W_G_BC
    Use   [source_w_g.f, 723]          SOURCE_W_G_BC
    Use   [source_w_g.f, 742]          SOURCE_W_G_BC
    Use   [source_w_g.f, 745]          SOURCE_W_G_BC
    Use   [source_w_g.f, 748]          SOURCE_W_G_BC
    Use   [source_w_g.f, 750]          SOURCE_W_G_BC
    Use   [source_w_g.f, 752]          SOURCE_W_G_BC
    Use   [source_w_g.f, 752]          SOURCE_W_G_BC
    Use   [source_w_g.f, 754]          SOURCE_W_G_BC
    Use   [source_w_g.f, 755]          SOURCE_W_G_BC
    Use   [source_w_g.f, 756]          SOURCE_W_G_BC
    Use   [source_w_g.f, 756]          SOURCE_W_G_BC
    Use   [source_w_g.f, 760]          SOURCE_W_G_BC
    Use   [source_w_g.f, 763]          SOURCE_W_G_BC
    Use   [source_w_g.f, 766]          SOURCE_W_G_BC
    Use   [source_w_g.f, 768]          SOURCE_W_G_BC
    Use   [source_w_g.f, 770]          SOURCE_W_G_BC
    Use   [source_w_g.f, 770]          SOURCE_W_G_BC
    Use   [source_w_g.f, 772]          SOURCE_W_G_BC
    Use   [source_w_g.f, 773]          SOURCE_W_G_BC
    Use   [source_w_g.f, 774]          SOURCE_W_G_BC
    Use   [source_w_g.f, 774]          SOURCE_W_G_BC
    Use   [source_w_g.f, 778]          SOURCE_W_G_BC
    Use   [source_w_g.f, 781]          SOURCE_W_G_BC
    Use   [source_w_g.f, 783]          SOURCE_W_G_BC
    Use   [source_w_g.f, 784]          SOURCE_W_G_BC
    Use   [source_w_g.f, 785]          SOURCE_W_G_BC
    Use   [source_w_g.f, 785]          SOURCE_W_G_BC
    Use   [source_w_g.f, 788]          SOURCE_W_G_BC
    Use   [source_w_g.f, 791]          SOURCE_W_G_BC
    Use   [source_w_g.f, 793]          SOURCE_W_G_BC
    Use   [source_w_g.f, 794]          SOURCE_W_G_BC
    Use   [source_w_g.f, 795]          SOURCE_W_G_BC
    Use   [source_w_g.f, 795]          SOURCE_W_G_BC
    Use   [source_w_g.f, 804]          SOURCE_W_G_BC
    Use   [source_w_g.f, 805]          SOURCE_W_G_BC
    Use   [source_w_g.f, 806]          SOURCE_W_G_BC
    Use   [source_w_g.f, 808]          SOURCE_W_G_BC
    Use   [source_w_g.f, 809]          SOURCE_W_G_BC
    Use   [source_w_g.f, 810]          SOURCE_W_G_BC
    Use   [source_w_g.f, 811]          SOURCE_W_G_BC
    Use   [source_w_g.f, 812]          SOURCE_W_G_BC
    Use   [source_w_g.f, 813]          SOURCE_W_G_BC
    Use   [source_w_g.f, 849]          SOURCE_W_G_BC
    Use   [source_w_g.f, 849]          SOURCE_W_G_BC
    Use   [source_w_g.f, 868]          SOURCE_W_G_BC
    Use   [source_w_g.f, 868]          SOURCE_W_G_BC
    Use   [source_w_g.f, 873]          SOURCE_W_G_BC
    Use   [source_w_g.f, 873]          SOURCE_W_G_BC
    Use   [source_w_g.f, 878]          SOURCE_W_G_BC
    Use   [source_w_g.f, 878]          SOURCE_W_G_BC
    Use   [source_w_g.f, 889]          SOURCE_W_G_BC
    Use   [source_w_g.f, 889]          SOURCE_W_G_BC
    Use   [source_w_g.f, 890]          SOURCE_W_G_BC
    Use   [source_w_g.f, 894]          SOURCE_W_G_BC
    Use   [source_w_g.f, 895]          SOURCE_W_G_BC
    Use   [source_w_g.f, 896]          SOURCE_W_G_BC
    Use   [source_w_g.f, 897]          SOURCE_W_G_BC
    Use   [source_w_g.f, 898]          SOURCE_W_G_BC
    Use   [source_w_g.f, 899]          SOURCE_W_G_BC
    Use   [source_w_g.f, 923]          SOURCE_W_G_BC
    Use   [source_w_g.f, 924]          SOURCE_W_G_BC
    Use   [source_w_g.f, 925]          SOURCE_W_G_BC
    Use   [source_w_g.f, 926]          SOURCE_W_G_BC
    Use   [source_w_g.f, 927]          SOURCE_W_G_BC
    Use   [source_w_g.f, 928]          SOURCE_W_G_BC
    Use   [source_w_g.f, 929]          SOURCE_W_G_BC
    Use   [source_w_g.f, 930]          SOURCE_W_G_BC
    Use   [source_w_g.f, 957]          SOURCE_W_G_BC
    Use   [source_w_g.f, 958]          SOURCE_W_G_BC
    Use   [source_w_g.f, 959]          SOURCE_W_G_BC
    Use   [source_w_g.f, 960]          SOURCE_W_G_BC
    Use   [source_w_g.f, 961]          SOURCE_W_G_BC
    Use   [source_w_g.f, 962]          SOURCE_W_G_BC
    Use   [source_w_g.f, 963]          SOURCE_W_G_BC
    Use   [source_w_g.f, 991]          SOURCE_W_G_BC
    Use   [source_w_g.f, 992]          SOURCE_W_G_BC
    Use   [source_w_g.f, 993]          SOURCE_W_G_BC
    Use   [source_w_g.f, 994]          SOURCE_W_G_BC
    Use   [source_w_g.f, 995]          SOURCE_W_G_BC
    Use   [source_w_g.f, 996]          SOURCE_W_G_BC
    Use   [source_w_g.f, 1012]         SOURCE_W_G_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_w_s.f, 113]    CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 178]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 179]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 184]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 184]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 185]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 185]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 186]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 186]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 187]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 187]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 188]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 188]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 189]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 189]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 191]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 191]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 192]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 192]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 193]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 193]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 194]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 194]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 195]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 195]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 196]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 196]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 198]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 199]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 200]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 200]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 201]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 201]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 204]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 205]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 208]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 208]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 211]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 211]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 212]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 212]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 216]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 216]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 217]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 217]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 227]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 227]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 228]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 228]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 230]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 230]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 235]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 235]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 241]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 241]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 247]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 247]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 248]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 248]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 252]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 260]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 261]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 262]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 262]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 275]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 276]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 282]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 283]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 286]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 286]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 296]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 296]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 301]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 302]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 304]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 304]       CALC_IA_MOMSOURCE_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_resid.f, 587]       CALC_RESID_MB
    Set   [calc_resid.f, 639]          CALC_RESID_MB
    Use   [calc_resid.f, 640]          CALC_RESID_MB
    Use   [calc_resid.f, 645]          CALC_RESID_MB
    Use   [calc_resid.f, 645]          CALC_RESID_MB
    Use   [calc_resid.f, 645]          CALC_RESID_MB
    Use   [calc_resid.f, 646]          CALC_RESID_MB
    Use   [calc_resid.f, 646]          CALC_RESID_MB
    Use   [calc_resid.f, 646]          CALC_RESID_MB
    Use   [calc_resid.f, 646]          CALC_RESID_MB
    Use   [calc_resid.f, 649]          CALC_RESID_MB
    Use   [calc_resid.f, 649]          CALC_RESID_MB
    Use   [calc_resid.f, 649]          CALC_RESID_MB
    Use   [calc_resid.f, 650]          CALC_RESID_MB
    Use   [calc_resid.f, 650]          CALC_RESID_MB
    Use   [calc_resid.f, 650]          CALC_RESID_MB
    Use   [calc_resid.f, 650]          CALC_RESID_MB
    Set   [calc_resid.f, 675]          CALC_RESID_MB
    Use   [calc_resid.f, 676]          CALC_RESID_MB
    Use   [calc_resid.f, 681]          CALC_RESID_MB
    Use   [calc_resid.f, 681]          CALC_RESID_MB
    Use   [calc_resid.f, 681]          CALC_RESID_MB
    Use   [calc_resid.f, 682]          CALC_RESID_MB
    Use   [calc_resid.f, 682]          CALC_RESID_MB
    Use   [calc_resid.f, 682]          CALC_RESID_MB
    Use   [calc_resid.f, 682]          CALC_RESID_MB
    Use   [calc_resid.f, 685]          CALC_RESID_MB
    Use   [calc_resid.f, 685]          CALC_RESID_MB
    Use   [calc_resid.f, 685]          CALC_RESID_MB
    Use   [calc_resid.f, 686]          CALC_RESID_MB
    Use   [calc_resid.f, 686]          CALC_RESID_MB
    Use   [calc_resid.f, 686]          CALC_RESID_MB
    Use   [calc_resid.f, 686]          CALC_RESID_MB

L    (Local Variable)  Declared as: INTEGER
    Define   [solve_granular_energy.f, 62]   SOLVE_GRANULAR_ENERGY
    Set   [solve_granular_energy.f, 376]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 377]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 377]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 378]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 379]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 380]   SOLVE_GRANULAR_ENERGY

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [cffctowall.f, 10]        CFFCTOWALL
    Declare   [cffctowall.f, 22]       CFFCTOWALL
    Use   [cffctowall.f, 40]           CFFCTOWALL
    Use   [cffctowall.f, 40]           CFFCTOWALL
    Use   [cffctowall.f, 43]           CFFCTOWALL
    Use   [cffctowall.f, 47]           CFFCTOWALL
    Use   [cffctowall.f, 47]           CFFCTOWALL

L    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_init_bc.f, 30]     QMOMK_INIT_BC
    Set   [qmomk_init_bc.f, 33]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 34]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 36]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 37]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 38]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 39]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 40]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 41]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 44]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 44]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 45]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 47]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 50]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 50]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 51]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 52]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 54]        QMOMK_INIT_BC
    Use   [qmomk_init_bc.f, 55]        QMOMK_INIT_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [corner.f, 52]            GET_CORNER_CELLS
    Set   [corner.f, 261]              GET_CORNER_CELLS
    Use   [corner.f, 262]              GET_CORNER_CELLS

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_s.f, 61]     CG_SOURCE_W_S
    Set   [CG_source_w_s.f, 109]       CG_SOURCE_W_S
    Use   [CG_source_w_s.f, 110]       CG_SOURCE_W_S
    Use   [CG_source_w_s.f, 110]       CG_SOURCE_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [line_too_big.f, 47]      LINE_TOO_BIG
    Set   [line_too_big.f, 54]         LINE_TOO_BIG
    Use   [line_too_big.f, 55]         LINE_TOO_BIG
    Use   [line_too_big.f, 55]         LINE_TOO_BIG
    Use   [line_too_big.f, 56]         LINE_TOO_BIG

L    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3270]   F
    Declare   [check_data_cartesian.f, 3276]   F
    Use   [check_data_cartesian.f, 3280]   F
    Use   [check_data_cartesian.f, 3286]   F
    Use   [check_data_cartesian.f, 3288]   F

L    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3149]   FIND_CELL_RATIO
    Declare   [check_data_cartesian.f, 3167]   FIND_CELL_RATIO
    Use   [check_data_cartesian.f, 3172]   FIND_CELL_RATIO
    Use Argument   [check_data_cartesian.f, 3204]   FIND_CELL_RATIO
    Use Argument   [check_data_cartesian.f, 3205]   FIND_CELL_RATIO
    Use Argument   [check_data_cartesian.f, 3229]   FIND_CELL_RATIO

L    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 2543]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2620]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2621]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2624]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2627]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2633]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2634]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2637]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2640]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2677]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2681]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2688]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2709]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2713]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2719]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2812]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2813]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2816]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2819]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2825]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2826]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2829]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2832]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2869]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2873]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2880]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2901]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2905]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2911]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3006]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3007]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3010]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3013]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3019]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3020]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3023]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3026]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3063]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3067]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3074]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3095]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3099]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3105]   GET_DXYZ_FROM_CONTROL_POINTS

L    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4609]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4647]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4648]   GET_LIP_WITH_GHOST_LAYERS

L    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5371]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5409]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5410]   GET_LIP_WITH_GHOST_LAYERS0

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 225]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 226]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 227]   CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 298]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 299]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 300]   CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 303]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 304]   CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 311]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 313]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 314]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 314]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 314]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 318]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 319]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 320]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 320]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 321]            CALC_D_N_GAS_AND_SOLIDS

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 546]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 586]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 587]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 588]   CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 599]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 600]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 601]   CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 604]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 605]   CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 610]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 612]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 612]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 613]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 613]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 615]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 615]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 616]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 616]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 617]            CALC_D_N_SOLIDS_ONLY

L    (Local Variable)  Declared as: INTEGER
    Define   [write_table.f, 84]       WRITE_TABLE
    Set   [write_table.f, 91]          WRITE_TABLE
    Use   [write_table.f, 92]          WRITE_TABLE
    Use   [write_table.f, 92]          WRITE_TABLE
    Use   [write_table.f, 93]          WRITE_TABLE
    Use   [write_table.f, 94]          WRITE_TABLE
    Use   [write_table.f, 94]          WRITE_TABLE
    Set   [write_table.f, 99]          WRITE_TABLE

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 57]            BC_PHI
    Set   [bc_phi.f, 225]              BC_PHI
    Use   [bc_phi.f, 226]              BC_PHI
    Use   [bc_phi.f, 227]              BC_PHI
    Use   [bc_phi.f, 228]              BC_PHI
    Use   [bc_phi.f, 229]              BC_PHI
    Use   [bc_phi.f, 230]              BC_PHI
    Use   [bc_phi.f, 231]              BC_PHI
    Use   [bc_phi.f, 232]              BC_PHI
    Use   [bc_phi.f, 233]              BC_PHI
    Use   [bc_phi.f, 234]              BC_PHI
    Use   [bc_phi.f, 235]              BC_PHI
    Use   [bc_phi.f, 259]              BC_PHI
    Use   [bc_phi.f, 263]              BC_PHI
    Use   [bc_phi.f, 267]              BC_PHI
    Use   [bc_phi.f, 268]              BC_PHI
    Use   [bc_phi.f, 269]              BC_PHI
    Use   [bc_phi.f, 269]              BC_PHI
    Use   [bc_phi.f, 270]              BC_PHI
    Use   [bc_phi.f, 273]              BC_PHI
    Use   [bc_phi.f, 276]              BC_PHI
    Use   [bc_phi.f, 278]              BC_PHI
    Use   [bc_phi.f, 279]              BC_PHI
    Use   [bc_phi.f, 280]              BC_PHI
    Use   [bc_phi.f, 280]              BC_PHI
    Use   [bc_phi.f, 281]              BC_PHI
    Use   [bc_phi.f, 284]              BC_PHI
    Use   [bc_phi.f, 287]              BC_PHI
    Use   [bc_phi.f, 289]              BC_PHI
    Use   [bc_phi.f, 290]              BC_PHI
    Use   [bc_phi.f, 291]              BC_PHI
    Use   [bc_phi.f, 291]              BC_PHI
    Use   [bc_phi.f, 292]              BC_PHI
    Use   [bc_phi.f, 295]              BC_PHI
    Use   [bc_phi.f, 298]              BC_PHI
    Use   [bc_phi.f, 300]              BC_PHI
    Use   [bc_phi.f, 301]              BC_PHI
    Use   [bc_phi.f, 302]              BC_PHI
    Use   [bc_phi.f, 302]              BC_PHI
    Use   [bc_phi.f, 303]              BC_PHI
    Use   [bc_phi.f, 306]              BC_PHI
    Use   [bc_phi.f, 309]              BC_PHI
    Use   [bc_phi.f, 311]              BC_PHI
    Use   [bc_phi.f, 312]              BC_PHI
    Use   [bc_phi.f, 313]              BC_PHI
    Use   [bc_phi.f, 313]              BC_PHI
    Use   [bc_phi.f, 314]              BC_PHI
    Use   [bc_phi.f, 317]              BC_PHI
    Use   [bc_phi.f, 320]              BC_PHI
    Use   [bc_phi.f, 322]              BC_PHI
    Use   [bc_phi.f, 324]              BC_PHI
    Use   [bc_phi.f, 326]              BC_PHI
    Use   [bc_phi.f, 326]              BC_PHI
    Use   [bc_phi.f, 327]              BC_PHI
    Set   [bc_phi.f, 344]              BC_PHI
    Use   [bc_phi.f, 345]              BC_PHI
    Use   [bc_phi.f, 346]              BC_PHI
    Use   [bc_phi.f, 347]              BC_PHI
    Use   [bc_phi.f, 348]              BC_PHI
    Use   [bc_phi.f, 349]              BC_PHI
    Use   [bc_phi.f, 350]              BC_PHI
    Use   [bc_phi.f, 351]              BC_PHI
    Use   [bc_phi.f, 352]              BC_PHI
    Use   [bc_phi.f, 353]              BC_PHI
    Use   [bc_phi.f, 354]              BC_PHI
    Use   [bc_phi.f, 373]              BC_PHI
    Use   [bc_phi.f, 396]              BC_PHI
    Use   [bc_phi.f, 397]              BC_PHI
    Use   [bc_phi.f, 403]              BC_PHI
    Use   [bc_phi.f, 404]              BC_PHI
    Use   [bc_phi.f, 405]              BC_PHI
    Use   [bc_phi.f, 406]              BC_PHI
    Use   [bc_phi.f, 407]              BC_PHI
    Use   [bc_phi.f, 408]              BC_PHI

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 504]           BC_PHI_CG
    Set   [bc_phi.f, 549]              BC_PHI_CG
    Use   [bc_phi.f, 550]              BC_PHI_CG
    Use   [bc_phi.f, 553]              BC_PHI_CG
    Use   [bc_phi.f, 555]              BC_PHI_CG
    Use   [bc_phi.f, 556]              BC_PHI_CG
    Use   [bc_phi.f, 557]              BC_PHI_CG
    Use   [bc_phi.f, 557]              BC_PHI_CG
    Use   [bc_phi.f, 557]              BC_PHI_CG
    Set   [bc_phi.f, 570]              BC_PHI_CG
    Use   [bc_phi.f, 571]              BC_PHI_CG
    Use   [bc_phi.f, 574]              BC_PHI_CG
    Use   [bc_phi.f, 576]              BC_PHI_CG
    Use   [bc_phi.f, 577]              BC_PHI_CG
    Use   [bc_phi.f, 578]              BC_PHI_CG
    Use   [bc_phi.f, 578]              BC_PHI_CG
    Use   [bc_phi.f, 578]              BC_PHI_CG
    Set   [bc_phi.f, 591]              BC_PHI_CG
    Use   [bc_phi.f, 592]              BC_PHI_CG
    Use   [bc_phi.f, 595]              BC_PHI_CG
    Use   [bc_phi.f, 597]              BC_PHI_CG
    Use   [bc_phi.f, 598]              BC_PHI_CG
    Use   [bc_phi.f, 599]              BC_PHI_CG
    Use   [bc_phi.f, 599]              BC_PHI_CG
    Use   [bc_phi.f, 599]              BC_PHI_CG
    Set   [bc_phi.f, 612]              BC_PHI_CG
    Use   [bc_phi.f, 613]              BC_PHI_CG
    Use   [bc_phi.f, 616]              BC_PHI_CG
    Use   [bc_phi.f, 618]              BC_PHI_CG
    Use   [bc_phi.f, 619]              BC_PHI_CG
    Use   [bc_phi.f, 620]              BC_PHI_CG
    Use   [bc_phi.f, 620]              BC_PHI_CG
    Use   [bc_phi.f, 620]              BC_PHI_CG
    Set   [bc_phi.f, 633]              BC_PHI_CG
    Use   [bc_phi.f, 634]              BC_PHI_CG
    Use   [bc_phi.f, 637]              BC_PHI_CG
    Use   [bc_phi.f, 639]              BC_PHI_CG
    Use   [bc_phi.f, 640]              BC_PHI_CG
    Use   [bc_phi.f, 641]              BC_PHI_CG
    Use   [bc_phi.f, 641]              BC_PHI_CG
    Use   [bc_phi.f, 641]              BC_PHI_CG
    Set   [bc_phi.f, 654]              BC_PHI_CG
    Use   [bc_phi.f, 655]              BC_PHI_CG
    Use   [bc_phi.f, 658]              BC_PHI_CG
    Use   [bc_phi.f, 660]              BC_PHI_CG
    Use   [bc_phi.f, 661]              BC_PHI_CG
    Use   [bc_phi.f, 662]              BC_PHI_CG
    Use   [bc_phi.f, 662]              BC_PHI_CG
    Use   [bc_phi.f, 662]              BC_PHI_CG
    Set   [bc_phi.f, 679]              BC_PHI_CG
    Use   [bc_phi.f, 687]              BC_PHI_CG

L    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 773]     DIF_PHI_IS
    Set   [conv_dif_phi.f, 783]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 784]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 785]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 786]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 787]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 788]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 789]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 790]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 800]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 816]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 832]        DIF_PHI_IS

l    (Local Variable)  Declared as: INTEGER
    Define   [gaussj.f, 5]             gaussj
    Set   [gaussj.f, 29]               gaussj
    Use   [gaussj.f, 30]               gaussj
    Use   [gaussj.f, 31]               gaussj
    Use   [gaussj.f, 31]               gaussj
    Use   [gaussj.f, 32]               gaussj
    Set   [gaussj.f, 34]               gaussj
    Use   [gaussj.f, 35]               gaussj
    Use   [gaussj.f, 36]               gaussj
    Use   [gaussj.f, 36]               gaussj
    Use   [gaussj.f, 37]               gaussj
    Set   [gaussj.f, 45]               gaussj
    Use   [gaussj.f, 46]               gaussj
    Use   [gaussj.f, 46]               gaussj
    Set   [gaussj.f, 48]               gaussj
    Use   [gaussj.f, 49]               gaussj
    Use   [gaussj.f, 49]               gaussj
    Set   [gaussj.f, 55]               gaussj
    Use   [gaussj.f, 56]               gaussj
    Use   [gaussj.f, 56]               gaussj
    Use   [gaussj.f, 56]               gaussj
    Set   [gaussj.f, 58]               gaussj
    Use   [gaussj.f, 59]               gaussj
    Use   [gaussj.f, 59]               gaussj
    Use   [gaussj.f, 59]               gaussj
    Set   [gaussj.f, 64]               gaussj
    Use   [gaussj.f, 65]               gaussj
    Use   [gaussj.f, 65]               gaussj
    Use   [gaussj.f, 67]               gaussj
    Use   [gaussj.f, 68]               gaussj
    Use   [gaussj.f, 68]               gaussj
    Use   [gaussj.f, 69]               gaussj

L    (Dummy Argument)  Declared as: INTEGER
    Define   [write_usr1.f, 23]        WRITE_USR1
    Declare   [write_usr1.f, 30]       WRITE_USR1

L    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 53]           CALC_TAU_U_S
    Set   [tau_u_s.f, 88]              CALC_TAU_U_S
    Use   [tau_u_s.f, 89]              CALC_TAU_U_S
    Use   [tau_u_s.f, 89]              CALC_TAU_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 34]      cooling_rate
    Set   [cooling_rate.f, 44]         cooling_rate
    Use   [cooling_rate.f, 45]         cooling_rate
    Use   [cooling_rate.f, 45]         cooling_rate

L    (Local Variable)  Declared as: INTEGER
    Define   [set_bc1.f, 20]           SET_BC1
    Set   [set_bc1.f, 24]              SET_BC1
    Use   [set_bc1.f, 25]              SET_BC1
    Use   [set_bc1.f, 27]              SET_BC1
    Use Argument   [set_bc1.f, 29]     SET_BC1
    Use Argument   [set_bc1.f, 30]     SET_BC1
    Use Argument   [set_bc1.f, 32]     SET_BC1
    Use Argument   [set_bc1.f, 33]     SET_BC1
    Use Argument   [set_bc1.f, 35]     SET_BC1
    Use Argument   [set_bc1.f, 37]     SET_BC1
    Use Argument   [set_bc1.f, 39]     SET_BC1
    Use Argument   [set_bc1.f, 40]     SET_BC1

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 219]     PARTIAL_ELIM_IA
    Set   [partial_elim.f, 246]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 247]        PARTIAL_ELIM_IA
    Use Argument   [partial_elim.f, 248]   PARTIAL_ELIM_IA
    Use   [partial_elim.f, 249]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 251]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 251]        PARTIAL_ELIM_IA
    Set   [partial_elim.f, 271]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 277]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 278]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 282]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 282]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 285]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 285]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 286]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 286]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 286]        PARTIAL_ELIM_IA

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 69]      PARTIAL_ELIM_S
    Set   [partial_elim.f, 98]         PARTIAL_ELIM_S
    Use   [partial_elim.f, 99]         PARTIAL_ELIM_S
    Use   [partial_elim.f, 100]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 102]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 104]        PARTIAL_ELIM_S
    Set   [partial_elim.f, 133]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 139]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 141]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 143]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 148]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 148]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 150]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 150]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 151]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 151]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 151]        PARTIAL_ELIM_S

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 364]     PARTIAL_ELIM_U
    Set   [partial_elim.f, 397]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 398]        PARTIAL_ELIM_U
    Use Argument   [partial_elim.f, 399]   PARTIAL_ELIM_U
    Use   [partial_elim.f, 403]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 406]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 406]        PARTIAL_ELIM_U
    Set   [partial_elim.f, 436]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 443]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 451]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 453]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 455]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 460]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 460]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 462]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 462]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 463]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 463]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 463]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 467]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 468]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 469]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 471]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 471]        PARTIAL_ELIM_U

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 550]     PARTIAL_ELIM_V
    Set   [partial_elim.f, 583]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 584]        PARTIAL_ELIM_V
    Use Argument   [partial_elim.f, 585]   PARTIAL_ELIM_V
    Use   [partial_elim.f, 589]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 592]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 592]        PARTIAL_ELIM_V
    Set   [partial_elim.f, 623]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 624]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 630]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 632]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 634]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 639]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 639]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 641]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 641]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 642]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 642]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 642]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 646]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 647]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 648]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 650]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 650]        PARTIAL_ELIM_V

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 729]     PARTIAL_ELIM_W
    Set   [partial_elim.f, 762]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 763]        PARTIAL_ELIM_W
    Use Argument   [partial_elim.f, 764]   PARTIAL_ELIM_W
    Use   [partial_elim.f, 768]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 771]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 771]        PARTIAL_ELIM_W
    Set   [partial_elim.f, 802]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 803]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 809]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 811]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 813]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 818]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 818]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 820]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 820]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 821]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 821]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 821]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 825]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 826]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 827]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 829]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 829]        PARTIAL_ELIM_W

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_w_s.f, 1006]      JJ_BC_W_S
    Declare   [source_w_s.f, 1037]     JJ_BC_W_S
    Use   [source_w_s.f, 1079]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1081]   JJ_BC_W_S
    Use   [source_w_s.f, 1082]         JJ_BC_W_S
    Use   [source_w_s.f, 1085]         JJ_BC_W_S
    Use   [source_w_s.f, 1107]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1109]   JJ_BC_W_S
    Use   [source_w_s.f, 1110]         JJ_BC_W_S
    Use   [source_w_s.f, 1113]         JJ_BC_W_S
    Use   [source_w_s.f, 1135]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1137]   JJ_BC_W_S
    Use   [source_w_s.f, 1138]         JJ_BC_W_S
    Use   [source_w_s.f, 1141]         JJ_BC_W_S
    Use   [source_w_s.f, 1158]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1160]   JJ_BC_W_S
    Use   [source_w_s.f, 1161]         JJ_BC_W_S
    Use   [source_w_s.f, 1164]         JJ_BC_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 81]        SOURCE_W_S
    Set   [source_w_s.f, 149]          SOURCE_W_S
    Use   [source_w_s.f, 150]          SOURCE_W_S
    Use   [source_w_s.f, 150]          SOURCE_W_S
    Use   [source_w_s.f, 151]          SOURCE_W_S
    Use   [source_w_s.f, 152]          SOURCE_W_S
    Use   [source_w_s.f, 154]          SOURCE_W_S
    Use   [source_w_s.f, 157]          SOURCE_W_S
    Use   [source_w_s.f, 157]          SOURCE_W_S
    Set   [source_w_s.f, 205]          SOURCE_W_S
    Use   [source_w_s.f, 206]          SOURCE_W_S
    Use   [source_w_s.f, 207]          SOURCE_W_S
    Use   [source_w_s.f, 208]          SOURCE_W_S
    Use   [source_w_s.f, 209]          SOURCE_W_S
    Use   [source_w_s.f, 210]          SOURCE_W_S
    Use   [source_w_s.f, 211]          SOURCE_W_S
    Set   [source_w_s.f, 358]          SOURCE_W_S
    Use   [source_w_s.f, 359]          SOURCE_W_S
    Use   [source_w_s.f, 359]          SOURCE_W_S
    Set   [source_w_s.f, 391]          SOURCE_W_S
    Use   [source_w_s.f, 392]          SOURCE_W_S
    Use   [source_w_s.f, 392]          SOURCE_W_S
    Use   [source_w_s.f, 394]          SOURCE_W_S
    Use   [source_w_s.f, 394]          SOURCE_W_S
    Use   [source_w_s.f, 394]          SOURCE_W_S
    Set   [source_w_s.f, 402]          SOURCE_W_S
    Use   [source_w_s.f, 403]          SOURCE_W_S
    Use   [source_w_s.f, 404]          SOURCE_W_S
    Use   [source_w_s.f, 404]          SOURCE_W_S
    Use   [source_w_s.f, 405]          SOURCE_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 565]       SOURCE_W_S_BC
    Set   [source_w_s.f, 689]          SOURCE_W_S_BC
    Use   [source_w_s.f, 690]          SOURCE_W_S_BC
    Use   [source_w_s.f, 693]          SOURCE_W_S_BC
    Use   [source_w_s.f, 694]          SOURCE_W_S_BC
    Use   [source_w_s.f, 695]          SOURCE_W_S_BC
    Use   [source_w_s.f, 696]          SOURCE_W_S_BC
    Use   [source_w_s.f, 697]          SOURCE_W_S_BC
    Use   [source_w_s.f, 698]          SOURCE_W_S_BC
    Use   [source_w_s.f, 699]          SOURCE_W_S_BC
    Use   [source_w_s.f, 700]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 729]   SOURCE_W_S_BC
    Use   [source_w_s.f, 732]          SOURCE_W_S_BC
    Use   [source_w_s.f, 733]          SOURCE_W_S_BC
    Use   [source_w_s.f, 734]          SOURCE_W_S_BC
    Use   [source_w_s.f, 735]          SOURCE_W_S_BC
    Use   [source_w_s.f, 736]          SOURCE_W_S_BC
    Use   [source_w_s.f, 737]          SOURCE_W_S_BC
    Use   [source_w_s.f, 738]          SOURCE_W_S_BC
    Use   [source_w_s.f, 739]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 768]   SOURCE_W_S_BC
    Use   [source_w_s.f, 771]          SOURCE_W_S_BC
    Use   [source_w_s.f, 772]          SOURCE_W_S_BC
    Use   [source_w_s.f, 773]          SOURCE_W_S_BC
    Use   [source_w_s.f, 774]          SOURCE_W_S_BC
    Use   [source_w_s.f, 775]          SOURCE_W_S_BC
    Use   [source_w_s.f, 776]          SOURCE_W_S_BC
    Use   [source_w_s.f, 777]          SOURCE_W_S_BC
    Use   [source_w_s.f, 778]          SOURCE_W_S_BC
    Use   [source_w_s.f, 797]          SOURCE_W_S_BC
    Use   [source_w_s.f, 800]          SOURCE_W_S_BC
    Use   [source_w_s.f, 803]          SOURCE_W_S_BC
    Use   [source_w_s.f, 805]          SOURCE_W_S_BC
    Use   [source_w_s.f, 808]          SOURCE_W_S_BC
    Use   [source_w_s.f, 809]          SOURCE_W_S_BC
    Use   [source_w_s.f, 811]          SOURCE_W_S_BC
    Use   [source_w_s.f, 811]          SOURCE_W_S_BC
    Use   [source_w_s.f, 814]          SOURCE_W_S_BC
    Use   [source_w_s.f, 817]          SOURCE_W_S_BC
    Use   [source_w_s.f, 820]          SOURCE_W_S_BC
    Use   [source_w_s.f, 822]          SOURCE_W_S_BC
    Use   [source_w_s.f, 825]          SOURCE_W_S_BC
    Use   [source_w_s.f, 827]          SOURCE_W_S_BC
    Use   [source_w_s.f, 830]          SOURCE_W_S_BC
    Use   [source_w_s.f, 830]          SOURCE_W_S_BC
    Use   [source_w_s.f, 833]          SOURCE_W_S_BC
    Use   [source_w_s.f, 836]          SOURCE_W_S_BC
    Use   [source_w_s.f, 838]          SOURCE_W_S_BC
    Use   [source_w_s.f, 839]          SOURCE_W_S_BC
    Use   [source_w_s.f, 840]          SOURCE_W_S_BC
    Use   [source_w_s.f, 840]          SOURCE_W_S_BC
    Use   [source_w_s.f, 843]          SOURCE_W_S_BC
    Use   [source_w_s.f, 846]          SOURCE_W_S_BC
    Use   [source_w_s.f, 848]          SOURCE_W_S_BC
    Use   [source_w_s.f, 849]          SOURCE_W_S_BC
    Use   [source_w_s.f, 850]          SOURCE_W_S_BC
    Use   [source_w_s.f, 850]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 857]   SOURCE_W_S_BC
    Use   [source_w_s.f, 861]          SOURCE_W_S_BC
    Use   [source_w_s.f, 861]          SOURCE_W_S_BC
    Use   [source_w_s.f, 862]          SOURCE_W_S_BC
    Use   [source_w_s.f, 863]          SOURCE_W_S_BC
    Use   [source_w_s.f, 864]          SOURCE_W_S_BC
    Use   [source_w_s.f, 865]          SOURCE_W_S_BC
    Use   [source_w_s.f, 866]          SOURCE_W_S_BC
    Use   [source_w_s.f, 867]          SOURCE_W_S_BC
    Use   [source_w_s.f, 868]          SOURCE_W_S_BC
    Use   [source_w_s.f, 888]          SOURCE_W_S_BC
    Use   [source_w_s.f, 889]          SOURCE_W_S_BC
    Use   [source_w_s.f, 890]          SOURCE_W_S_BC
    Use   [source_w_s.f, 891]          SOURCE_W_S_BC
    Use   [source_w_s.f, 892]          SOURCE_W_S_BC
    Use   [source_w_s.f, 893]          SOURCE_W_S_BC
    Use   [source_w_s.f, 894]          SOURCE_W_S_BC
    Use   [source_w_s.f, 895]          SOURCE_W_S_BC
    Use   [source_w_s.f, 922]          SOURCE_W_S_BC
    Use   [source_w_s.f, 923]          SOURCE_W_S_BC
    Use   [source_w_s.f, 924]          SOURCE_W_S_BC
    Use   [source_w_s.f, 925]          SOURCE_W_S_BC
    Use   [source_w_s.f, 926]          SOURCE_W_S_BC
    Use   [source_w_s.f, 927]          SOURCE_W_S_BC
    Use   [source_w_s.f, 928]          SOURCE_W_S_BC
    Use   [source_w_s.f, 951]          SOURCE_W_S_BC
    Use   [source_w_s.f, 952]          SOURCE_W_S_BC
    Use   [source_w_s.f, 953]          SOURCE_W_S_BC
    Use   [source_w_s.f, 954]          SOURCE_W_S_BC
    Use   [source_w_s.f, 955]          SOURCE_W_S_BC
    Use   [source_w_s.f, 956]          SOURCE_W_S_BC
    Use   [source_w_s.f, 971]          SOURCE_W_S_BC

l    (Local Variable)  Declared as: INTEGER
    Define   [dufour_coeff.f, 32]      dufour_coeff
    Set   [dufour_coeff.f, 60]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 63]         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, 65]         dufour_coeff
    Use   [dufour_coeff.f, 65]         dufour_coeff
    Use   [dufour_coeff.f, 65]         dufour_coeff
    Use   [dufour_coeff.f, 66]         dufour_coeff
    Use   [dufour_coeff.f, 67]         dufour_coeff
    Use   [dufour_coeff.f, 67]         dufour_coeff
    Use   [dufour_coeff.f, 67]         dufour_coeff
    Use   [dufour_coeff.f, 68]         dufour_coeff
    Use   [dufour_coeff.f, 68]         dufour_coeff
    Use   [dufour_coeff.f, 68]         dufour_coeff
    Use   [dufour_coeff.f, 69]         dufour_coeff
    Use   [dufour_coeff.f, 70]         dufour_coeff
    Use   [dufour_coeff.f, 70]         dufour_coeff
    Use   [dufour_coeff.f, 70]         dufour_coeff
    Use   [dufour_coeff.f, 71]         dufour_coeff
    Use   [dufour_coeff.f, 71]         dufour_coeff
    Use   [dufour_coeff.f, 71]         dufour_coeff
    Use   [dufour_coeff.f, 72]         dufour_coeff
    Use   [dufour_coeff.f, 72]         dufour_coeff
    Use   [dufour_coeff.f, 72]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 74]         dufour_coeff
    Use   [dufour_coeff.f, 74]         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, 77]         dufour_coeff
    Use   [dufour_coeff.f, 77]         dufour_coeff
    Use   [dufour_coeff.f, 77]         dufour_coeff
    Use   [dufour_coeff.f, 77]         dufour_coeff
    Use   [dufour_coeff.f, 78]         dufour_coeff
    Use   [dufour_coeff.f, 78]         dufour_coeff
    Use   [dufour_coeff.f, 79]         dufour_coeff
    Use   [dufour_coeff.f, 80]         dufour_coeff
    Use   [dufour_coeff.f, 80]         dufour_coeff
    Use   [dufour_coeff.f, 80]         dufour_coeff
    Use   [dufour_coeff.f, 81]         dufour_coeff
    Use   [dufour_coeff.f, 81]         dufour_coeff
    Use   [dufour_coeff.f, 82]         dufour_coeff
    Use   [dufour_coeff.f, 83]         dufour_coeff
    Use   [dufour_coeff.f, 83]         dufour_coeff
    Use   [dufour_coeff.f, 83]         dufour_coeff
    Use   [dufour_coeff.f, 83]         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, 94]         dufour_coeff
    Use   [dufour_coeff.f, 95]         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, 96]         dufour_coeff
    Use   [dufour_coeff.f, 96]         dufour_coeff
    Use   [dufour_coeff.f, 96]         dufour_coeff
    Use   [dufour_coeff.f, 97]         dufour_coeff
    Set   [dufour_coeff.f, 109]        dufour_coeff
    Use   [dufour_coeff.f, 110]        dufour_coeff
    Use   [dufour_coeff.f, 110]        dufour_coeff
    Use   [dufour_coeff.f, 110]        dufour_coeff
    Use   [dufour_coeff.f, 111]        dufour_coeff
    Use   [dufour_coeff.f, 111]        dufour_coeff
    Set   [dufour_coeff.f, 137]        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

L    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 216]   CALC_DES_BEDHEIGHT
    Set   [des_granular_temperature.f, 257]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 259]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 261]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 261]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 261]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 263]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 264]   CALC_DES_BEDHEIGHT

L    (Local Variable)  Declared as: INTEGER
    Define   [get_eq.f, 47]            GET_EQ
    Set   [get_eq.f, 71]               GET_EQ
    Use   [get_eq.f, 72]               GET_EQ
    Use   [get_eq.f, 72]               GET_EQ
    Use   [get_eq.f, 73]               GET_EQ
    Use   [get_eq.f, 73]               GET_EQ
    Use   [get_eq.f, 74]               GET_EQ
    Use   [get_eq.f, 74]               GET_EQ
    Use   [get_eq.f, 76]               GET_EQ
    Use   [get_eq.f, 77]               GET_EQ
    Set   [get_eq.f, 83]               GET_EQ
    Set   [get_eq.f, 87]               GET_EQ
    Set   [get_eq.f, 92]               GET_EQ
    Use   [get_eq.f, 93]               GET_EQ
    Use   [get_eq.f, 93]               GET_EQ
    Use   [get_eq.f, 93]               GET_EQ
    Use   [get_eq.f, 94]               GET_EQ
    Use   [get_eq.f, 94]               GET_EQ
    Use   [get_eq.f, 94]               GET_EQ
    Use   [get_eq.f, 94]               GET_EQ
    Use   [get_eq.f, 94]               GET_EQ
    Use   [get_eq.f, 95]               GET_EQ
    Use   [get_eq.f, 95]               GET_EQ
    Use   [get_eq.f, 95]               GET_EQ
    Set   [get_eq.f, 102]              GET_EQ
    Use   [get_eq.f, 103]              GET_EQ
    Use   [get_eq.f, 103]              GET_EQ

L    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 301]   SOURCE_GRANULAR_ENERGY_IA
    Set   [source_granular_energy.f, 410]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 411]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 412]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 413]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 414]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 415]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 416]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 417]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 418]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 419]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 421]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 422]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 423]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 424]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 425]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 426]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 427]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 429]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 430]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 431]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 432]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 433]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 434]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 435]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 435]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 436]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 436]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 437]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 437]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 441]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 445]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 446]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 447]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 448]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 452]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 454]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 457]   SOURCE_GRANULAR_ENERGY_IA
    Use Argument   [source_granular_energy.f, 458]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 462]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 463]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 464]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 465]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 477]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 477]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 478]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 480]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 480]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 481]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 486]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 486]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 487]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 487]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 488]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 488]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 489]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 489]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 490]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 490]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 491]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 491]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 506]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 506]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 507]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 507]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 508]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 508]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 509]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 509]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 510]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 510]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 511]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 511]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 512]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 512]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 513]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 513]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 514]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 514]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 515]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 515]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 516]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 516]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 517]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 517]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 535]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 535]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 536]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 536]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 537]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 537]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 538]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 538]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 539]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 539]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 540]   SOURCE_GRANULAR_ENERGY_IA
    Use   [source_granular_energy.f, 540]   SOURCE_GRANULAR_ENERGY_IA

L    (Local Variable)  Declared as: INTEGER
    Define   [set_flags.f, 64]         SET_FLAGS
    Set   [set_flags.f, 228]           SET_FLAGS
    Use   [set_flags.f, 230]           SET_FLAGS
    Use   [set_flags.f, 231]           SET_FLAGS
    Use   [set_flags.f, 232]           SET_FLAGS
    Use   [set_flags.f, 234]           SET_FLAGS
    Use   [set_flags.f, 235]           SET_FLAGS
    Use   [set_flags.f, 236]           SET_FLAGS
    Use   [set_flags.f, 238]           SET_FLAGS
    Use   [set_flags.f, 242]           SET_FLAGS
    Use   [set_flags.f, 242]           SET_FLAGS
    Use   [set_flags.f, 243]           SET_FLAGS
    Use   [set_flags.f, 244]           SET_FLAGS
    Use   [set_flags.f, 245]           SET_FLAGS
    Use   [set_flags.f, 245]           SET_FLAGS
    Use   [set_flags.f, 246]           SET_FLAGS
    Use   [set_flags.f, 246]           SET_FLAGS
    Use   [set_flags.f, 253]           SET_FLAGS
    Use   [set_flags.f, 254]           SET_FLAGS
    Use   [set_flags.f, 255]           SET_FLAGS
    Use   [set_flags.f, 255]           SET_FLAGS
    Use   [set_flags.f, 256]           SET_FLAGS
    Use   [set_flags.f, 256]           SET_FLAGS
    Use   [set_flags.f, 257]           SET_FLAGS
    Use   [set_flags.f, 257]           SET_FLAGS
    Use   [set_flags.f, 267]           SET_FLAGS
    Use   [set_flags.f, 267]           SET_FLAGS
    Use   [set_flags.f, 268]           SET_FLAGS
    Use   [set_flags.f, 269]           SET_FLAGS
    Use   [set_flags.f, 270]           SET_FLAGS
    Use   [set_flags.f, 270]           SET_FLAGS
    Use   [set_flags.f, 271]           SET_FLAGS
    Use   [set_flags.f, 271]           SET_FLAGS
    Use   [set_flags.f, 278]           SET_FLAGS
    Use   [set_flags.f, 279]           SET_FLAGS
    Use   [set_flags.f, 280]           SET_FLAGS
    Use   [set_flags.f, 280]           SET_FLAGS
    Use   [set_flags.f, 281]           SET_FLAGS
    Use   [set_flags.f, 281]           SET_FLAGS
    Use   [set_flags.f, 282]           SET_FLAGS
    Use   [set_flags.f, 282]           SET_FLAGS
    Use   [set_flags.f, 292]           SET_FLAGS
    Use   [set_flags.f, 292]           SET_FLAGS
    Use   [set_flags.f, 293]           SET_FLAGS
    Use   [set_flags.f, 294]           SET_FLAGS
    Use   [set_flags.f, 295]           SET_FLAGS
    Use   [set_flags.f, 295]           SET_FLAGS
    Use   [set_flags.f, 296]           SET_FLAGS
    Use   [set_flags.f, 296]           SET_FLAGS
    Use   [set_flags.f, 303]           SET_FLAGS
    Use   [set_flags.f, 304]           SET_FLAGS
    Use   [set_flags.f, 305]           SET_FLAGS
    Use   [set_flags.f, 305]           SET_FLAGS
    Use   [set_flags.f, 306]           SET_FLAGS
    Use   [set_flags.f, 306]           SET_FLAGS
    Use   [set_flags.f, 307]           SET_FLAGS
    Use   [set_flags.f, 307]           SET_FLAGS

L    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_z.f, 127]          VF_SS_Z
    Set   [vf_gs_z.f, 134]             VF_SS_Z
    Use Argument   [vf_gs_z.f, 135]    VF_SS_Z
    Use   [vf_gs_z.f, 136]             VF_SS_Z

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 46]          DIF_U_IS
    Set   [dif_u_is.f, 54]             DIF_U_IS
    Use   [dif_u_is.f, 55]             DIF_U_IS
    Use   [dif_u_is.f, 56]             DIF_U_IS
    Use   [dif_u_is.f, 57]             DIF_U_IS
    Use   [dif_u_is.f, 58]             DIF_U_IS
    Use   [dif_u_is.f, 59]             DIF_U_IS
    Use   [dif_u_is.f, 60]             DIF_U_IS
    Use   [dif_u_is.f, 61]             DIF_U_IS
    Use   [dif_u_is.f, 71]             DIF_U_IS
    Use   [dif_u_is.f, 93]             DIF_U_IS

L    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 31]           SET_BC0
    Set   [set_bc0.f, 48]              SET_BC0
    Use   [set_bc0.f, 49]              SET_BC0
    Use   [set_bc0.f, 51]              SET_BC0
    Use Argument   [set_bc0.f, 54]     SET_BC0
    Use Argument   [set_bc0.f, 56]     SET_BC0
    Use Argument   [set_bc0.f, 58]     SET_BC0
    Use Argument   [set_bc0.f, 60]     SET_BC0
    Use Argument   [set_bc0.f, 61]     SET_BC0
    Use Argument   [set_bc0.f, 62]     SET_BC0
    Use Argument   [set_bc0.f, 64]     SET_BC0
    Use Argument   [set_bc0.f, 65]     SET_BC0
    Use Argument   [set_bc0.f, 66]     SET_BC0
    Use Argument   [set_bc0.f, 68]     SET_BC0
    Use Argument   [set_bc0.f, 69]     SET_BC0
    Use Argument   [set_bc0.f, 70]     SET_BC0
    Use Argument   [set_bc0.f, 72]     SET_BC0
    Use Argument   [set_bc0.f, 73]     SET_BC0
    Use Argument   [set_bc0.f, 75]     SET_BC0

L    (Local Variable)  Declared as: INTEGER
    Define   [get_philoss.f, 70]       GET_PHILOSS
    Set   [get_philoss.f, 79]          GET_PHILOSS
    Use   [get_philoss.f, 80]          GET_PHILOSS
    Use   [get_philoss.f, 81]          GET_PHILOSS
    Use   [get_philoss.f, 81]          GET_PHILOSS
    Use   [get_philoss.f, 82]          GET_PHILOSS
    Use   [get_philoss.f, 83]          GET_PHILOSS
    Use   [get_philoss.f, 84]          GET_PHILOSS
    Use   [get_philoss.f, 85]          GET_PHILOSS
    Use   [get_philoss.f, 86]          GET_PHILOSS
    Use   [get_philoss.f, 87]          GET_PHILOSS
    Use   [get_philoss.f, 88]          GET_PHILOSS
    Use   [get_philoss.f, 97]          GET_PHILOSS
    Use   [get_philoss.f, 101]         GET_PHILOSS
    Use   [get_philoss.f, 102]         GET_PHILOSS
    Use   [get_philoss.f, 102]         GET_PHILOSS
    Use   [get_philoss.f, 106]         GET_PHILOSS
    Use   [get_philoss.f, 110]         GET_PHILOSS
    Use   [get_philoss.f, 111]         GET_PHILOSS
    Use   [get_philoss.f, 111]         GET_PHILOSS
    Use   [get_philoss.f, 115]         GET_PHILOSS
    Use   [get_philoss.f, 119]         GET_PHILOSS
    Use   [get_philoss.f, 120]         GET_PHILOSS
    Use   [get_philoss.f, 120]         GET_PHILOSS
    Use   [get_philoss.f, 124]         GET_PHILOSS
    Use   [get_philoss.f, 129]         GET_PHILOSS
    Use   [get_philoss.f, 129]         GET_PHILOSS
    Use   [get_philoss.f, 130]         GET_PHILOSS
    Use   [get_philoss.f, 134]         GET_PHILOSS
    Use   [get_philoss.f, 138]         GET_PHILOSS
    Use   [get_philoss.f, 139]         GET_PHILOSS
    Use   [get_philoss.f, 139]         GET_PHILOSS
    Use   [get_philoss.f, 143]         GET_PHILOSS
    Use   [get_philoss.f, 149]         GET_PHILOSS
    Use   [get_philoss.f, 149]         GET_PHILOSS
    Use   [get_philoss.f, 150]         GET_PHILOSS

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 87]        SOURCE_V_G
    Set   [source_v_g.f, 301]          SOURCE_V_G
    Use   [source_v_g.f, 302]          SOURCE_V_G
    Use   [source_v_g.f, 302]          SOURCE_V_G
    Use   [source_v_g.f, 304]          SOURCE_V_G
    Use   [source_v_g.f, 304]          SOURCE_V_G
    Use   [source_v_g.f, 304]          SOURCE_V_G
    Set   [source_v_g.f, 313]          SOURCE_V_G
    Use   [source_v_g.f, 314]          SOURCE_V_G
    Use   [source_v_g.f, 315]          SOURCE_V_G
    Use   [source_v_g.f, 315]          SOURCE_V_G
    Use   [source_v_g.f, 316]          SOURCE_V_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 422]       SOURCE_V_G_BC
    Set   [source_v_g.f, 571]          SOURCE_V_G_BC
    Use   [source_v_g.f, 572]          SOURCE_V_G_BC
    Use   [source_v_g.f, 576]          SOURCE_V_G_BC
    Use   [source_v_g.f, 577]          SOURCE_V_G_BC
    Use   [source_v_g.f, 578]          SOURCE_V_G_BC
    Use   [source_v_g.f, 579]          SOURCE_V_G_BC
    Use   [source_v_g.f, 580]          SOURCE_V_G_BC
    Use   [source_v_g.f, 581]          SOURCE_V_G_BC
    Use   [source_v_g.f, 582]          SOURCE_V_G_BC
    Use   [source_v_g.f, 611]          SOURCE_V_G_BC
    Use   [source_v_g.f, 612]          SOURCE_V_G_BC
    Use   [source_v_g.f, 613]          SOURCE_V_G_BC
    Use   [source_v_g.f, 614]          SOURCE_V_G_BC
    Use   [source_v_g.f, 615]          SOURCE_V_G_BC
    Use   [source_v_g.f, 616]          SOURCE_V_G_BC
    Use   [source_v_g.f, 617]          SOURCE_V_G_BC
    Use   [source_v_g.f, 646]          SOURCE_V_G_BC
    Use   [source_v_g.f, 647]          SOURCE_V_G_BC
    Use   [source_v_g.f, 648]          SOURCE_V_G_BC
    Use   [source_v_g.f, 649]          SOURCE_V_G_BC
    Use   [source_v_g.f, 650]          SOURCE_V_G_BC
    Use   [source_v_g.f, 651]          SOURCE_V_G_BC
    Use   [source_v_g.f, 652]          SOURCE_V_G_BC
    Use   [source_v_g.f, 671]          SOURCE_V_G_BC
    Use   [source_v_g.f, 674]          SOURCE_V_G_BC
    Use   [source_v_g.f, 676]          SOURCE_V_G_BC
    Use   [source_v_g.f, 677]          SOURCE_V_G_BC
    Use   [source_v_g.f, 678]          SOURCE_V_G_BC
    Use   [source_v_g.f, 678]          SOURCE_V_G_BC
    Use   [source_v_g.f, 681]          SOURCE_V_G_BC
    Use   [source_v_g.f, 684]          SOURCE_V_G_BC
    Use   [source_v_g.f, 686]          SOURCE_V_G_BC
    Use   [source_v_g.f, 687]          SOURCE_V_G_BC
    Use   [source_v_g.f, 688]          SOURCE_V_G_BC
    Use   [source_v_g.f, 688]          SOURCE_V_G_BC
    Use   [source_v_g.f, 691]          SOURCE_V_G_BC
    Use   [source_v_g.f, 694]          SOURCE_V_G_BC
    Use   [source_v_g.f, 696]          SOURCE_V_G_BC
    Use   [source_v_g.f, 697]          SOURCE_V_G_BC
    Use   [source_v_g.f, 698]          SOURCE_V_G_BC
    Use   [source_v_g.f, 698]          SOURCE_V_G_BC
    Use   [source_v_g.f, 701]          SOURCE_V_G_BC
    Use   [source_v_g.f, 704]          SOURCE_V_G_BC
    Use   [source_v_g.f, 706]          SOURCE_V_G_BC
    Use   [source_v_g.f, 707]          SOURCE_V_G_BC
    Use   [source_v_g.f, 708]          SOURCE_V_G_BC
    Use   [source_v_g.f, 708]          SOURCE_V_G_BC
    Use   [source_v_g.f, 716]          SOURCE_V_G_BC
    Use   [source_v_g.f, 717]          SOURCE_V_G_BC
    Use   [source_v_g.f, 718]          SOURCE_V_G_BC
    Use   [source_v_g.f, 720]          SOURCE_V_G_BC
    Use   [source_v_g.f, 721]          SOURCE_V_G_BC
    Use   [source_v_g.f, 722]          SOURCE_V_G_BC
    Use   [source_v_g.f, 723]          SOURCE_V_G_BC
    Use   [source_v_g.f, 724]          SOURCE_V_G_BC
    Use   [source_v_g.f, 725]          SOURCE_V_G_BC
    Use   [source_v_g.f, 747]          SOURCE_V_G_BC
    Use   [source_v_g.f, 747]          SOURCE_V_G_BC
    Use   [source_v_g.f, 752]          SOURCE_V_G_BC
    Use   [source_v_g.f, 752]          SOURCE_V_G_BC
    Use   [source_v_g.f, 757]          SOURCE_V_G_BC
    Use   [source_v_g.f, 757]          SOURCE_V_G_BC
    Use   [source_v_g.f, 762]          SOURCE_V_G_BC
    Use   [source_v_g.f, 762]          SOURCE_V_G_BC
    Use   [source_v_g.f, 772]          SOURCE_V_G_BC
    Use   [source_v_g.f, 772]          SOURCE_V_G_BC
    Use   [source_v_g.f, 773]          SOURCE_V_G_BC
    Use   [source_v_g.f, 777]          SOURCE_V_G_BC
    Use   [source_v_g.f, 778]          SOURCE_V_G_BC
    Use   [source_v_g.f, 779]          SOURCE_V_G_BC
    Use   [source_v_g.f, 780]          SOURCE_V_G_BC
    Use   [source_v_g.f, 781]          SOURCE_V_G_BC
    Use   [source_v_g.f, 782]          SOURCE_V_G_BC
    Use   [source_v_g.f, 806]          SOURCE_V_G_BC
    Use   [source_v_g.f, 807]          SOURCE_V_G_BC
    Use   [source_v_g.f, 808]          SOURCE_V_G_BC
    Use   [source_v_g.f, 809]          SOURCE_V_G_BC
    Use   [source_v_g.f, 810]          SOURCE_V_G_BC
    Use   [source_v_g.f, 811]          SOURCE_V_G_BC
    Use   [source_v_g.f, 812]          SOURCE_V_G_BC
    Use   [source_v_g.f, 813]          SOURCE_V_G_BC
    Use   [source_v_g.f, 840]          SOURCE_V_G_BC
    Use   [source_v_g.f, 841]          SOURCE_V_G_BC
    Use   [source_v_g.f, 842]          SOURCE_V_G_BC
    Use   [source_v_g.f, 843]          SOURCE_V_G_BC
    Use   [source_v_g.f, 844]          SOURCE_V_G_BC
    Use   [source_v_g.f, 845]          SOURCE_V_G_BC
    Use   [source_v_g.f, 846]          SOURCE_V_G_BC
    Use   [source_v_g.f, 874]          SOURCE_V_G_BC
    Use   [source_v_g.f, 875]          SOURCE_V_G_BC
    Use   [source_v_g.f, 876]          SOURCE_V_G_BC
    Use   [source_v_g.f, 877]          SOURCE_V_G_BC
    Use   [source_v_g.f, 878]          SOURCE_V_G_BC
    Use   [source_v_g.f, 879]          SOURCE_V_G_BC
    Use   [source_v_g.f, 895]          SOURCE_V_G_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_v_s.f, 113]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 176]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 177]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 182]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 182]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 183]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 183]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 184]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 184]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 185]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 185]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 186]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 186]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 187]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 187]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 189]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 190]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 191]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 191]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 192]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 192]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 194]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 194]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 195]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 195]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 196]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 196]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 197]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 197]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 198]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 198]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 199]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 199]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 202]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 203]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 206]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 206]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 209]       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, 210]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 212]       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   [kintheory_v_s.f, 213]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 220]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 221]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 227]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 228]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 231]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 231]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 241]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 241]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 246]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 247]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 249]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 249]       CALC_IA_MOMSOURCE_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [transport_coeff_ghd.f, 43]   TRANSPORT_COEFF_GHD
    Set   [transport_coeff_ghd.f, 86]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 88]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 88]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 90]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 90]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 92]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 92]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 94]   TRANSPORT_COEFF_GHD
    Use   [transport_coeff_ghd.f, 94]   TRANSPORT_COEFF_GHD

L    (Local Variable)  Declared as: INTEGER
    Define   [stiff_chem_rrates.f, 84]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 249]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 250]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 250]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 255]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 257]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 258]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 259]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 261]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 261]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 261]   STIFF_CHEM_RRATES

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [cfrelvel.f, 18]          CFRELVEL
    Declare   [cfrelvel.f, 29]         CFRELVEL
    Use   [cfrelvel.f, 51]             CFRELVEL
    Use   [cfrelvel.f, 56]             CFRELVEL
    Use   [cfrelvel.f, 60]             CFRELVEL

L    (Local Variable)  Declared as: INTEGER
    Define   [adjust_theta.f, 62]      ADJUST_THETA
    Set   [adjust_theta.f, 90]         ADJUST_THETA
    Use   [adjust_theta.f, 91]         ADJUST_THETA
    Use   [adjust_theta.f, 92]         ADJUST_THETA

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 635]        gt_pde_ahmadi
    Set   [calc_mu_s.f, 656]           gt_pde_ahmadi
    Use   [calc_mu_s.f, 661]           gt_pde_ahmadi
    Use   [calc_mu_s.f, 662]           gt_pde_ahmadi
    Use   [calc_mu_s.f, 664]           gt_pde_ahmadi

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 1406]       gt_pde_ia
    Set   [calc_mu_s.f, 1432]          gt_pde_ia
    Use   [calc_mu_s.f, 1433]          gt_pde_ia
    Use   [calc_mu_s.f, 1433]          gt_pde_ia
    Set   [calc_mu_s.f, 1472]          gt_pde_ia
    Use   [calc_mu_s.f, 1473]          gt_pde_ia
    Use   [calc_mu_s.f, 1474]          gt_pde_ia
    Use   [calc_mu_s.f, 1477]          gt_pde_ia
    Use   [calc_mu_s.f, 1479]          gt_pde_ia
    Use   [calc_mu_s.f, 1485]          gt_pde_ia
    Use   [calc_mu_s.f, 1490]          gt_pde_ia
    Use   [calc_mu_s.f, 1495]          gt_pde_ia
    Use   [calc_mu_s.f, 1498]          gt_pde_ia
    Use   [calc_mu_s.f, 1502]          gt_pde_ia
    Use   [calc_mu_s.f, 1506]          gt_pde_ia
    Use   [calc_mu_s.f, 1509]          gt_pde_ia
    Use   [calc_mu_s.f, 1511]          gt_pde_ia
    Use   [calc_mu_s.f, 1514]          gt_pde_ia
    Use   [calc_mu_s.f, 1526]          gt_pde_ia
    Use   [calc_mu_s.f, 1529]          gt_pde_ia
    Use   [calc_mu_s.f, 1532]          gt_pde_ia
    Use   [calc_mu_s.f, 1536]          gt_pde_ia
    Use   [calc_mu_s.f, 1537]          gt_pde_ia
    Use   [calc_mu_s.f, 1542]          gt_pde_ia
    Use   [calc_mu_s.f, 1546]          gt_pde_ia
    Use   [calc_mu_s.f, 1550]          gt_pde_ia
    Use   [calc_mu_s.f, 1554]          gt_pde_ia
    Use   [calc_mu_s.f, 1558]          gt_pde_ia
    Use   [calc_mu_s.f, 1559]          gt_pde_ia
    Set   [calc_mu_s.f, 1600]          gt_pde_ia
    Use   [calc_mu_s.f, 1601]          gt_pde_ia
    Use   [calc_mu_s.f, 1602]          gt_pde_ia
    Use   [calc_mu_s.f, 1605]          gt_pde_ia
    Use   [calc_mu_s.f, 1607]          gt_pde_ia
    Use   [calc_mu_s.f, 1613]          gt_pde_ia
    Use   [calc_mu_s.f, 1621]          gt_pde_ia
    Use   [calc_mu_s.f, 1625]          gt_pde_ia
    Use   [calc_mu_s.f, 1632]          gt_pde_ia
    Use   [calc_mu_s.f, 1633]          gt_pde_ia
    Use   [calc_mu_s.f, 1636]          gt_pde_ia
    Use   [calc_mu_s.f, 1666]          gt_pde_ia
    Use   [calc_mu_s.f, 1684]          gt_pde_ia
    Use   [calc_mu_s.f, 1685]          gt_pde_ia
    Use   [calc_mu_s.f, 1705]          gt_pde_ia
    Use   [calc_mu_s.f, 1707]          gt_pde_ia
    Use   [calc_mu_s.f, 1707]          gt_pde_ia
    Use   [calc_mu_s.f, 1712]          gt_pde_ia
    Use   [calc_mu_s.f, 1714]          gt_pde_ia
    Use   [calc_mu_s.f, 1718]          gt_pde_ia
    Use   [calc_mu_s.f, 1721]          gt_pde_ia
    Use   [calc_mu_s.f, 1724]          gt_pde_ia
    Use   [calc_mu_s.f, 1724]          gt_pde_ia
    Use   [calc_mu_s.f, 1725]          gt_pde_ia
    Use   [calc_mu_s.f, 1725]          gt_pde_ia

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 791]        gt_pde_simonin
    Set   [calc_mu_s.f, 817]           gt_pde_simonin
    Use   [calc_mu_s.f, 822]           gt_pde_simonin
    Use   [calc_mu_s.f, 823]           gt_pde_simonin
    Use   [calc_mu_s.f, 825]           gt_pde_simonin
    Use   [calc_mu_s.f, 830]           gt_pde_simonin
    Use   [calc_mu_s.f, 834]           gt_pde_simonin

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2669]       init1_mu_s
    Set   [calc_mu_s.f, 2852]          init1_mu_s
    Use   [calc_mu_s.f, 2853]          init1_mu_s
    Use   [calc_mu_s.f, 2854]          init1_mu_s
    Use   [calc_mu_s.f, 2856]          init1_mu_s
    Use   [calc_mu_s.f, 2856]          init1_mu_s
    Use   [calc_mu_s.f, 2857]          init1_mu_s
    Use   [calc_mu_s.f, 2857]          init1_mu_s
    Use   [calc_mu_s.f, 2859]          init1_mu_s
    Use   [calc_mu_s.f, 2859]          init1_mu_s
    Use   [calc_mu_s.f, 2860]          init1_mu_s
    Use   [calc_mu_s.f, 2860]          init1_mu_s
    Use   [calc_mu_s.f, 2862]          init1_mu_s
    Use   [calc_mu_s.f, 2862]          init1_mu_s
    Use   [calc_mu_s.f, 2863]          init1_mu_s
    Use   [calc_mu_s.f, 2863]          init1_mu_s
    Use   [calc_mu_s.f, 2865]          init1_mu_s
    Use   [calc_mu_s.f, 2865]          init1_mu_s
    Use   [calc_mu_s.f, 2866]          init1_mu_s
    Use   [calc_mu_s.f, 2866]          init1_mu_s
    Use   [calc_mu_s.f, 2870]          init1_mu_s
    Use   [calc_mu_s.f, 2870]          init1_mu_s
    Use   [calc_mu_s.f, 2871]          init1_mu_s
    Use   [calc_mu_s.f, 2873]          init1_mu_s
    Use   [calc_mu_s.f, 2876]          init1_mu_s
    Use   [calc_mu_s.f, 2878]          init1_mu_s
    Use   [calc_mu_s.f, 2880]          init1_mu_s
    Use   [calc_mu_s.f, 2880]          init1_mu_s
    Use   [calc_mu_s.f, 2883]          init1_mu_s
    Use   [calc_mu_s.f, 2883]          init1_mu_s
    Use   [calc_mu_s.f, 2884]          init1_mu_s
    Use   [calc_mu_s.f, 2884]          init1_mu_s
    Use   [calc_mu_s.f, 2886]          init1_mu_s
    Use   [calc_mu_s.f, 2886]          init1_mu_s
    Use   [calc_mu_s.f, 2887]          init1_mu_s
    Use   [calc_mu_s.f, 2887]          init1_mu_s
    Use   [calc_mu_s.f, 2891]          init1_mu_s
    Use   [calc_mu_s.f, 2891]          init1_mu_s
    Use   [calc_mu_s.f, 2892]          init1_mu_s
    Use   [calc_mu_s.f, 2892]          init1_mu_s
    Use   [calc_mu_s.f, 2894]          init1_mu_s
    Use   [calc_mu_s.f, 2894]          init1_mu_s
    Use   [calc_mu_s.f, 2895]          init1_mu_s
    Use   [calc_mu_s.f, 2895]          init1_mu_s
    Use   [calc_mu_s.f, 2897]          init1_mu_s
    Use   [calc_mu_s.f, 2897]          init1_mu_s
    Use   [calc_mu_s.f, 2898]          init1_mu_s
    Use   [calc_mu_s.f, 2898]          init1_mu_s
    Use   [calc_mu_s.f, 2900]          init1_mu_s
    Use   [calc_mu_s.f, 2900]          init1_mu_s
    Use   [calc_mu_s.f, 2901]          init1_mu_s
    Use   [calc_mu_s.f, 2901]          init1_mu_s
    Use   [calc_mu_s.f, 2903]          init1_mu_s
    Use   [calc_mu_s.f, 2903]          init1_mu_s
    Use   [calc_mu_s.f, 2904]          init1_mu_s
    Use   [calc_mu_s.f, 2904]          init1_mu_s
    Use   [calc_mu_s.f, 2906]          init1_mu_s
    Use   [calc_mu_s.f, 2906]          init1_mu_s
    Use   [calc_mu_s.f, 2907]          init1_mu_s
    Use   [calc_mu_s.f, 2907]          init1_mu_s
    Use   [calc_mu_s.f, 2910]          init1_mu_s
    Use   [calc_mu_s.f, 2910]          init1_mu_s
    Use   [calc_mu_s.f, 2911]          init1_mu_s
    Use   [calc_mu_s.f, 2911]          init1_mu_s
    Use   [calc_mu_s.f, 2920]          init1_mu_s
    Use   [calc_mu_s.f, 2920]          init1_mu_s
    Use   [calc_mu_s.f, 2922]          init1_mu_s
    Use   [calc_mu_s.f, 2922]          init1_mu_s
    Use   [calc_mu_s.f, 2924]          init1_mu_s
    Use   [calc_mu_s.f, 2924]          init1_mu_s
    Use   [calc_mu_s.f, 2926]          init1_mu_s
    Use   [calc_mu_s.f, 2926]          init1_mu_s
    Use   [calc_mu_s.f, 2928]          init1_mu_s
    Use   [calc_mu_s.f, 2928]          init1_mu_s
    Use   [calc_mu_s.f, 2930]          init1_mu_s
    Use   [calc_mu_s.f, 2930]          init1_mu_s
    Use   [calc_mu_s.f, 2932]          init1_mu_s
    Use   [calc_mu_s.f, 2932]          init1_mu_s
    Use   [calc_mu_s.f, 2934]          init1_mu_s
    Use   [calc_mu_s.f, 2934]          init1_mu_s
    Use   [calc_mu_s.f, 2936]          init1_mu_s
    Use   [calc_mu_s.f, 2936]          init1_mu_s
    Use   [calc_mu_s.f, 2938]          init1_mu_s
    Use   [calc_mu_s.f, 2938]          init1_mu_s
    Use   [calc_mu_s.f, 2940]          init1_mu_s
    Use   [calc_mu_s.f, 2940]          init1_mu_s
    Use   [calc_mu_s.f, 2942]          init1_mu_s
    Use   [calc_mu_s.f, 2942]          init1_mu_s
    Use   [calc_mu_s.f, 2947]          init1_mu_s
    Use   [calc_mu_s.f, 2947]          init1_mu_s
    Use   [calc_mu_s.f, 2954]          init1_mu_s
    Use   [calc_mu_s.f, 2954]          init1_mu_s
    Use   [calc_mu_s.f, 2959]          init1_mu_s
    Use   [calc_mu_s.f, 2959]          init1_mu_s
    Use   [calc_mu_s.f, 2964]          init1_mu_s
    Use   [calc_mu_s.f, 2967]          init1_mu_s
    Use   [calc_mu_s.f, 2967]          init1_mu_s
    Use   [calc_mu_s.f, 2973]          init1_mu_s
    Use   [calc_mu_s.f, 2973]          init1_mu_s

L    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 124]          VF_SS_Y
    Set   [vf_gs_y.f, 131]             VF_SS_Y
    Use Argument   [vf_gs_y.f, 132]    VF_SS_Y
    Use   [vf_gs_y.f, 133]             VF_SS_Y

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [pic_routines.f, 351]     MPPIC_APPLY_PS_GRAD_PART
    Declare   [pic_routines.f, 365]    MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 384]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 385]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 389]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 390]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 392]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 394]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 395]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 396]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 398]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 405]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 409]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 411]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 514]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 518]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 524]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 526]        MPPIC_APPLY_PS_GRAD_PART

L    (Local Variable)  Declared as: INTEGER
    Define   [get_master.f, 34]        GET_U_MASTER_CELLS
    Set   [get_master.f, 45]           GET_U_MASTER_CELLS
    Use   [get_master.f, 46]           GET_U_MASTER_CELLS
    Use   [get_master.f, 46]           GET_U_MASTER_CELLS
    Use   [get_master.f, 47]           GET_U_MASTER_CELLS
    Use   [get_master.f, 48]           GET_U_MASTER_CELLS

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 31]   CHECK_CELL_MOVEMENT
    Set   [check_cell_movement.f, 43]   CHECK_CELL_MOVEMENT
    Use Argument   [check_cell_movement.f, 45]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 48]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 49]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 50]   CHECK_CELL_MOVEMENT

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 97]   CHECK_CELL_MOVEMENT_DEM
    Set   [check_cell_movement.f, 110]   CHECK_CELL_MOVEMENT_DEM
    Use Argument   [check_cell_movement.f, 112]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 115]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 116]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 117]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 120]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 121]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 121]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 126]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 127]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 127]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 132]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 133]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 133]   CHECK_CELL_MOVEMENT_DEM

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 205]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 228]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 230]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 235]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 236]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 237]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 240]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 246]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 251]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 254]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 255]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 255]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 261]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 265]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 266]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 266]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 275]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 280]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 283]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 284]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 284]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 291]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 295]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 296]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 296]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 305]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 310]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 313]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 314]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 314]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 320]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 324]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 325]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 325]   CHECK_CELL_MOVEMENT_PIC

L    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 68]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 90]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 91]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 92]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 94]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 95]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 99]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 100]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 102]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 103]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 140]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 141]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 142]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 143]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 144]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 145]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 146]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 147]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 151]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 153]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 155]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 155]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 156]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 156]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 161]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 163]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 165]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 165]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 166]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 166]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 175]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 176]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 177]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 178]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 179]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 180]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 181]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 182]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 185]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 188]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 191]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 191]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 192]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 192]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 205]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 206]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 207]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 208]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 209]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 210]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 211]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 212]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 216]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 220]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 223]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 223]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 224]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 224]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 254]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 255]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 255]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 256]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 256]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 256]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 256]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 256]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 258]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 258]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 259]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 260]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 285]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 286]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 286]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 288]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 289]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 289]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 289]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 289]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 292]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 292]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 293]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 294]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 328]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 329]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 329]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 330]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 330]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 330]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 331]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 331]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 333]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 333]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 334]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 335]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 373]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 374]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 374]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 375]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 375]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 375]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 376]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 376]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 378]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 378]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 379]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 380]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 406]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 407]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 408]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 410]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 411]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 415]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 416]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 418]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 419]   CHECK_Mass_balance

L    (Local Variable)  Declared as: INTEGER
    Define   [remove_comment.f, 29]    REMOVE_COMMENT
    Set   [remove_comment.f, 31]       REMOVE_COMMENT
    Use   [remove_comment.f, 32]       REMOVE_COMMENT
    Use   [remove_comment.f, 32]       REMOVE_COMMENT

L    (Local Variable)  Declared as: INTEGER
    Define   [remove_comment.f, 63]    REMOVE_PAR_BLANKS
    Set   [remove_comment.f, 98]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 99]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 99]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 99]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 99]       REMOVE_PAR_BLANKS

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [cfwallcontact.f, 9]      CFWALLCONTACT
    Declare   [cfwallcontact.f, 29]    CFWALLCONTACT
    Use   [cfwallcontact.f, 53]        CFWALLCONTACT
    Use   [cfwallcontact.f, 54]        CFWALLCONTACT
    Use   [cfwallcontact.f, 55]        CFWALLCONTACT
    Use   [cfwallcontact.f, 78]        CFWALLCONTACT
    Use   [cfwallcontact.f, 85]        CFWALLCONTACT
    Use   [cfwallcontact.f, 90]        CFWALLCONTACT
    Use   [cfwallcontact.f, 95]        CFWALLCONTACT
    Use   [cfwallcontact.f, 100]       CFWALLCONTACT
    Use   [cfwallcontact.f, 105]       CFWALLCONTACT

L    (Local Variable)  Declared as: INTEGER
    Define   [out_bin_512r.f, 54]      OUT_BIN_512R
    Use   [out_bin_512r.f, 75]         OUT_BIN_512R
    Set   [out_bin_512r.f, 75]         OUT_BIN_512R
    Use   [out_bin_512r.f, 88]         OUT_BIN_512R
    Set   [out_bin_512r.f, 88]         OUT_BIN_512R
    Use   [out_bin_512r.f, 94]         OUT_BIN_512R
    Set   [out_bin_512r.f, 94]         OUT_BIN_512R

L    (Local Variable)  Declared as: INTEGER
    Define   [out_bin_512.f, 54]       OUT_BIN_512
    Use   [out_bin_512.f, 74]          OUT_BIN_512
    Set   [out_bin_512.f, 74]          OUT_BIN_512
    Use   [out_bin_512.f, 87]          OUT_BIN_512
    Set   [out_bin_512.f, 87]          OUT_BIN_512
    Use   [out_bin_512.f, 93]          OUT_BIN_512
    Set   [out_bin_512.f, 93]          OUT_BIN_512

L    (Local Variable)  Declared as: INTEGER
    Define   [vtc_scalar.f, 44]        CALC_VTC_SS
    Set   [vtc_scalar.f, 51]           CALC_VTC_SS
    Use Argument   [vtc_scalar.f, 52]   CALC_VTC_SS
    Use   [vtc_scalar.f, 53]           CALC_VTC_SS

L    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_x.f, 117]          VF_SS_X
    Set   [vf_gs_x.f, 124]             VF_SS_X
    Use Argument   [vf_gs_x.f, 125]    VF_SS_X
    Use   [vf_gs_x.f, 126]             VF_SS_X

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_s.f, 59]     CG_SOURCE_V_S
    Set   [CG_source_v_s.f, 105]       CG_SOURCE_V_S
    Use   [CG_source_v_s.f, 106]       CG_SOURCE_V_S
    Use   [CG_source_v_s.f, 106]       CG_SOURCE_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_ghd_granular_energy.f, 73]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 157]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 158]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 158]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 160]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 161]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 162]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 163]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 164]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 172]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 172]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 172]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 173]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 173]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 173]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 174]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 174]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 174]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 175]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 175]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 175]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 176]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 176]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 176]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 216]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 217]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 222]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 222]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 222]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 223]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 223]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 223]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 250]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 250]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 251]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 251]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 258]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 258]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 259]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 259]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 267]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 267]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 268]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 268]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 275]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 275]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 276]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 276]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 284]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 284]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 287]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 287]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 291]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 291]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 292]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 292]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 299]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 299]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 300]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 300]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 308]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 308]   SOURCE_GHD_GRANULAR_ENERGY

L    (Local Variable)  Declared as: INTEGER
    Define   [set_fluidbed_p.f, 64]    SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 79]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 80]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 81]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 82]       SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 150]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 151]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 151]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 151]      SET_FLUIDBED_P

L    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 55]       SET_WALL_BC
    Set   [set_wall_bc.f, 68]          SET_WALL_BC
    Use   [set_wall_bc.f, 69]          SET_WALL_BC
    Use   [set_wall_bc.f, 72]          SET_WALL_BC
    Use   [set_wall_bc.f, 73]          SET_WALL_BC
    Use   [set_wall_bc.f, 74]          SET_WALL_BC
    Use   [set_wall_bc.f, 75]          SET_WALL_BC
    Use   [set_wall_bc.f, 76]          SET_WALL_BC
    Use   [set_wall_bc.f, 77]          SET_WALL_BC
    Use   [set_wall_bc.f, 79]          SET_WALL_BC
    Use   [set_wall_bc.f, 82]          SET_WALL_BC
    Use   [set_wall_bc.f, 86]          SET_WALL_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 619]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 685]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 715]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 715]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 719]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 720]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 721]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 722]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 723]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 724]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 725]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 726]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 729]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 730]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 732]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 732]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 733]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 733]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 737]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 737]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 739]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 739]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 742]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 742]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 744]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 744]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 748]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 748]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 750]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 750]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 752]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 752]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 754]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 754]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 756]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 757]    CHECK_SOLIDS_DEM_COLL_HERTZ

L    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 370]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 456]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 472]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 472]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 477]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 478]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 478]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 480]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 482]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 482]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 485]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 485]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 486]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 486]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 490]    CHECK_SOLIDS_DEM_COLL_LSD

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 40]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 175]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 176]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 178]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 179]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 180]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 181]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 182]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 183]      DIF_PHI_BC_DES

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_v_s.f, 959]       JJ_BC_V_S
    Declare   [source_v_s.f, 989]      JJ_BC_V_S
    Use   [source_v_s.f, 1032]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1036]   JJ_BC_V_S
    Use   [source_v_s.f, 1037]         JJ_BC_V_S
    Use   [source_v_s.f, 1042]         JJ_BC_V_S
    Use   [source_v_s.f, 1061]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1063]   JJ_BC_V_S
    Use   [source_v_s.f, 1064]         JJ_BC_V_S
    Use   [source_v_s.f, 1067]         JJ_BC_V_S
    Use   [source_v_s.f, 1084]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1086]   JJ_BC_V_S
    Use   [source_v_s.f, 1087]         JJ_BC_V_S
    Use   [source_v_s.f, 1090]         JJ_BC_V_S
    Use   [source_v_s.f, 1107]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1109]   JJ_BC_V_S
    Use   [source_v_s.f, 1110]         JJ_BC_V_S
    Use   [source_v_s.f, 1113]         JJ_BC_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 83]        SOURCE_V_S
    Set   [source_v_s.f, 152]          SOURCE_V_S
    Use   [source_v_s.f, 153]          SOURCE_V_S
    Use   [source_v_s.f, 153]          SOURCE_V_S
    Use   [source_v_s.f, 154]          SOURCE_V_S
    Use   [source_v_s.f, 155]          SOURCE_V_S
    Use   [source_v_s.f, 157]          SOURCE_V_S
    Use   [source_v_s.f, 160]          SOURCE_V_S
    Use   [source_v_s.f, 160]          SOURCE_V_S
    Set   [source_v_s.f, 208]          SOURCE_V_S
    Use   [source_v_s.f, 209]          SOURCE_V_S
    Use   [source_v_s.f, 210]          SOURCE_V_S
    Use   [source_v_s.f, 211]          SOURCE_V_S
    Use   [source_v_s.f, 212]          SOURCE_V_S
    Use   [source_v_s.f, 214]          SOURCE_V_S
    Use   [source_v_s.f, 215]          SOURCE_V_S
    Set   [source_v_s.f, 363]          SOURCE_V_S
    Use   [source_v_s.f, 364]          SOURCE_V_S
    Use   [source_v_s.f, 364]          SOURCE_V_S
    Set   [source_v_s.f, 396]          SOURCE_V_S
    Use   [source_v_s.f, 397]          SOURCE_V_S
    Use   [source_v_s.f, 397]          SOURCE_V_S
    Use   [source_v_s.f, 399]          SOURCE_V_S
    Use   [source_v_s.f, 399]          SOURCE_V_S
    Use   [source_v_s.f, 400]          SOURCE_V_S
    Set   [source_v_s.f, 408]          SOURCE_V_S
    Use   [source_v_s.f, 409]          SOURCE_V_S
    Use   [source_v_s.f, 410]          SOURCE_V_S
    Use   [source_v_s.f, 410]          SOURCE_V_S
    Use   [source_v_s.f, 411]          SOURCE_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 527]       SOURCE_V_S_BC
    Set   [source_v_s.f, 652]          SOURCE_V_S_BC
    Use   [source_v_s.f, 653]          SOURCE_V_S_BC
    Use   [source_v_s.f, 656]          SOURCE_V_S_BC
    Use   [source_v_s.f, 657]          SOURCE_V_S_BC
    Use   [source_v_s.f, 658]          SOURCE_V_S_BC
    Use   [source_v_s.f, 659]          SOURCE_V_S_BC
    Use   [source_v_s.f, 660]          SOURCE_V_S_BC
    Use   [source_v_s.f, 661]          SOURCE_V_S_BC
    Use   [source_v_s.f, 662]          SOURCE_V_S_BC
    Use   [source_v_s.f, 663]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 693]   SOURCE_V_S_BC
    Use   [source_v_s.f, 696]          SOURCE_V_S_BC
    Use   [source_v_s.f, 697]          SOURCE_V_S_BC
    Use   [source_v_s.f, 698]          SOURCE_V_S_BC
    Use   [source_v_s.f, 699]          SOURCE_V_S_BC
    Use   [source_v_s.f, 700]          SOURCE_V_S_BC
    Use   [source_v_s.f, 701]          SOURCE_V_S_BC
    Use   [source_v_s.f, 702]          SOURCE_V_S_BC
    Use   [source_v_s.f, 703]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 732]   SOURCE_V_S_BC
    Use   [source_v_s.f, 735]          SOURCE_V_S_BC
    Use   [source_v_s.f, 736]          SOURCE_V_S_BC
    Use   [source_v_s.f, 737]          SOURCE_V_S_BC
    Use   [source_v_s.f, 738]          SOURCE_V_S_BC
    Use   [source_v_s.f, 739]          SOURCE_V_S_BC
    Use   [source_v_s.f, 740]          SOURCE_V_S_BC
    Use   [source_v_s.f, 741]          SOURCE_V_S_BC
    Use   [source_v_s.f, 742]          SOURCE_V_S_BC
    Use   [source_v_s.f, 761]          SOURCE_V_S_BC
    Use   [source_v_s.f, 764]          SOURCE_V_S_BC
    Use   [source_v_s.f, 766]          SOURCE_V_S_BC
    Use   [source_v_s.f, 767]          SOURCE_V_S_BC
    Use   [source_v_s.f, 768]          SOURCE_V_S_BC
    Use   [source_v_s.f, 768]          SOURCE_V_S_BC
    Use   [source_v_s.f, 771]          SOURCE_V_S_BC
    Use   [source_v_s.f, 774]          SOURCE_V_S_BC
    Use   [source_v_s.f, 776]          SOURCE_V_S_BC
    Use   [source_v_s.f, 777]          SOURCE_V_S_BC
    Use   [source_v_s.f, 778]          SOURCE_V_S_BC
    Use   [source_v_s.f, 778]          SOURCE_V_S_BC
    Use   [source_v_s.f, 781]          SOURCE_V_S_BC
    Use   [source_v_s.f, 784]          SOURCE_V_S_BC
    Use   [source_v_s.f, 786]          SOURCE_V_S_BC
    Use   [source_v_s.f, 788]          SOURCE_V_S_BC
    Use   [source_v_s.f, 790]          SOURCE_V_S_BC
    Use   [source_v_s.f, 790]          SOURCE_V_S_BC
    Use   [source_v_s.f, 793]          SOURCE_V_S_BC
    Use   [source_v_s.f, 796]          SOURCE_V_S_BC
    Use   [source_v_s.f, 798]          SOURCE_V_S_BC
    Use   [source_v_s.f, 800]          SOURCE_V_S_BC
    Use   [source_v_s.f, 802]          SOURCE_V_S_BC
    Use   [source_v_s.f, 802]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 809]   SOURCE_V_S_BC
    Use   [source_v_s.f, 813]          SOURCE_V_S_BC
    Use   [source_v_s.f, 813]          SOURCE_V_S_BC
    Use   [source_v_s.f, 814]          SOURCE_V_S_BC
    Use   [source_v_s.f, 815]          SOURCE_V_S_BC
    Use   [source_v_s.f, 816]          SOURCE_V_S_BC
    Use   [source_v_s.f, 817]          SOURCE_V_S_BC
    Use   [source_v_s.f, 818]          SOURCE_V_S_BC
    Use   [source_v_s.f, 819]          SOURCE_V_S_BC
    Use   [source_v_s.f, 820]          SOURCE_V_S_BC
    Use   [source_v_s.f, 840]          SOURCE_V_S_BC
    Use   [source_v_s.f, 841]          SOURCE_V_S_BC
    Use   [source_v_s.f, 842]          SOURCE_V_S_BC
    Use   [source_v_s.f, 843]          SOURCE_V_S_BC
    Use   [source_v_s.f, 844]          SOURCE_V_S_BC
    Use   [source_v_s.f, 845]          SOURCE_V_S_BC
    Use   [source_v_s.f, 846]          SOURCE_V_S_BC
    Use   [source_v_s.f, 847]          SOURCE_V_S_BC
    Use   [source_v_s.f, 874]          SOURCE_V_S_BC
    Use   [source_v_s.f, 875]          SOURCE_V_S_BC
    Use   [source_v_s.f, 876]          SOURCE_V_S_BC
    Use   [source_v_s.f, 877]          SOURCE_V_S_BC
    Use   [source_v_s.f, 878]          SOURCE_V_S_BC
    Use   [source_v_s.f, 879]          SOURCE_V_S_BC
    Use   [source_v_s.f, 880]          SOURCE_V_S_BC
    Use   [source_v_s.f, 903]          SOURCE_V_S_BC
    Use   [source_v_s.f, 904]          SOURCE_V_S_BC
    Use   [source_v_s.f, 905]          SOURCE_V_S_BC
    Use   [source_v_s.f, 906]          SOURCE_V_S_BC
    Use   [source_v_s.f, 907]          SOURCE_V_S_BC
    Use   [source_v_s.f, 908]          SOURCE_V_S_BC
    Use   [source_v_s.f, 923]          SOURCE_V_S_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 2854]         CLEAN_GEOMETRY
    Set   [vtk_out.f, 2889]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2890]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 2948]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2949]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2950]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2950]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2952]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2952]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 2987]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2988]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 3046]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3047]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3048]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3048]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3050]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3050]            CLEAN_GEOMETRY

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1746]         GATHER_DATA
    Set   [vtk_out.f, 1830]            GATHER_DATA
    Use   [vtk_out.f, 1831]            GATHER_DATA
    Use   [vtk_out.f, 1832]            GATHER_DATA
    Use   [vtk_out.f, 1833]            GATHER_DATA
    Use   [vtk_out.f, 1834]            GATHER_DATA
    Use   [vtk_out.f, 1835]            GATHER_DATA

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 401]          OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 415]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 416]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 418]             OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 424]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 425]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 425]             OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 428]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 429]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 429]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 429]             OPEN_VTU_FILE_BIN

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1933]         SETUP_VTK_NO_CUTCELL
    Set   [vtk_out.f, 2038]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2039]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2040]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2041]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2042]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2043]            SETUP_VTK_NO_CUTCELL

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1519]         WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1572]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1573]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1574]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1575]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1576]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1581]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1673]            WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1674]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1685]            WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1686]            WRITE_CUT_SURFACE_VTK

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 594]          WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 717]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 717]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 724]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 724]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 850]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 850]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 857]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 857]             WRITE_GEOMETRY_IN_VTU_BIN

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 78]           WRITE_VTU_FILE
    Set   [vtk_out.f, 351]             WRITE_VTU_FILE
    Use   [vtk_out.f, 352]             WRITE_VTU_FILE
    Use   [vtk_out.f, 352]             WRITE_VTU_FILE
    Use   [vtk_out.f, 352]             WRITE_VTU_FILE

L    (Local Variable)  Declared as: INTEGER
    Define   [set_phase_index.f, 35]   SET_PHASE_INDEX
    Set   [set_phase_index.f, 53]      SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 54]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 55]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 55]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 55]   SET_PHASE_INDEX
    Use   [set_phase_index.f, 60]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 61]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 63]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 68]      SET_PHASE_INDEX
    Set   [set_phase_index.f, 87]      SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 89]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 90]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 90]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 90]   SET_PHASE_INDEX
    Use   [set_phase_index.f, 93]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 94]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 94]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 94]      SET_PHASE_INDEX

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 87]        SOURCE_U_G
    Set   [source_u_g.f, 305]          SOURCE_U_G
    Use   [source_u_g.f, 306]          SOURCE_U_G
    Use   [source_u_g.f, 306]          SOURCE_U_G
    Use   [source_u_g.f, 308]          SOURCE_U_G
    Use   [source_u_g.f, 308]          SOURCE_U_G
    Use   [source_u_g.f, 308]          SOURCE_U_G
    Set   [source_u_g.f, 317]          SOURCE_U_G
    Use   [source_u_g.f, 318]          SOURCE_U_G
    Use   [source_u_g.f, 319]          SOURCE_U_G
    Use   [source_u_g.f, 319]          SOURCE_U_G
    Use   [source_u_g.f, 320]          SOURCE_U_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 433]       SOURCE_U_G_BC
    Set   [source_u_g.f, 582]          SOURCE_U_G_BC
    Use   [source_u_g.f, 583]          SOURCE_U_G_BC
    Use   [source_u_g.f, 587]          SOURCE_U_G_BC
    Use   [source_u_g.f, 588]          SOURCE_U_G_BC
    Use   [source_u_g.f, 589]          SOURCE_U_G_BC
    Use   [source_u_g.f, 590]          SOURCE_U_G_BC
    Use   [source_u_g.f, 591]          SOURCE_U_G_BC
    Use   [source_u_g.f, 592]          SOURCE_U_G_BC
    Use   [source_u_g.f, 593]          SOURCE_U_G_BC
    Use   [source_u_g.f, 622]          SOURCE_U_G_BC
    Use   [source_u_g.f, 623]          SOURCE_U_G_BC
    Use   [source_u_g.f, 624]          SOURCE_U_G_BC
    Use   [source_u_g.f, 625]          SOURCE_U_G_BC
    Use   [source_u_g.f, 626]          SOURCE_U_G_BC
    Use   [source_u_g.f, 627]          SOURCE_U_G_BC
    Use   [source_u_g.f, 628]          SOURCE_U_G_BC
    Use   [source_u_g.f, 657]          SOURCE_U_G_BC
    Use   [source_u_g.f, 658]          SOURCE_U_G_BC
    Use   [source_u_g.f, 659]          SOURCE_U_G_BC
    Use   [source_u_g.f, 660]          SOURCE_U_G_BC
    Use   [source_u_g.f, 661]          SOURCE_U_G_BC
    Use   [source_u_g.f, 662]          SOURCE_U_G_BC
    Use   [source_u_g.f, 663]          SOURCE_U_G_BC
    Use   [source_u_g.f, 682]          SOURCE_U_G_BC
    Use   [source_u_g.f, 685]          SOURCE_U_G_BC
    Use   [source_u_g.f, 687]          SOURCE_U_G_BC
    Use   [source_u_g.f, 688]          SOURCE_U_G_BC
    Use   [source_u_g.f, 689]          SOURCE_U_G_BC
    Use   [source_u_g.f, 689]          SOURCE_U_G_BC
    Use   [source_u_g.f, 692]          SOURCE_U_G_BC
    Use   [source_u_g.f, 695]          SOURCE_U_G_BC
    Use   [source_u_g.f, 697]          SOURCE_U_G_BC
    Use   [source_u_g.f, 698]          SOURCE_U_G_BC
    Use   [source_u_g.f, 699]          SOURCE_U_G_BC
    Use   [source_u_g.f, 699]          SOURCE_U_G_BC
    Use   [source_u_g.f, 702]          SOURCE_U_G_BC
    Use   [source_u_g.f, 705]          SOURCE_U_G_BC
    Use   [source_u_g.f, 707]          SOURCE_U_G_BC
    Use   [source_u_g.f, 708]          SOURCE_U_G_BC
    Use   [source_u_g.f, 709]          SOURCE_U_G_BC
    Use   [source_u_g.f, 709]          SOURCE_U_G_BC
    Use   [source_u_g.f, 712]          SOURCE_U_G_BC
    Use   [source_u_g.f, 715]          SOURCE_U_G_BC
    Use   [source_u_g.f, 717]          SOURCE_U_G_BC
    Use   [source_u_g.f, 719]          SOURCE_U_G_BC
    Use   [source_u_g.f, 721]          SOURCE_U_G_BC
    Use   [source_u_g.f, 721]          SOURCE_U_G_BC
    Use   [source_u_g.f, 729]          SOURCE_U_G_BC
    Use   [source_u_g.f, 730]          SOURCE_U_G_BC
    Use   [source_u_g.f, 731]          SOURCE_U_G_BC
    Use   [source_u_g.f, 733]          SOURCE_U_G_BC
    Use   [source_u_g.f, 734]          SOURCE_U_G_BC
    Use   [source_u_g.f, 735]          SOURCE_U_G_BC
    Use   [source_u_g.f, 736]          SOURCE_U_G_BC
    Use   [source_u_g.f, 737]          SOURCE_U_G_BC
    Use   [source_u_g.f, 738]          SOURCE_U_G_BC
    Use   [source_u_g.f, 760]          SOURCE_U_G_BC
    Use   [source_u_g.f, 760]          SOURCE_U_G_BC
    Use   [source_u_g.f, 765]          SOURCE_U_G_BC
    Use   [source_u_g.f, 765]          SOURCE_U_G_BC
    Use   [source_u_g.f, 770]          SOURCE_U_G_BC
    Use   [source_u_g.f, 770]          SOURCE_U_G_BC
    Use   [source_u_g.f, 775]          SOURCE_U_G_BC
    Use   [source_u_g.f, 775]          SOURCE_U_G_BC
    Use   [source_u_g.f, 785]          SOURCE_U_G_BC
    Use   [source_u_g.f, 785]          SOURCE_U_G_BC
    Use   [source_u_g.f, 786]          SOURCE_U_G_BC
    Use   [source_u_g.f, 790]          SOURCE_U_G_BC
    Use   [source_u_g.f, 791]          SOURCE_U_G_BC
    Use   [source_u_g.f, 792]          SOURCE_U_G_BC
    Use   [source_u_g.f, 793]          SOURCE_U_G_BC
    Use   [source_u_g.f, 794]          SOURCE_U_G_BC
    Use   [source_u_g.f, 795]          SOURCE_U_G_BC
    Use   [source_u_g.f, 819]          SOURCE_U_G_BC
    Use   [source_u_g.f, 820]          SOURCE_U_G_BC
    Use   [source_u_g.f, 821]          SOURCE_U_G_BC
    Use   [source_u_g.f, 822]          SOURCE_U_G_BC
    Use   [source_u_g.f, 823]          SOURCE_U_G_BC
    Use   [source_u_g.f, 824]          SOURCE_U_G_BC
    Use   [source_u_g.f, 825]          SOURCE_U_G_BC
    Use   [source_u_g.f, 826]          SOURCE_U_G_BC
    Use   [source_u_g.f, 854]          SOURCE_U_G_BC
    Use   [source_u_g.f, 855]          SOURCE_U_G_BC
    Use   [source_u_g.f, 856]          SOURCE_U_G_BC
    Use   [source_u_g.f, 857]          SOURCE_U_G_BC
    Use   [source_u_g.f, 858]          SOURCE_U_G_BC
    Use   [source_u_g.f, 859]          SOURCE_U_G_BC
    Use   [source_u_g.f, 860]          SOURCE_U_G_BC
    Use   [source_u_g.f, 889]          SOURCE_U_G_BC
    Use   [source_u_g.f, 890]          SOURCE_U_G_BC
    Use   [source_u_g.f, 891]          SOURCE_U_G_BC
    Use   [source_u_g.f, 892]          SOURCE_U_G_BC
    Use   [source_u_g.f, 893]          SOURCE_U_G_BC
    Use   [source_u_g.f, 894]          SOURCE_U_G_BC
    Use   [source_u_g.f, 910]          SOURCE_U_G_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_u_s.f, 113]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 178]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 179]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 184]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 185]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 186]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 186]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 187]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 187]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 189]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 189]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 190]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 190]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 191]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 191]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 192]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 192]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 193]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 193]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 194]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 194]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 196]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 196]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 197]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 197]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 198]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 198]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 199]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 199]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 200]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 200]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 201]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 201]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 204]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 205]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 208]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 208]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 212]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 212]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 213]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 213]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 214]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 214]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 215]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 215]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 223]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 223]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 224]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 224]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 229]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 229]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 231]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 231]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 232]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 232]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 238]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 248]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 249]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 255]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 256]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 259]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 259]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 269]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 269]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 274]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 275]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 277]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 277]       CALC_IA_MOMSOURCE_U_S

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [drag_ss.f, 20]           DRAG_SS
    Declare   [drag_ss.f, 45]          DRAG_SS
    Use Argument   [drag_ss.f, 73]     DRAG_SS
    Use   [drag_ss.f, 88]              DRAG_SS
    Use   [drag_ss.f, 88]              DRAG_SS
    Use   [drag_ss.f, 89]              DRAG_SS
    Use   [drag_ss.f, 89]              DRAG_SS
    Use   [drag_ss.f, 90]              DRAG_SS
    Use   [drag_ss.f, 90]              DRAG_SS
    Use   [drag_ss.f, 102]             DRAG_SS
    Use   [drag_ss.f, 104]             DRAG_SS
    Use   [drag_ss.f, 124]             DRAG_SS
    Use   [drag_ss.f, 130]             DRAG_SS
    Use   [drag_ss.f, 135]             DRAG_SS

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [drag_ss.f, 234]          DRAG_SS_IA
    Declare   [drag_ss.f, 257]         DRAG_SS_IA
    Use Argument   [drag_ss.f, 282]    DRAG_SS_IA
    Use   [drag_ss.f, 284]             DRAG_SS_IA
    Use   [drag_ss.f, 286]             DRAG_SS_IA
    Use   [drag_ss.f, 287]             DRAG_SS_IA
    Use   [drag_ss.f, 288]             DRAG_SS_IA
    Use   [drag_ss.f, 292]             DRAG_SS_IA
    Use   [drag_ss.f, 295]             DRAG_SS_IA
    Use   [drag_ss.f, 299]             DRAG_SS_IA
    Use   [drag_ss.f, 301]             DRAG_SS_IA
    Use   [drag_ss.f, 303]             DRAG_SS_IA
    Use   [drag_ss.f, 305]             DRAG_SS_IA
    Use   [drag_ss.f, 307]             DRAG_SS_IA
    Use   [drag_ss.f, 331]             DRAG_SS_IA
    Use   [drag_ss.f, 336]             DRAG_SS_IA
    Use   [drag_ss.f, 341]             DRAG_SS_IA
    Use   [drag_ss.f, 346]             DRAG_SS_IA
    Use   [drag_ss.f, 348]             DRAG_SS_IA
    Use   [drag_ss.f, 355]             DRAG_SS_IA
    Use   [drag_ss.f, 363]             DRAG_SS_IA
    Use   [drag_ss.f, 368]             DRAG_SS_IA
    Use   [drag_ss.f, 370]             DRAG_SS_IA
    Use   [drag_ss.f, 373]             DRAG_SS_IA
    Use   [drag_ss.f, 374]             DRAG_SS_IA
    Use   [drag_ss.f, 375]             DRAG_SS_IA

L    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 39]       CFNEWVALUES
    Set   [cfnewvalues.f, 57]          CFNEWVALUES
    Use Argument   [cfnewvalues.f, 58]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 59]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 59]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 60]   CFNEWVALUES
    Use   [cfnewvalues.f, 61]          CFNEWVALUES
    Use   [cfnewvalues.f, 61]          CFNEWVALUES
    Use   [cfnewvalues.f, 61]          CFNEWVALUES
    Use   [cfnewvalues.f, 62]          CFNEWVALUES
    Use   [cfnewvalues.f, 62]          CFNEWVALUES
    Set   [cfnewvalues.f, 75]          CFNEWVALUES
    Use Argument   [cfnewvalues.f, 77]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 79]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 79]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 79]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 84]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 84]   CFNEWVALUES
    Use   [cfnewvalues.f, 85]          CFNEWVALUES
    Use   [cfnewvalues.f, 85]          CFNEWVALUES
    Use   [cfnewvalues.f, 85]          CFNEWVALUES
    Use   [cfnewvalues.f, 87]          CFNEWVALUES
    Use   [cfnewvalues.f, 88]          CFNEWVALUES
    Use   [cfnewvalues.f, 94]          CFNEWVALUES
    Use   [cfnewvalues.f, 94]          CFNEWVALUES
    Use   [cfnewvalues.f, 94]          CFNEWVALUES
    Use   [cfnewvalues.f, 95]          CFNEWVALUES
    Use   [cfnewvalues.f, 96]          CFNEWVALUES
    Use   [cfnewvalues.f, 96]          CFNEWVALUES
    Use   [cfnewvalues.f, 97]          CFNEWVALUES
    Use   [cfnewvalues.f, 97]          CFNEWVALUES
    Use   [cfnewvalues.f, 97]          CFNEWVALUES
    Use   [cfnewvalues.f, 97]          CFNEWVALUES
    Use   [cfnewvalues.f, 101]         CFNEWVALUES
    Use   [cfnewvalues.f, 101]         CFNEWVALUES
    Use   [cfnewvalues.f, 102]         CFNEWVALUES
    Use   [cfnewvalues.f, 102]         CFNEWVALUES
    Use   [cfnewvalues.f, 103]         CFNEWVALUES
    Use   [cfnewvalues.f, 103]         CFNEWVALUES
    Use   [cfnewvalues.f, 104]         CFNEWVALUES
    Use   [cfnewvalues.f, 104]         CFNEWVALUES
    Use   [cfnewvalues.f, 104]         CFNEWVALUES
    Use   [cfnewvalues.f, 105]         CFNEWVALUES
    Use   [cfnewvalues.f, 105]         CFNEWVALUES
    Use   [cfnewvalues.f, 106]         CFNEWVALUES
    Use   [cfnewvalues.f, 106]         CFNEWVALUES
    Use   [cfnewvalues.f, 107]         CFNEWVALUES
    Use   [cfnewvalues.f, 107]         CFNEWVALUES
    Use   [cfnewvalues.f, 108]         CFNEWVALUES
    Use   [cfnewvalues.f, 108]         CFNEWVALUES
    Use   [cfnewvalues.f, 108]         CFNEWVALUES
    Use   [cfnewvalues.f, 116]         CFNEWVALUES
    Use   [cfnewvalues.f, 116]         CFNEWVALUES
    Use   [cfnewvalues.f, 116]         CFNEWVALUES
    Use   [cfnewvalues.f, 120]         CFNEWVALUES
    Use   [cfnewvalues.f, 123]         CFNEWVALUES
    Use   [cfnewvalues.f, 123]         CFNEWVALUES
    Use   [cfnewvalues.f, 124]         CFNEWVALUES
    Use   [cfnewvalues.f, 125]         CFNEWVALUES
    Use   [cfnewvalues.f, 131]         CFNEWVALUES
    Use   [cfnewvalues.f, 132]         CFNEWVALUES
    Use   [cfnewvalues.f, 132]         CFNEWVALUES
    Use   [cfnewvalues.f, 134]         CFNEWVALUES
    Use   [cfnewvalues.f, 136]         CFNEWVALUES
    Use   [cfnewvalues.f, 138]         CFNEWVALUES
    Use   [cfnewvalues.f, 147]         CFNEWVALUES
    Use   [cfnewvalues.f, 147]         CFNEWVALUES
    Use   [cfnewvalues.f, 149]         CFNEWVALUES
    Use   [cfnewvalues.f, 154]         CFNEWVALUES
    Use   [cfnewvalues.f, 155]         CFNEWVALUES

L    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 493]      CFNEWVALUES_MPPIC
    Set   [cfnewvalues.f, 552]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 556]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 558]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 558]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 558]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 562]   CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 563]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 563]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 563]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 565]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 568]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 575]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 575]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 579]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 580]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 582]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 588]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 588]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 589]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 591]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 595]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 601]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 613]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 613]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 613]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 614]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 617]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 617]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 617]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 620]   CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 622]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 622]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 631]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 634]   CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 636]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 645]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 647]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 647]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 658]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 658]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 661]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 663]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 663]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 667]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 668]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 670]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 673]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 673]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 674]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 674]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 676]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 676]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 686]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 686]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 687]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 688]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 689]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 690]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 692]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 692]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 694]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 695]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 696]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 697]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 713]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 716]   CFNEWVALUES_MPPIC

L    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 206]      CFNEWVALUES_MPPIC_SNIDER
    Set   [cfnewvalues.f, 255]         CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 259]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 261]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 261]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 261]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 274]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 274]   CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 275]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 275]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 275]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 277]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 285]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 285]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 290]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 291]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 295]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 303]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 303]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 304]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 308]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 308]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 308]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 315]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 319]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 323]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 327]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 334]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 334]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 335]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 337]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 337]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 339]         CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 350]   CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 352]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 359]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 360]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 360]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 365]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 369]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 372]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 372]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 374]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 375]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 377]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 380]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 380]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 381]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 381]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 383]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 383]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 393]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 393]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 394]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 394]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 403]         CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 406]   CFNEWVALUES_MPPIC_SNIDER

L    (Local Variable)  Declared as: INTEGER
    Define   [write_out0.f, 51]        WRITE_OUT0
    Set   [write_out0.f, 162]          WRITE_OUT0
    Use   [write_out0.f, 163]          WRITE_OUT0
    Use   [write_out0.f, 163]          WRITE_OUT0
    Use   [write_out0.f, 186]          WRITE_OUT0
    Use   [write_out0.f, 186]          WRITE_OUT0
    Use   [write_out0.f, 187]          WRITE_OUT0
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 189]          WRITE_OUT0
    Set   [write_out0.f, 189]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use   [write_out0.f, 192]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use   [write_out0.f, 194]          WRITE_OUT0
    Set   [write_out0.f, 194]          WRITE_OUT0
    Set   [write_out0.f, 197]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Set   [write_out0.f, 419]          WRITE_OUT0
    Use   [write_out0.f, 420]          WRITE_OUT0
    Use   [write_out0.f, 421]          WRITE_OUT0
    Use   [write_out0.f, 422]          WRITE_OUT0
    Use   [write_out0.f, 422]          WRITE_OUT0
    Use   [write_out0.f, 423]          WRITE_OUT0
    Use   [write_out0.f, 423]          WRITE_OUT0
    Use   [write_out0.f, 424]          WRITE_OUT0
    Use   [write_out0.f, 424]          WRITE_OUT0
    Use   [write_out0.f, 425]          WRITE_OUT0
    Use   [write_out0.f, 425]          WRITE_OUT0
    Use   [write_out0.f, 426]          WRITE_OUT0
    Use   [write_out0.f, 426]          WRITE_OUT0
    Use   [write_out0.f, 427]          WRITE_OUT0
    Use   [write_out0.f, 427]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Use   [write_out0.f, 431]          WRITE_OUT0
    Use   [write_out0.f, 431]          WRITE_OUT0
    Use   [write_out0.f, 431]          WRITE_OUT0
    Use   [write_out0.f, 431]          WRITE_OUT0
    Use   [write_out0.f, 432]          WRITE_OUT0
    Use   [write_out0.f, 432]          WRITE_OUT0
    Use   [write_out0.f, 433]          WRITE_OUT0
    Use   [write_out0.f, 434]          WRITE_OUT0
    Use   [write_out0.f, 434]          WRITE_OUT0
    Use   [write_out0.f, 435]          WRITE_OUT0
    Use   [write_out0.f, 439]          WRITE_OUT0
    Use   [write_out0.f, 442]          WRITE_OUT0
    Use   [write_out0.f, 442]          WRITE_OUT0
    Use   [write_out0.f, 443]          WRITE_OUT0
    Use   [write_out0.f, 445]          WRITE_OUT0
    Use   [write_out0.f, 445]          WRITE_OUT0
    Use   [write_out0.f, 445]          WRITE_OUT0
    Use   [write_out0.f, 447]          WRITE_OUT0
    Use   [write_out0.f, 448]          WRITE_OUT0
    Use   [write_out0.f, 456]          WRITE_OUT0
    Use   [write_out0.f, 461]          WRITE_OUT0
    Use   [write_out0.f, 462]          WRITE_OUT0
    Use   [write_out0.f, 462]          WRITE_OUT0
    Use   [write_out0.f, 464]          WRITE_OUT0
    Use   [write_out0.f, 464]          WRITE_OUT0
    Use   [write_out0.f, 464]          WRITE_OUT0
    Use   [write_out0.f, 466]          WRITE_OUT0
    Use   [write_out0.f, 466]          WRITE_OUT0
    Use   [write_out0.f, 467]          WRITE_OUT0
    Use   [write_out0.f, 467]          WRITE_OUT0
    Set   [write_out0.f, 484]          WRITE_OUT0
    Use   [write_out0.f, 485]          WRITE_OUT0
    Use   [write_out0.f, 486]          WRITE_OUT0
    Use   [write_out0.f, 487]          WRITE_OUT0
    Use   [write_out0.f, 488]          WRITE_OUT0
    Use   [write_out0.f, 506]          WRITE_OUT0
    Use   [write_out0.f, 507]          WRITE_OUT0
    Use   [write_out0.f, 507]          WRITE_OUT0
    Use   [write_out0.f, 508]          WRITE_OUT0
    Use   [write_out0.f, 508]          WRITE_OUT0
    Use   [write_out0.f, 509]          WRITE_OUT0
    Use   [write_out0.f, 509]          WRITE_OUT0
    Use   [write_out0.f, 510]          WRITE_OUT0
    Use   [write_out0.f, 510]          WRITE_OUT0
    Use   [write_out0.f, 511]          WRITE_OUT0
    Use   [write_out0.f, 511]          WRITE_OUT0
    Use   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Use   [write_out0.f, 516]          WRITE_OUT0
    Use   [write_out0.f, 516]          WRITE_OUT0
    Use   [write_out0.f, 516]          WRITE_OUT0
    Use   [write_out0.f, 516]          WRITE_OUT0
    Use   [write_out0.f, 517]          WRITE_OUT0
    Use   [write_out0.f, 517]          WRITE_OUT0
    Use   [write_out0.f, 519]          WRITE_OUT0
    Use   [write_out0.f, 521]          WRITE_OUT0
    Use   [write_out0.f, 521]          WRITE_OUT0
    Use   [write_out0.f, 522]          WRITE_OUT0
    Use   [write_out0.f, 522]          WRITE_OUT0
    Use   [write_out0.f, 523]          WRITE_OUT0
    Use   [write_out0.f, 523]          WRITE_OUT0
    Use   [write_out0.f, 524]          WRITE_OUT0
    Use   [write_out0.f, 527]          WRITE_OUT0
    Use   [write_out0.f, 530]          WRITE_OUT0
    Use   [write_out0.f, 531]          WRITE_OUT0
    Use   [write_out0.f, 532]          WRITE_OUT0
    Use   [write_out0.f, 533]          WRITE_OUT0
    Use   [write_out0.f, 534]          WRITE_OUT0
    Use   [write_out0.f, 534]          WRITE_OUT0
    Use   [write_out0.f, 535]          WRITE_OUT0
    Use   [write_out0.f, 535]          WRITE_OUT0
    Use   [write_out0.f, 536]          WRITE_OUT0
    Use   [write_out0.f, 536]          WRITE_OUT0
    Use   [write_out0.f, 537]          WRITE_OUT0
    Use   [write_out0.f, 538]          WRITE_OUT0
    Use   [write_out0.f, 539]          WRITE_OUT0
    Use   [write_out0.f, 539]          WRITE_OUT0
    Use   [write_out0.f, 539]          WRITE_OUT0
    Use   [write_out0.f, 540]          WRITE_OUT0
    Use   [write_out0.f, 540]          WRITE_OUT0
    Use   [write_out0.f, 540]          WRITE_OUT0
    Use   [write_out0.f, 542]          WRITE_OUT0
    Use   [write_out0.f, 546]          WRITE_OUT0
    Use   [write_out0.f, 548]          WRITE_OUT0
    Use   [write_out0.f, 549]          WRITE_OUT0
    Use   [write_out0.f, 553]          WRITE_OUT0
    Use   [write_out0.f, 557]          WRITE_OUT0
    Use   [write_out0.f, 563]          WRITE_OUT0
    Use   [write_out0.f, 564]          WRITE_OUT0
    Use   [write_out0.f, 565]          WRITE_OUT0
    Use   [write_out0.f, 566]          WRITE_OUT0
    Use   [write_out0.f, 567]          WRITE_OUT0
    Use   [write_out0.f, 567]          WRITE_OUT0
    Use   [write_out0.f, 568]          WRITE_OUT0
    Use   [write_out0.f, 568]          WRITE_OUT0
    Use   [write_out0.f, 569]          WRITE_OUT0
    Use   [write_out0.f, 569]          WRITE_OUT0
    Use   [write_out0.f, 571]          WRITE_OUT0
    Use   [write_out0.f, 572]          WRITE_OUT0
    Use   [write_out0.f, 572]          WRITE_OUT0
    Use   [write_out0.f, 572]          WRITE_OUT0
    Use   [write_out0.f, 573]          WRITE_OUT0
    Use   [write_out0.f, 575]          WRITE_OUT0
    Use   [write_out0.f, 575]          WRITE_OUT0
    Use   [write_out0.f, 576]          WRITE_OUT0
    Use   [write_out0.f, 576]          WRITE_OUT0
    Set   [write_out0.f, 582]          WRITE_OUT0
    Use   [write_out0.f, 583]          WRITE_OUT0
    Use   [write_out0.f, 584]          WRITE_OUT0
    Use   [write_out0.f, 585]          WRITE_OUT0
    Use   [write_out0.f, 586]          WRITE_OUT0
    Use   [write_out0.f, 587]          WRITE_OUT0
    Use   [write_out0.f, 589]          WRITE_OUT0
    Use   [write_out0.f, 590]          WRITE_OUT0
    Use   [write_out0.f, 593]          WRITE_OUT0
    Use   [write_out0.f, 593]          WRITE_OUT0
    Use   [write_out0.f, 594]          WRITE_OUT0
    Use   [write_out0.f, 594]          WRITE_OUT0
    Use   [write_out0.f, 595]          WRITE_OUT0
    Use   [write_out0.f, 595]          WRITE_OUT0
    Use   [write_out0.f, 596]          WRITE_OUT0
    Use   [write_out0.f, 596]          WRITE_OUT0
    Use   [write_out0.f, 597]          WRITE_OUT0
    Use   [write_out0.f, 597]          WRITE_OUT0
    Use   [write_out0.f, 598]          WRITE_OUT0
    Use   [write_out0.f, 598]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0
    Use   [write_out0.f, 602]          WRITE_OUT0
    Use   [write_out0.f, 602]          WRITE_OUT0
    Use   [write_out0.f, 602]          WRITE_OUT0
    Use   [write_out0.f, 602]          WRITE_OUT0
    Use   [write_out0.f, 603]          WRITE_OUT0
    Use   [write_out0.f, 603]          WRITE_OUT0
    Use   [write_out0.f, 604]          WRITE_OUT0
    Use   [write_out0.f, 604]          WRITE_OUT0
    Use   [write_out0.f, 605]          WRITE_OUT0
    Use   [write_out0.f, 605]          WRITE_OUT0
    Use   [write_out0.f, 607]          WRITE_OUT0

L    (Local Variable)  Declared as: INTEGER
    Define   [write_out0.f, 958]       LOCATION
    Set   [write_out0.f, 962]          LOCATION
    Set   [write_out0.f, 970]          LOCATION

L    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 36]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 224]     MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 226]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 227]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 227]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 227]   MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 228]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 228]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 229]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 229]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 229]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 230]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 230]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 230]     MAKE_ARRAYS_DES

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_set_bc0.f, 65]        CG_SET_BC0
    Set   [CG_set_bc0.f, 100]          CG_SET_BC0
    Use   [CG_set_bc0.f, 102]          CG_SET_BC0
    Use   [CG_set_bc0.f, 103]          CG_SET_BC0
    Use   [CG_set_bc0.f, 106]          CG_SET_BC0
    Use   [CG_set_bc0.f, 108]          CG_SET_BC0
    Use   [CG_set_bc0.f, 108]          CG_SET_BC0
    Use   [CG_set_bc0.f, 109]          CG_SET_BC0
    Use   [CG_set_bc0.f, 110]          CG_SET_BC0
    Use   [CG_set_bc0.f, 117]          CG_SET_BC0
    Use   [CG_set_bc0.f, 118]          CG_SET_BC0
    Use   [CG_set_bc0.f, 123]          CG_SET_BC0
    Use   [CG_set_bc0.f, 124]          CG_SET_BC0
    Use   [CG_set_bc0.f, 128]          CG_SET_BC0
    Use   [CG_set_bc0.f, 128]          CG_SET_BC0
    Use   [CG_set_bc0.f, 129]          CG_SET_BC0
    Use   [CG_set_bc0.f, 129]          CG_SET_BC0
    Use   [CG_set_bc0.f, 133]          CG_SET_BC0
    Use   [CG_set_bc0.f, 133]          CG_SET_BC0
    Use   [CG_set_bc0.f, 134]          CG_SET_BC0
    Use   [CG_set_bc0.f, 134]          CG_SET_BC0
    Use   [CG_set_bc0.f, 135]          CG_SET_BC0
    Use   [CG_set_bc0.f, 135]          CG_SET_BC0
    Use   [CG_set_bc0.f, 138]          CG_SET_BC0
    Use   [CG_set_bc0.f, 139]          CG_SET_BC0
    Use   [CG_set_bc0.f, 144]          CG_SET_BC0
    Use   [CG_set_bc0.f, 148]          CG_SET_BC0
    Use   [CG_set_bc0.f, 149]          CG_SET_BC0
    Use   [CG_set_bc0.f, 150]          CG_SET_BC0
    Use   [CG_set_bc0.f, 153]          CG_SET_BC0
    Use   [CG_set_bc0.f, 157]          CG_SET_BC0
    Use   [CG_set_bc0.f, 161]          CG_SET_BC0
    Use   [CG_set_bc0.f, 162]          CG_SET_BC0
    Use   [CG_set_bc0.f, 166]          CG_SET_BC0
    Use   [CG_set_bc0.f, 167]          CG_SET_BC0
    Use   [CG_set_bc0.f, 168]          CG_SET_BC0
    Use   [CG_set_bc0.f, 171]          CG_SET_BC0
    Use   [CG_set_bc0.f, 176]          CG_SET_BC0
    Use   [CG_set_bc0.f, 177]          CG_SET_BC0
    Use   [CG_set_bc0.f, 179]          CG_SET_BC0
    Use   [CG_set_bc0.f, 183]          CG_SET_BC0
    Use   [CG_set_bc0.f, 184]          CG_SET_BC0
    Use   [CG_set_bc0.f, 186]          CG_SET_BC0
    Use   [CG_set_bc0.f, 189]          CG_SET_BC0
    Use   [CG_set_bc0.f, 190]          CG_SET_BC0
    Use   [CG_set_bc0.f, 192]          CG_SET_BC0
    Use   [CG_set_bc0.f, 200]          CG_SET_BC0
    Use   [CG_set_bc0.f, 201]          CG_SET_BC0
    Use   [CG_set_bc0.f, 203]          CG_SET_BC0
    Use   [CG_set_bc0.f, 208]          CG_SET_BC0
    Use   [CG_set_bc0.f, 209]          CG_SET_BC0
    Use   [CG_set_bc0.f, 211]          CG_SET_BC0
    Use   [CG_set_bc0.f, 216]          CG_SET_BC0
    Use   [CG_set_bc0.f, 217]          CG_SET_BC0
    Use   [CG_set_bc0.f, 219]          CG_SET_BC0
    Use   [CG_set_bc0.f, 228]          CG_SET_BC0
    Use   [CG_set_bc0.f, 229]          CG_SET_BC0
    Use   [CG_set_bc0.f, 231]          CG_SET_BC0
    Use   [CG_set_bc0.f, 234]          CG_SET_BC0
    Use   [CG_set_bc0.f, 235]          CG_SET_BC0
    Use   [CG_set_bc0.f, 237]          CG_SET_BC0
    Use   [CG_set_bc0.f, 240]          CG_SET_BC0
    Use   [CG_set_bc0.f, 241]          CG_SET_BC0
    Use   [CG_set_bc0.f, 243]          CG_SET_BC0
    Use   [CG_set_bc0.f, 251]          CG_SET_BC0
    Use   [CG_set_bc0.f, 252]          CG_SET_BC0
    Use   [CG_set_bc0.f, 254]          CG_SET_BC0
    Use   [CG_set_bc0.f, 259]          CG_SET_BC0
    Use   [CG_set_bc0.f, 260]          CG_SET_BC0
    Use   [CG_set_bc0.f, 262]          CG_SET_BC0
    Use   [CG_set_bc0.f, 267]          CG_SET_BC0
    Use   [CG_set_bc0.f, 268]          CG_SET_BC0
    Use   [CG_set_bc0.f, 270]          CG_SET_BC0

L    (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, 107]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 108]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 109]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 110]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 111]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 117]   GET_CUT_CELL_VOLUME_AND_AREAS

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 43]          DIF_V_IS
    Set   [dif_v_is.f, 53]             DIF_V_IS
    Use   [dif_v_is.f, 54]             DIF_V_IS
    Use   [dif_v_is.f, 55]             DIF_V_IS
    Use   [dif_v_is.f, 56]             DIF_V_IS
    Use   [dif_v_is.f, 57]             DIF_V_IS
    Use   [dif_v_is.f, 58]             DIF_V_IS
    Use   [dif_v_is.f, 59]             DIF_V_IS
    Use   [dif_v_is.f, 60]             DIF_V_IS
    Use   [dif_v_is.f, 62]             DIF_V_IS
    Use   [dif_v_is.f, 84]             DIF_V_IS

L    (Local Variable)  Declared as: INTEGER
    Define   [parse_resid_string.f, 51]   PARSE_RESID_STRING
    Set   [parse_resid_string.f, 84]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 85]   PARSE_RESID_STRING
    Set   [parse_resid_string.f, 97]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 98]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 102]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 103]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 110]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 110]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 112]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 112]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 114]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 114]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 119]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 119]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 122]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 122]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 126]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 126]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 127]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 128]   PARSE_RESID_STRING

L    (Local Variable)  Declared as: INTEGER
    Define   [write_res0.f, 60]        WRITE_RES0
    Set   [write_res0.f, 111]          WRITE_RES0
    Use   [write_res0.f, 112]          WRITE_RES0
    Use   [write_res0.f, 112]          WRITE_RES0
    Use   [write_res0.f, 113]          WRITE_RES0
    Use   [write_res0.f, 113]          WRITE_RES0
    Use   [write_res0.f, 120]          WRITE_RES0
    Set   [write_res0.f, 120]          WRITE_RES0
    Use   [write_res0.f, 137]          WRITE_RES0
    Set   [write_res0.f, 137]          WRITE_RES0
    Use   [write_res0.f, 137]          WRITE_RES0
    Set   [write_res0.f, 137]          WRITE_RES0

L    (Local Variable)  Declared as: INTEGER
    Define   [make_upper_case.f, 55]   MAKE_UPPER_CASE
    Set   [make_upper_case.f, 64]      MAKE_UPPER_CASE
    Use   [make_upper_case.f, 65]      MAKE_UPPER_CASE
    Use   [make_upper_case.f, 65]      MAKE_UPPER_CASE
    Use   [make_upper_case.f, 68]      MAKE_UPPER_CASE
    Use   [make_upper_case.f, 68]      MAKE_UPPER_CASE

L    (Local Variable)  Declared as: INTEGER
    Define   [make_upper_case.f, 115]   REPLACE_TAB
    Set   [make_upper_case.f, 120]     REPLACE_TAB
    Use   [make_upper_case.f, 121]     REPLACE_TAB
    Use   [make_upper_case.f, 121]     REPLACE_TAB
    Use   [make_upper_case.f, 121]     REPLACE_TAB
    Use   [make_upper_case.f, 121]     REPLACE_TAB
    Use   [make_upper_case.f, 122]     REPLACE_TAB
    Use   [make_upper_case.f, 122]     REPLACE_TAB
    Use   [make_upper_case.f, 122]     REPLACE_TAB
    Use   [make_upper_case.f, 122]     REPLACE_TAB

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 70]   PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 96]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 97]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 97]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 98]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 98]     PARTIAL_ELIM_GHD_U
    Use Argument   [partial_elim_ghd.f, 99]   PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 104]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 107]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 107]    PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 140]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 141]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 141]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 147]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 149]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 151]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 156]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 156]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 158]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 158]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 159]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 159]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 159]    PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 167]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 168]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 168]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 169]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 170]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 171]    PARTIAL_ELIM_GHD_U
    Use Argument   [partial_elim_ghd.f, 175]   PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 180]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 181]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 182]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 182]    PARTIAL_ELIM_GHD_U

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 269]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 298]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 299]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 299]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 300]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 300]    PARTIAL_ELIM_GHD_V
    Use Argument   [partial_elim_ghd.f, 301]   PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 305]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 308]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 308]    PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 339]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 340]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 340]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 346]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 348]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 350]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 355]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 355]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 357]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 357]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 358]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 358]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 358]    PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 366]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 367]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 367]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 368]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 369]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 370]    PARTIAL_ELIM_GHD_V
    Use Argument   [partial_elim_ghd.f, 374]   PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 378]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 379]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 380]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 380]    PARTIAL_ELIM_GHD_V

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 461]   PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 488]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 489]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 489]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 490]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 490]    PARTIAL_ELIM_GHD_W
    Use Argument   [partial_elim_ghd.f, 491]   PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 495]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 498]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 498]    PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 529]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 530]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 530]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 536]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 538]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 540]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 546]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 546]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 548]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 548]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 549]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 549]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 549]    PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 557]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 558]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 558]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 559]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 560]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 561]    PARTIAL_ELIM_GHD_W
    Use Argument   [partial_elim_ghd.f, 565]   PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 569]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 570]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 571]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 571]    PARTIAL_ELIM_GHD_W

L    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 741]       write_mesh_netcdf
    Set   [write_spx1.f, 779]          write_mesh_netcdf
    Use   [write_spx1.f, 780]          write_mesh_netcdf
    Use   [write_spx1.f, 780]          write_mesh_netcdf
    Use   [write_spx1.f, 780]          write_mesh_netcdf
    Set   [write_spx1.f, 784]          write_mesh_netcdf
    Use   [write_spx1.f, 785]          write_mesh_netcdf
    Use   [write_spx1.f, 785]          write_mesh_netcdf
    Use   [write_spx1.f, 785]          write_mesh_netcdf
    Set   [write_spx1.f, 789]          write_mesh_netcdf
    Use   [write_spx1.f, 790]          write_mesh_netcdf
    Use   [write_spx1.f, 790]          write_mesh_netcdf
    Use   [write_spx1.f, 790]          write_mesh_netcdf

L    (Dummy Argument)  Declared as: INTEGER
    Define   [write_spx1.f, 848]       write_netcdf
    Declare   [write_spx1.f, 869]      write_netcdf

L    (Dummy Argument)  Declared as: INTEGER
    Define   [write_spx1.f, 25]        WRITE_SPX1
    Declare   [write_spx1.f, 62]       WRITE_SPX1
    Use   [write_spx1.f, 109]          WRITE_SPX1
    Use   [write_spx1.f, 112]          WRITE_SPX1
    Use   [write_spx1.f, 114]          WRITE_SPX1
    Use   [write_spx1.f, 134]          WRITE_SPX1
    Use   [write_spx1.f, 136]          WRITE_SPX1
    Use   [write_spx1.f, 140]          WRITE_SPX1
    Use   [write_spx1.f, 144]          WRITE_SPX1
    Use   [write_spx1.f, 145]          WRITE_SPX1
    Use   [write_spx1.f, 168]          WRITE_SPX1
    Use   [write_spx1.f, 170]          WRITE_SPX1
    Use   [write_spx1.f, 176]          WRITE_SPX1
    Use   [write_spx1.f, 178]          WRITE_SPX1
    Use   [write_spx1.f, 180]          WRITE_SPX1
    Use   [write_spx1.f, 181]          WRITE_SPX1
    Use   [write_spx1.f, 186]          WRITE_SPX1
    Use   [write_spx1.f, 187]          WRITE_SPX1
    Use   [write_spx1.f, 191]          WRITE_SPX1
    Use   [write_spx1.f, 192]          WRITE_SPX1
    Use   [write_spx1.f, 200]          WRITE_SPX1
    Use   [write_spx1.f, 202]          WRITE_SPX1
    Use   [write_spx1.f, 208]          WRITE_SPX1
    Use   [write_spx1.f, 210]          WRITE_SPX1
    Use   [write_spx1.f, 212]          WRITE_SPX1
    Use   [write_spx1.f, 214]          WRITE_SPX1
    Use   [write_spx1.f, 215]          WRITE_SPX1
    Use   [write_spx1.f, 216]          WRITE_SPX1
    Use   [write_spx1.f, 222]          WRITE_SPX1
    Use   [write_spx1.f, 223]          WRITE_SPX1
    Use   [write_spx1.f, 224]          WRITE_SPX1
    Use   [write_spx1.f, 228]          WRITE_SPX1
    Use   [write_spx1.f, 229]          WRITE_SPX1
    Use   [write_spx1.f, 237]          WRITE_SPX1
    Use   [write_spx1.f, 239]          WRITE_SPX1
    Use   [write_spx1.f, 246]          WRITE_SPX1
    Use   [write_spx1.f, 248]          WRITE_SPX1
    Use   [write_spx1.f, 250]          WRITE_SPX1
    Use   [write_spx1.f, 252]          WRITE_SPX1
    Use   [write_spx1.f, 253]          WRITE_SPX1
    Use   [write_spx1.f, 254]          WRITE_SPX1
    Use   [write_spx1.f, 264]          WRITE_SPX1
    Use   [write_spx1.f, 265]          WRITE_SPX1
    Use   [write_spx1.f, 266]          WRITE_SPX1
    Use   [write_spx1.f, 271]          WRITE_SPX1
    Use   [write_spx1.f, 272]          WRITE_SPX1
    Use   [write_spx1.f, 280]          WRITE_SPX1
    Use   [write_spx1.f, 282]          WRITE_SPX1
    Use   [write_spx1.f, 289]          WRITE_SPX1
    Use   [write_spx1.f, 291]          WRITE_SPX1
    Use   [write_spx1.f, 299]          WRITE_SPX1
    Use   [write_spx1.f, 304]          WRITE_SPX1
    Use   [write_spx1.f, 305]          WRITE_SPX1
    Use   [write_spx1.f, 313]          WRITE_SPX1
    Use   [write_spx1.f, 315]          WRITE_SPX1
    Use   [write_spx1.f, 321]          WRITE_SPX1
    Use   [write_spx1.f, 324]          WRITE_SPX1
    Use   [write_spx1.f, 327]          WRITE_SPX1
    Use   [write_spx1.f, 329]          WRITE_SPX1
    Use   [write_spx1.f, 337]          WRITE_SPX1
    Use   [write_spx1.f, 339]          WRITE_SPX1
    Use   [write_spx1.f, 344]          WRITE_SPX1
    Use   [write_spx1.f, 345]          WRITE_SPX1
    Use   [write_spx1.f, 352]          WRITE_SPX1
    Use   [write_spx1.f, 354]          WRITE_SPX1
    Use   [write_spx1.f, 361]          WRITE_SPX1
    Use   [write_spx1.f, 366]          WRITE_SPX1
    Use   [write_spx1.f, 371]          WRITE_SPX1
    Use   [write_spx1.f, 375]          WRITE_SPX1
    Use   [write_spx1.f, 391]          WRITE_SPX1
    Use   [write_spx1.f, 395]          WRITE_SPX1
    Use   [write_spx1.f, 401]          WRITE_SPX1
    Use   [write_spx1.f, 402]          WRITE_SPX1
    Use   [write_spx1.f, 410]          WRITE_SPX1
    Use   [write_spx1.f, 412]          WRITE_SPX1
    Use   [write_spx1.f, 419]          WRITE_SPX1
    Use   [write_spx1.f, 423]          WRITE_SPX1
    Use   [write_spx1.f, 431]          WRITE_SPX1
    Use   [write_spx1.f, 436]          WRITE_SPX1
    Use   [write_spx1.f, 437]          WRITE_SPX1
    Use   [write_spx1.f, 445]          WRITE_SPX1
    Use   [write_spx1.f, 447]          WRITE_SPX1
    Use   [write_spx1.f, 454]          WRITE_SPX1
    Use   [write_spx1.f, 458]          WRITE_SPX1
    Use   [write_spx1.f, 466]          WRITE_SPX1
    Use   [write_spx1.f, 471]          WRITE_SPX1
    Use   [write_spx1.f, 472]          WRITE_SPX1
    Use   [write_spx1.f, 479]          WRITE_SPX1
    Use   [write_spx1.f, 481]          WRITE_SPX1
    Use   [write_spx1.f, 488]          WRITE_SPX1
    Use   [write_spx1.f, 492]          WRITE_SPX1
    Use   [write_spx1.f, 500]          WRITE_SPX1
    Use   [write_spx1.f, 505]          WRITE_SPX1
    Use   [write_spx1.f, 506]          WRITE_SPX1
    Use   [write_spx1.f, 513]          WRITE_SPX1
    Use   [write_spx1.f, 515]          WRITE_SPX1
    Use   [write_spx1.f, 522]          WRITE_SPX1
    Use   [write_spx1.f, 524]          WRITE_SPX1
    Use   [write_spx1.f, 526]          WRITE_SPX1
    Use   [write_spx1.f, 527]          WRITE_SPX1
    Use   [write_spx1.f, 533]          WRITE_SPX1
    Use   [write_spx1.f, 534]          WRITE_SPX1
    Use   [write_spx1.f, 540]          WRITE_SPX1
    Use   [write_spx1.f, 541]          WRITE_SPX1

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_s.f, 62]     CG_SOURCE_U_S
    Set   [CG_source_u_s.f, 109]       CG_SOURCE_U_S
    Use   [CG_source_u_s.f, 110]       CG_SOURCE_U_S
    Use   [CG_source_u_s.f, 110]       CG_SOURCE_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 27]           NSQUARE
    Set   [nsquare.f, 41]              NSQUARE
    Use   [nsquare.f, 43]              NSQUARE
    Use   [nsquare.f, 44]              NSQUARE
    Use   [nsquare.f, 44]              NSQUARE
    Use   [nsquare.f, 44]              NSQUARE
    Use Argument   [nsquare.f, 47]     NSQUARE
    Use   [nsquare.f, 50]              NSQUARE
    Use   [nsquare.f, 55]              NSQUARE
    Use   [nsquare.f, 69]              NSQUARE
    Use   [nsquare.f, 72]              NSQUARE
    Use   [nsquare.f, 78]              NSQUARE
    Use   [nsquare.f, 81]              NSQUARE
    Use   [nsquare.f, 89]              NSQUARE
    Use   [nsquare.f, 92]              NSQUARE
    Use   [nsquare.f, 109]             NSQUARE
    Use   [nsquare.f, 114]             NSQUARE
    Use   [nsquare.f, 122]             NSQUARE
    Use   [nsquare.f, 128]             NSQUARE

L    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m.f, 49]        WRITE_AB_M
    Set   [write_ab_m.f, 97]           WRITE_AB_M
    Use   [write_ab_m.f, 99]           WRITE_AB_M
    Use   [write_ab_m.f, 110]          WRITE_AB_M
    Use   [write_ab_m.f, 128]          WRITE_AB_M
    Set   [write_ab_m.f, 128]          WRITE_AB_M

L    (Local Variable)  Declared as: INTEGER
    Define   [scalar_prop.f, 47]       SCALAR_PROP
    Set   [scalar_prop.f, 58]          SCALAR_PROP
    Use   [scalar_prop.f, 64]          SCALAR_PROP
    Use   [scalar_prop.f, 65]          SCALAR_PROP
    Use   [scalar_prop.f, 69]          SCALAR_PROP

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_drag.f, 45]         CALC_DRAG
    Set   [calc_drag.f, 62]            CALC_DRAG
    Use   [calc_drag.f, 63]            CALC_DRAG
    Use Argument   [calc_drag.f, 63]   CALC_DRAG
    Set   [calc_drag.f, 68]            CALC_DRAG
    Use   [calc_drag.f, 69]            CALC_DRAG
    Use Argument   [calc_drag.f, 69]   CALC_DRAG
    Set   [calc_drag.f, 85]            CALC_DRAG
    Use   [calc_drag.f, 86]            CALC_DRAG
    Use Argument   [calc_drag.f, 86]   CALC_DRAG

L    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 573]    CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 618]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 619]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 622]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 625]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 626]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 628]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 629]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 629]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 635]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 636]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 637]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 642]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 642]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 646]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 646]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 670]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 671]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 672]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 672]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 672]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 673]       CHECK_RXN_MASS_BALANCE

L    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 363]    REPORT_SPECIES_STATS
    Use   [check_data_30.f, 485]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 485]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 485]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 501]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 501]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 501]       REPORT_SPECIES_STATS

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_ghd.f, 78]        CALC_D_ghd_E
    Set   [calc_d_ghd.f, 229]          CALC_D_ghd_E
    Use   [calc_d_ghd.f, 230]          CALC_D_ghd_E
    Use   [calc_d_ghd.f, 230]          CALC_D_ghd_E

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_ghd.f, 327]       CALC_D_ghd_N
    Set   [calc_d_ghd.f, 478]          CALC_D_ghd_N
    Use   [calc_d_ghd.f, 479]          CALC_D_ghd_N
    Use   [calc_d_ghd.f, 479]          CALC_D_ghd_N

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_ghd.f, 576]       CALC_D_ghd_T
    Set   [calc_d_ghd.f, 726]          CALC_D_ghd_T
    Use   [calc_d_ghd.f, 727]          CALC_D_ghd_T
    Use   [calc_d_ghd.f, 727]          CALC_D_ghd_T

L    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 496]       PARSE_ARITH
    Set   [parse_line.f, 529]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 546]          PARSE_ARITH
    Use   [parse_line.f, 546]          PARSE_ARITH
    Use   [parse_line.f, 547]          PARSE_ARITH
    Use   [parse_line.f, 547]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Set   [parse_line.f, 555]          PARSE_ARITH
    Use   [parse_line.f, 556]          PARSE_ARITH
    Use   [parse_line.f, 556]          PARSE_ARITH
    Set   [parse_line.f, 565]          PARSE_ARITH
    Use   [parse_line.f, 566]          PARSE_ARITH
    Use   [parse_line.f, 566]          PARSE_ARITH
    Use   [parse_line.f, 566]          PARSE_ARITH
    Use   [parse_line.f, 566]          PARSE_ARITH
    Set   [parse_line.f, 573]          PARSE_ARITH
    Use   [parse_line.f, 575]          PARSE_ARITH
    Use   [parse_line.f, 575]          PARSE_ARITH
    Set   [parse_line.f, 576]          PARSE_ARITH
    Use   [parse_line.f, 576]          PARSE_ARITH

L    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m_var.f, 47]    WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 92]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 94]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 105]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 127]      WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 127]      WRITE_AB_M_VAR

L    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 48]           CALC_TAU_W_S
    Set   [tau_w_s.f, 75]              CALC_TAU_W_S
    Use   [tau_w_s.f, 76]              CALC_TAU_W_S
    Use   [tau_w_s.f, 76]              CALC_TAU_W_S

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [write_spx0.f, 9]         WRITE_SPX0
    Declare   [write_spx0.f, 33]       WRITE_SPX0
    Use   [write_spx0.f, 54]           WRITE_SPX0
    Use   [write_spx0.f, 54]           WRITE_SPX0
    Use   [write_spx0.f, 57]           WRITE_SPX0

L    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_set_bc.f, 30]      QMOMK_SET_BC
    Set   [qmomk_set_bc.f, 33]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 34]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 36]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 37]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 38]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 39]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 40]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 41]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 44]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 44]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 45]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 47]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 50]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 50]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 51]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 52]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 54]         QMOMK_SET_BC
    Use   [qmomk_set_bc.f, 55]         QMOMK_SET_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [check_convergence.f, 58]   CHECK_CONVERGENCE
    Set   [check_convergence.f, 134]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 136]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 137]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 138]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 140]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 141]   CHECK_CONVERGENCE

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_u_s.f, 967]       JJ_BC_U_S
    Declare   [source_u_s.f, 997]      JJ_BC_U_S
    Use   [source_u_s.f, 1040]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1044]   JJ_BC_U_S
    Use   [source_u_s.f, 1045]         JJ_BC_U_S
    Use   [source_u_s.f, 1050]         JJ_BC_U_S
    Use   [source_u_s.f, 1069]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1071]   JJ_BC_U_S
    Use   [source_u_s.f, 1072]         JJ_BC_U_S
    Use   [source_u_s.f, 1075]         JJ_BC_U_S
    Use   [source_u_s.f, 1092]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1094]   JJ_BC_U_S
    Use   [source_u_s.f, 1095]         JJ_BC_U_S
    Use   [source_u_s.f, 1098]         JJ_BC_U_S
    Use   [source_u_s.f, 1115]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1117]   JJ_BC_U_S
    Use   [source_u_s.f, 1118]         JJ_BC_U_S
    Use   [source_u_s.f, 1121]         JJ_BC_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 79]        SOURCE_U_S
    Set   [source_u_s.f, 147]          SOURCE_U_S
    Use   [source_u_s.f, 148]          SOURCE_U_S
    Use   [source_u_s.f, 148]          SOURCE_U_S
    Use   [source_u_s.f, 149]          SOURCE_U_S
    Use   [source_u_s.f, 150]          SOURCE_U_S
    Use   [source_u_s.f, 152]          SOURCE_U_S
    Use   [source_u_s.f, 155]          SOURCE_U_S
    Use   [source_u_s.f, 155]          SOURCE_U_S
    Set   [source_u_s.f, 203]          SOURCE_U_S
    Use   [source_u_s.f, 204]          SOURCE_U_S
    Use   [source_u_s.f, 205]          SOURCE_U_S
    Use   [source_u_s.f, 206]          SOURCE_U_S
    Use   [source_u_s.f, 207]          SOURCE_U_S
    Use   [source_u_s.f, 209]          SOURCE_U_S
    Use   [source_u_s.f, 210]          SOURCE_U_S
    Set   [source_u_s.f, 365]          SOURCE_U_S
    Use   [source_u_s.f, 366]          SOURCE_U_S
    Use   [source_u_s.f, 367]          SOURCE_U_S
    Set   [source_u_s.f, 400]          SOURCE_U_S
    Use   [source_u_s.f, 401]          SOURCE_U_S
    Use   [source_u_s.f, 401]          SOURCE_U_S
    Use   [source_u_s.f, 403]          SOURCE_U_S
    Use   [source_u_s.f, 403]          SOURCE_U_S
    Use   [source_u_s.f, 404]          SOURCE_U_S
    Set   [source_u_s.f, 412]          SOURCE_U_S
    Use   [source_u_s.f, 413]          SOURCE_U_S
    Use   [source_u_s.f, 414]          SOURCE_U_S
    Use   [source_u_s.f, 414]          SOURCE_U_S
    Use   [source_u_s.f, 416]          SOURCE_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 532]       SOURCE_U_S_BC
    Set   [source_u_s.f, 658]          SOURCE_U_S_BC
    Use   [source_u_s.f, 659]          SOURCE_U_S_BC
    Use   [source_u_s.f, 662]          SOURCE_U_S_BC
    Use   [source_u_s.f, 663]          SOURCE_U_S_BC
    Use   [source_u_s.f, 664]          SOURCE_U_S_BC
    Use   [source_u_s.f, 665]          SOURCE_U_S_BC
    Use   [source_u_s.f, 666]          SOURCE_U_S_BC
    Use   [source_u_s.f, 667]          SOURCE_U_S_BC
    Use   [source_u_s.f, 668]          SOURCE_U_S_BC
    Use   [source_u_s.f, 669]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 698]   SOURCE_U_S_BC
    Use   [source_u_s.f, 701]          SOURCE_U_S_BC
    Use   [source_u_s.f, 702]          SOURCE_U_S_BC
    Use   [source_u_s.f, 703]          SOURCE_U_S_BC
    Use   [source_u_s.f, 704]          SOURCE_U_S_BC
    Use   [source_u_s.f, 705]          SOURCE_U_S_BC
    Use   [source_u_s.f, 706]          SOURCE_U_S_BC
    Use   [source_u_s.f, 707]          SOURCE_U_S_BC
    Use   [source_u_s.f, 708]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 737]   SOURCE_U_S_BC
    Use   [source_u_s.f, 740]          SOURCE_U_S_BC
    Use   [source_u_s.f, 741]          SOURCE_U_S_BC
    Use   [source_u_s.f, 742]          SOURCE_U_S_BC
    Use   [source_u_s.f, 743]          SOURCE_U_S_BC
    Use   [source_u_s.f, 744]          SOURCE_U_S_BC
    Use   [source_u_s.f, 745]          SOURCE_U_S_BC
    Use   [source_u_s.f, 746]          SOURCE_U_S_BC
    Use   [source_u_s.f, 747]          SOURCE_U_S_BC
    Use   [source_u_s.f, 766]          SOURCE_U_S_BC
    Use   [source_u_s.f, 769]          SOURCE_U_S_BC
    Use   [source_u_s.f, 771]          SOURCE_U_S_BC
    Use   [source_u_s.f, 772]          SOURCE_U_S_BC
    Use   [source_u_s.f, 773]          SOURCE_U_S_BC
    Use   [source_u_s.f, 773]          SOURCE_U_S_BC
    Use   [source_u_s.f, 776]          SOURCE_U_S_BC
    Use   [source_u_s.f, 779]          SOURCE_U_S_BC
    Use   [source_u_s.f, 781]          SOURCE_U_S_BC
    Use   [source_u_s.f, 782]          SOURCE_U_S_BC
    Use   [source_u_s.f, 783]          SOURCE_U_S_BC
    Use   [source_u_s.f, 783]          SOURCE_U_S_BC
    Use   [source_u_s.f, 786]          SOURCE_U_S_BC
    Use   [source_u_s.f, 789]          SOURCE_U_S_BC
    Use   [source_u_s.f, 791]          SOURCE_U_S_BC
    Use   [source_u_s.f, 793]          SOURCE_U_S_BC
    Use   [source_u_s.f, 795]          SOURCE_U_S_BC
    Use   [source_u_s.f, 795]          SOURCE_U_S_BC
    Use   [source_u_s.f, 798]          SOURCE_U_S_BC
    Use   [source_u_s.f, 801]          SOURCE_U_S_BC
    Use   [source_u_s.f, 803]          SOURCE_U_S_BC
    Use   [source_u_s.f, 805]          SOURCE_U_S_BC
    Use   [source_u_s.f, 807]          SOURCE_U_S_BC
    Use   [source_u_s.f, 807]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 814]   SOURCE_U_S_BC
    Use   [source_u_s.f, 818]          SOURCE_U_S_BC
    Use   [source_u_s.f, 818]          SOURCE_U_S_BC
    Use   [source_u_s.f, 819]          SOURCE_U_S_BC
    Use   [source_u_s.f, 820]          SOURCE_U_S_BC
    Use   [source_u_s.f, 821]          SOURCE_U_S_BC
    Use   [source_u_s.f, 822]          SOURCE_U_S_BC
    Use   [source_u_s.f, 823]          SOURCE_U_S_BC
    Use   [source_u_s.f, 824]          SOURCE_U_S_BC
    Use   [source_u_s.f, 825]          SOURCE_U_S_BC
    Use   [source_u_s.f, 845]          SOURCE_U_S_BC
    Use   [source_u_s.f, 846]          SOURCE_U_S_BC
    Use   [source_u_s.f, 847]          SOURCE_U_S_BC
    Use   [source_u_s.f, 848]          SOURCE_U_S_BC
    Use   [source_u_s.f, 849]          SOURCE_U_S_BC
    Use   [source_u_s.f, 850]          SOURCE_U_S_BC
    Use   [source_u_s.f, 851]          SOURCE_U_S_BC
    Use   [source_u_s.f, 852]          SOURCE_U_S_BC
    Use   [source_u_s.f, 880]          SOURCE_U_S_BC
    Use   [source_u_s.f, 881]          SOURCE_U_S_BC
    Use   [source_u_s.f, 882]          SOURCE_U_S_BC
    Use   [source_u_s.f, 883]          SOURCE_U_S_BC
    Use   [source_u_s.f, 884]          SOURCE_U_S_BC
    Use   [source_u_s.f, 885]          SOURCE_U_S_BC
    Use   [source_u_s.f, 886]          SOURCE_U_S_BC
    Use   [source_u_s.f, 910]          SOURCE_U_S_BC
    Use   [source_u_s.f, 911]          SOURCE_U_S_BC
    Use   [source_u_s.f, 912]          SOURCE_U_S_BC
    Use   [source_u_s.f, 913]          SOURCE_U_S_BC
    Use   [source_u_s.f, 914]          SOURCE_U_S_BC
    Use   [source_u_s.f, 915]          SOURCE_U_S_BC
    Use   [source_u_s.f, 931]          SOURCE_U_S_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 114]          RRATES0
    Set   [rrates0.f, 310]             RRATES0
    Use   [rrates0.f, 311]             RRATES0
    Use   [rrates0.f, 311]             RRATES0
    Set   [rrates0.f, 316]             RRATES0
    Use   [rrates0.f, 318]             RRATES0
    Use   [rrates0.f, 319]             RRATES0
    Use   [rrates0.f, 320]             RRATES0
    Use   [rrates0.f, 322]             RRATES0
    Use   [rrates0.f, 322]             RRATES0
    Use   [rrates0.f, 322]             RRATES0
    Set   [rrates0.f, 373]             RRATES0
    Use   [rrates0.f, 374]             RRATES0
    Set   [rrates0.f, 378]             RRATES0
    Use   [rrates0.f, 379]             RRATES0
    Use   [rrates0.f, 379]             RRATES0

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 68]          BC_THETA
    Set   [bc_theta.f, 77]             BC_THETA
    Use   [bc_theta.f, 78]             BC_THETA
    Use   [bc_theta.f, 79]             BC_THETA
    Use   [bc_theta.f, 80]             BC_THETA
    Use   [bc_theta.f, 81]             BC_THETA
    Use   [bc_theta.f, 82]             BC_THETA
    Use   [bc_theta.f, 83]             BC_THETA
    Use   [bc_theta.f, 84]             BC_THETA
    Use   [bc_theta.f, 85]             BC_THETA
    Use   [bc_theta.f, 86]             BC_THETA
    Use   [bc_theta.f, 87]             BC_THETA
    Use   [bc_theta.f, 89]             BC_THETA
    Use   [bc_theta.f, 118]            BC_THETA
    Use Argument   [bc_theta.f, 128]   BC_THETA
    Use   [bc_theta.f, 130]            BC_THETA
    Use   [bc_theta.f, 136]            BC_THETA
    Use   [bc_theta.f, 147]            BC_THETA
    Use Argument   [bc_theta.f, 153]   BC_THETA
    Use   [bc_theta.f, 154]            BC_THETA
    Use   [bc_theta.f, 160]            BC_THETA
    Use   [bc_theta.f, 171]            BC_THETA
    Use Argument   [bc_theta.f, 177]   BC_THETA
    Use   [bc_theta.f, 178]            BC_THETA
    Use   [bc_theta.f, 184]            BC_THETA
    Use   [bc_theta.f, 195]            BC_THETA
    Use Argument   [bc_theta.f, 201]   BC_THETA
    Use   [bc_theta.f, 202]            BC_THETA
    Use   [bc_theta.f, 208]            BC_THETA
    Use   [bc_theta.f, 219]            BC_THETA
    Use Argument   [bc_theta.f, 225]   BC_THETA
    Use   [bc_theta.f, 226]            BC_THETA
    Use   [bc_theta.f, 232]            BC_THETA
    Use   [bc_theta.f, 243]            BC_THETA
    Use Argument   [bc_theta.f, 249]   BC_THETA
    Use   [bc_theta.f, 250]            BC_THETA
    Use   [bc_theta.f, 256]            BC_THETA

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [bc_theta.f, 292]         CALC_THETA_BC
    Declare   [bc_theta.f, 326]        CALC_THETA_BC
    Use   [bc_theta.f, 448]            CALC_THETA_BC
    Use   [bc_theta.f, 448]            CALC_THETA_BC
    Use   [bc_theta.f, 493]            CALC_THETA_BC
    Use   [bc_theta.f, 493]            CALC_THETA_BC
    Use   [bc_theta.f, 538]            CALC_THETA_BC
    Use   [bc_theta.f, 538]            CALC_THETA_BC
    Use   [bc_theta.f, 583]            CALC_THETA_BC
    Use   [bc_theta.f, 583]            CALC_THETA_BC
    Use   [bc_theta.f, 628]            CALC_THETA_BC
    Use   [bc_theta.f, 628]            CALC_THETA_BC
    Use   [bc_theta.f, 673]            CALC_THETA_BC
    Use   [bc_theta.f, 673]            CALC_THETA_BC
    Use Argument   [bc_theta.f, 687]   CALC_THETA_BC

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [bc_theta.f, 745]         THETA_HW_CW
    Declare   [bc_theta.f, 805]        THETA_HW_CW

L    (Local Variable)  Declared as: INTEGER
    Define   [source_population_eq.f, 17]   Source_population_eq
    Set   [source_population_eq.f, 84]   Source_population_eq
    Use   [source_population_eq.f, 89]   Source_population_eq
    Use   [source_population_eq.f, 89]   Source_population_eq
    Use   [source_population_eq.f, 91]   Source_population_eq
    Use   [source_population_eq.f, 91]   Source_population_eq
    Use   [source_population_eq.f, 93]   Source_population_eq
    Use   [source_population_eq.f, 97]   Source_population_eq
    Use   [source_population_eq.f, 97]   Source_population_eq
    Use   [source_population_eq.f, 99]   Source_population_eq
    Use   [source_population_eq.f, 100]   Source_population_eq
    Use   [source_population_eq.f, 102]   Source_population_eq
    Use   [source_population_eq.f, 102]   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, 113]   Source_population_eq
    Use   [source_population_eq.f, 113]   Source_population_eq
    Use   [source_population_eq.f, 115]   Source_population_eq
    Use   [source_population_eq.f, 115]   Source_population_eq
    Use   [source_population_eq.f, 116]   Source_population_eq
    Use   [source_population_eq.f, 116]   Source_population_eq
    Use   [source_population_eq.f, 117]   Source_population_eq

L    (Local Variable)  Declared as: INTEGER
    Define   [init_resid.f, 42]        INIT_RESID
    Set   [init_resid.f, 49]           INIT_RESID
    Set   [init_resid.f, 56]           INIT_RESID

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 229]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 230]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 231]   CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 301]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 302]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 303]   CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 306]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 307]   CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 314]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 316]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 316]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 317]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 317]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 320]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 321]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 322]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 322]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 322]            CALC_D_T_GAS_AND_SOLIDS

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 547]         CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 589]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 590]            CALC_D_T_SOLIDS_ONLY
    Use Argument   [calc_d_t.f, 591]   CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 602]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 603]            CALC_D_T_SOLIDS_ONLY
    Use Argument   [calc_d_t.f, 604]   CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 607]            CALC_D_T_SOLIDS_ONLY
    Use Argument   [calc_d_t.f, 608]   CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 613]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 615]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 616]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 616]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 616]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 619]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 619]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 620]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 620]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 620]            CALC_D_T_SOLIDS_ONLY

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [calc_outflow.f, 11]      CALC_OUTFLOW
    Declare   [calc_outflow.f, 38]     CALC_OUTFLOW
    Use   [calc_outflow.f, 50]         CALC_OUTFLOW
    Use   [calc_outflow.f, 50]         CALC_OUTFLOW
    Use   [calc_outflow.f, 51]         CALC_OUTFLOW
    Use   [calc_outflow.f, 51]         CALC_OUTFLOW
    Use   [calc_outflow.f, 52]         CALC_OUTFLOW
    Use   [calc_outflow.f, 52]         CALC_OUTFLOW
    Use   [calc_outflow.f, 53]         CALC_OUTFLOW
    Use   [calc_outflow.f, 53]         CALC_OUTFLOW
    Use   [calc_outflow.f, 58]         CALC_OUTFLOW
    Use   [calc_outflow.f, 61]         CALC_OUTFLOW
    Use   [calc_outflow.f, 61]         CALC_OUTFLOW
    Use   [calc_outflow.f, 63]         CALC_OUTFLOW
    Use   [calc_outflow.f, 63]         CALC_OUTFLOW
    Use   [calc_outflow.f, 67]         CALC_OUTFLOW
    Use   [calc_outflow.f, 67]         CALC_OUTFLOW
    Use   [calc_outflow.f, 69]         CALC_OUTFLOW
    Use   [calc_outflow.f, 69]         CALC_OUTFLOW
    Use   [calc_outflow.f, 73]         CALC_OUTFLOW
    Use   [calc_outflow.f, 73]         CALC_OUTFLOW
    Use   [calc_outflow.f, 75]         CALC_OUTFLOW
    Use   [calc_outflow.f, 75]         CALC_OUTFLOW
    Use   [calc_outflow.f, 79]         CALC_OUTFLOW
    Use   [calc_outflow.f, 79]         CALC_OUTFLOW
    Use   [calc_outflow.f, 81]         CALC_OUTFLOW
    Use   [calc_outflow.f, 81]         CALC_OUTFLOW
    Use   [calc_outflow.f, 85]         CALC_OUTFLOW
    Use   [calc_outflow.f, 85]         CALC_OUTFLOW
    Use   [calc_outflow.f, 87]         CALC_OUTFLOW
    Use   [calc_outflow.f, 87]         CALC_OUTFLOW
    Use   [calc_outflow.f, 91]         CALC_OUTFLOW
    Use   [calc_outflow.f, 91]         CALC_OUTFLOW
    Use   [calc_outflow.f, 93]         CALC_OUTFLOW
    Use   [calc_outflow.f, 93]         CALC_OUTFLOW
    Use   [calc_outflow.f, 98]         CALC_OUTFLOW
    Use   [calc_outflow.f, 101]        CALC_OUTFLOW
    Use   [calc_outflow.f, 101]        CALC_OUTFLOW
    Use   [calc_outflow.f, 103]        CALC_OUTFLOW
    Use   [calc_outflow.f, 103]        CALC_OUTFLOW
    Use   [calc_outflow.f, 107]        CALC_OUTFLOW
    Use   [calc_outflow.f, 107]        CALC_OUTFLOW
    Use   [calc_outflow.f, 109]        CALC_OUTFLOW
    Use   [calc_outflow.f, 109]        CALC_OUTFLOW
    Use   [calc_outflow.f, 113]        CALC_OUTFLOW
    Use   [calc_outflow.f, 113]        CALC_OUTFLOW
    Use   [calc_outflow.f, 115]        CALC_OUTFLOW
    Use   [calc_outflow.f, 115]        CALC_OUTFLOW
    Use   [calc_outflow.f, 119]        CALC_OUTFLOW
    Use   [calc_outflow.f, 119]        CALC_OUTFLOW
    Use   [calc_outflow.f, 121]        CALC_OUTFLOW
    Use   [calc_outflow.f, 121]        CALC_OUTFLOW
    Use   [calc_outflow.f, 125]        CALC_OUTFLOW
    Use   [calc_outflow.f, 125]        CALC_OUTFLOW
    Use   [calc_outflow.f, 127]        CALC_OUTFLOW
    Use   [calc_outflow.f, 127]        CALC_OUTFLOW
    Use   [calc_outflow.f, 131]        CALC_OUTFLOW
    Use   [calc_outflow.f, 131]        CALC_OUTFLOW
    Use   [calc_outflow.f, 133]        CALC_OUTFLOW
    Use   [calc_outflow.f, 133]        CALC_OUTFLOW

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 232]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 233]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 234]   CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 305]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 306]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 307]   CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 310]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 311]   CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 318]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 320]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 321]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 321]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 321]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 325]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 326]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 327]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 327]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 327]            CALC_D_E_GAS_AND_SOLIDS

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 558]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 600]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 601]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 602]   CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 613]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 614]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 615]   CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 618]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 619]   CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 625]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 627]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 628]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 628]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 628]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 632]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 632]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 633]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 633]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 634]            CALC_D_E_SOLIDS_ONLY

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_dtpic.f, 31]        CALC_DTPIC
    Set   [calc_dtpic.f, 43]           CALC_DTPIC
    Use Argument   [calc_dtpic.f, 45]   CALC_DTPIC
    Use Argument   [calc_dtpic.f, 47]   CALC_DTPIC
    Use Argument   [calc_dtpic.f, 47]   CALC_DTPIC
    Use Argument   [calc_dtpic.f, 47]   CALC_DTPIC
    Use   [calc_dtpic.f, 49]           CALC_DTPIC
    Use   [calc_dtpic.f, 50]           CALC_DTPIC
    Use   [calc_dtpic.f, 51]           CALC_DTPIC
    Use   [calc_dtpic.f, 52]           CALC_DTPIC
    Use   [calc_dtpic.f, 54]           CALC_DTPIC
    Use   [calc_dtpic.f, 55]           CALC_DTPIC

L    (Local Variable)  Declared as: INTEGER
    Define   [set_ic.f, 39]            SET_IC
    Set   [set_ic.f, 69]               SET_IC
    Use   [set_ic.f, 70]               SET_IC
    Use   [set_ic.f, 72]               SET_IC
    Use   [set_ic.f, 73]               SET_IC
    Use   [set_ic.f, 74]               SET_IC
    Use   [set_ic.f, 75]               SET_IC
    Use   [set_ic.f, 76]               SET_IC
    Use   [set_ic.f, 77]               SET_IC
    Use   [set_ic.f, 78]               SET_IC
    Use   [set_ic.f, 79]               SET_IC
    Use   [set_ic.f, 80]               SET_IC
    Use   [set_ic.f, 85]               SET_IC
    Use   [set_ic.f, 86]               SET_IC
    Use   [set_ic.f, 87]               SET_IC
    Use   [set_ic.f, 88]               SET_IC
    Use   [set_ic.f, 89]               SET_IC
    Use   [set_ic.f, 93]               SET_IC
    Use   [set_ic.f, 93]               SET_IC
    Use   [set_ic.f, 94]               SET_IC
    Use   [set_ic.f, 94]               SET_IC
    Use   [set_ic.f, 95]               SET_IC
    Use   [set_ic.f, 95]               SET_IC
    Use   [set_ic.f, 103]              SET_IC
    Use   [set_ic.f, 112]              SET_IC
    Use   [set_ic.f, 113]              SET_IC
    Use   [set_ic.f, 116]              SET_IC
    Use   [set_ic.f, 117]              SET_IC
    Use   [set_ic.f, 121]              SET_IC
    Use   [set_ic.f, 122]              SET_IC
    Use   [set_ic.f, 126]              SET_IC
    Use   [set_ic.f, 127]              SET_IC
    Use   [set_ic.f, 128]              SET_IC
    Use   [set_ic.f, 129]              SET_IC
    Use   [set_ic.f, 136]              SET_IC
    Use   [set_ic.f, 137]              SET_IC
    Use   [set_ic.f, 138]              SET_IC
    Use   [set_ic.f, 143]              SET_IC
    Use   [set_ic.f, 144]              SET_IC
    Use   [set_ic.f, 149]              SET_IC
    Use   [set_ic.f, 150]              SET_IC
    Use   [set_ic.f, 151]              SET_IC
    Use   [set_ic.f, 154]              SET_IC
    Use   [set_ic.f, 155]              SET_IC
    Use   [set_ic.f, 175]              SET_IC
    Use   [set_ic.f, 178]              SET_IC

L1    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2610]   WRITE_INT_TABLE
    Set   [set_increments.f, 2617]     WRITE_INT_TABLE
    Use   [set_increments.f, 2618]     WRITE_INT_TABLE
    Use   [set_increments.f, 2619]     WRITE_INT_TABLE
    Set   [set_increments.f, 2622]     WRITE_INT_TABLE
    Use   [set_increments.f, 2624]     WRITE_INT_TABLE

L1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4616]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4631]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4632]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4635]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4636]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4640]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4651]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4651]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4651]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4656]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4656]   GET_LIP_WITH_GHOST_LAYERS

L1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5378]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5393]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5394]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5397]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5398]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5402]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5413]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5413]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5413]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5418]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5418]   GET_LIP_WITH_GHOST_LAYERS0

L1    (Local Variable)  Declared as: INTEGER
    Define   [write_table.f, 84]       WRITE_TABLE
    Set   [write_table.f, 100]         WRITE_TABLE
    Use   [write_table.f, 101]         WRITE_TABLE
    Use   [write_table.f, 102]         WRITE_TABLE
    Use   [write_table.f, 103]         WRITE_TABLE
    Use   [write_table.f, 104]         WRITE_TABLE
    Set   [write_table.f, 107]         WRITE_TABLE
    Use   [write_table.f, 109]         WRITE_TABLE
    Use   [write_table.f, 110]         WRITE_TABLE
    Use   [write_table.f, 111]         WRITE_TABLE

l1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 810]          SET_IJK_P_G
    Set   [set_bc0.f, 849]             SET_IJK_P_G
    Use   [set_bc0.f, 849]             SET_IJK_P_G
    Set   [set_bc0.f, 858]             SET_IJK_P_G
    Set   [set_bc0.f, 866]             SET_IJK_P_G
    Set   [set_bc0.f, 874]             SET_IJK_P_G
    Set   [set_bc0.f, 885]             SET_IJK_P_G
    Use   [set_bc0.f, 894]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 899]    SET_IJK_P_G
    Use   [set_bc0.f, 916]             SET_IJK_P_G
    Use   [set_bc0.f, 918]             SET_IJK_P_G

L1    (Local Variable)  Declared as: INTEGER
    Define   [parse_resid_string.f, 51]   PARSE_RESID_STRING
    Set   [parse_resid_string.f, 100]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 102]   PARSE_RESID_STRING
    Use   [parse_resid_string.f, 103]   PARSE_RESID_STRING

L1D    (Dummy Argument)  Declared as: LOGICAL
    Define   [dmp_cartesian.f, 275]    SEND_RECEIVE_1D_LOGICAL
    Declare   [dmp_cartesian.f, 295]   SEND_RECEIVE_1D_LOGICAL
    Use   [dmp_cartesian.f, 304]       SEND_RECEIVE_1D_LOGICAL
    Set   [dmp_cartesian.f, 315]       SEND_RECEIVE_1D_LOGICAL
    Set   [dmp_cartesian.f, 317]       SEND_RECEIVE_1D_LOGICAL

L2    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2610]   WRITE_INT_TABLE
    Set   [set_increments.f, 2615]     WRITE_INT_TABLE
    Use   [set_increments.f, 2617]     WRITE_INT_TABLE
    Set   [set_increments.f, 2618]     WRITE_INT_TABLE
    Use   [set_increments.f, 2619]     WRITE_INT_TABLE
    Use   [set_increments.f, 2622]     WRITE_INT_TABLE
    Set   [set_increments.f, 2623]     WRITE_INT_TABLE
    Use   [set_increments.f, 2624]     WRITE_INT_TABLE

L2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4616]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4632]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4635]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4636]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4640]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4655]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4655]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4659]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4659]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4659]   GET_LIP_WITH_GHOST_LAYERS

L2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5378]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5394]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5397]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5398]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5402]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5417]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5417]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5421]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5421]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5421]   GET_LIP_WITH_GHOST_LAYERS0

L2    (Local Variable)  Declared as: INTEGER
    Define   [get_stl_data.f, 83]      GET_MSH_DATA
    Set   [get_stl_data.f, 442]        GET_MSH_DATA
    Use   [get_stl_data.f, 443]        GET_MSH_DATA
    Set   [get_stl_data.f, 453]        GET_MSH_DATA
    Use   [get_stl_data.f, 454]        GET_MSH_DATA
    Set   [get_stl_data.f, 520]        GET_MSH_DATA
    Use   [get_stl_data.f, 522]        GET_MSH_DATA
    Use   [get_stl_data.f, 523]        GET_MSH_DATA
    Use   [get_stl_data.f, 539]        GET_MSH_DATA

L2    (Local Variable)  Declared as: INTEGER
    Define   [get_stl_data.f, 692]     GET_STL_DATA
    Set   [get_stl_data.f, 836]        GET_STL_DATA
    Use   [get_stl_data.f, 838]        GET_STL_DATA
    Use   [get_stl_data.f, 838]        GET_STL_DATA

L2    (Local Variable)  Declared as: INTEGER
    Define   [write_table.f, 84]       WRITE_TABLE
    Set   [write_table.f, 98]          WRITE_TABLE
    Use   [write_table.f, 100]         WRITE_TABLE
    Set   [write_table.f, 101]         WRITE_TABLE
    Use   [write_table.f, 102]         WRITE_TABLE
    Use   [write_table.f, 103]         WRITE_TABLE
    Use   [write_table.f, 104]         WRITE_TABLE
    Use   [write_table.f, 107]         WRITE_TABLE
    Set   [write_table.f, 108]         WRITE_TABLE
    Use   [write_table.f, 109]         WRITE_TABLE
    Use   [write_table.f, 110]         WRITE_TABLE
    Use   [write_table.f, 111]         WRITE_TABLE

l2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 809]          SET_IJK_P_G
    Set   [set_bc0.f, 848]             SET_IJK_P_G
    Use   [set_bc0.f, 848]             SET_IJK_P_G
    Set   [set_bc0.f, 857]             SET_IJK_P_G
    Set   [set_bc0.f, 865]             SET_IJK_P_G
    Set   [set_bc0.f, 873]             SET_IJK_P_G
    Set   [set_bc0.f, 884]             SET_IJK_P_G
    Use   [set_bc0.f, 893]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 899]    SET_IJK_P_G
    Use   [set_bc0.f, 916]             SET_IJK_P_G
    Use   [set_bc0.f, 918]             SET_IJK_P_G

L2    (Dummy Argument)  Declared as: INTEGER
    Define   [write_out0.f, 930]       LOCATION
    Declare   [write_out0.f, 945]      LOCATION
    Use   [write_out0.f, 953]          LOCATION
    Use   [write_out0.f, 963]          LOCATION
    Use   [write_out0.f, 969]          LOCATION
    Use   [write_out0.f, 969]          LOCATION
    Use   [write_out0.f, 970]          LOCATION

L3    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2610]   WRITE_INT_TABLE
    Use   [set_increments.f, 2619]     WRITE_INT_TABLE
    Set   [set_increments.f, 2619]     WRITE_INT_TABLE
    Use   [set_increments.f, 2624]     WRITE_INT_TABLE
    Set   [set_increments.f, 2624]     WRITE_INT_TABLE

L3    (Local Variable)  Declared as: INTEGER
    Define   [write_table.f, 84]       WRITE_TABLE
    Use   [write_table.f, 102]         WRITE_TABLE
    Set   [write_table.f, 102]         WRITE_TABLE
    Use   [write_table.f, 103]         WRITE_TABLE
    Set   [write_table.f, 103]         WRITE_TABLE
    Use   [write_table.f, 104]         WRITE_TABLE
    Set   [write_table.f, 104]         WRITE_TABLE
    Use   [write_table.f, 109]         WRITE_TABLE
    Set   [write_table.f, 109]         WRITE_TABLE
    Use   [write_table.f, 110]         WRITE_TABLE
    Set   [write_table.f, 110]         WRITE_TABLE
    Use   [write_table.f, 111]         WRITE_TABLE
    Set   [write_table.f, 111]         WRITE_TABLE

l3    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 808]          SET_IJK_P_G
    Set   [set_bc0.f, 847]             SET_IJK_P_G
    Set   [set_bc0.f, 856]             SET_IJK_P_G
    Set   [set_bc0.f, 864]             SET_IJK_P_G
    Set   [set_bc0.f, 872]             SET_IJK_P_G
    Use   [set_bc0.f, 881]             SET_IJK_P_G
    Set   [set_bc0.f, 883]             SET_IJK_P_G
    Use   [set_bc0.f, 892]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 899]    SET_IJK_P_G
    Use   [set_bc0.f, 915]             SET_IJK_P_G
    Use   [set_bc0.f, 917]             SET_IJK_P_G

l_2SI    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rrates0.f, 143]          RRATES0
    Set   [rrates0.f, 168]             RRATES0
    Use   [rrates0.f, 327]             RRATES0
    Use   [rrates0.f, 329]             RRATES0

l_ab    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_geometry.f, 66]      SET_GEOMETRY
    Set   [set_geometry.f, 235]        SET_GEOMETRY
    Use   [set_geometry.f, 236]        SET_GEOMETRY
    Set   [set_geometry.f, 243]        SET_GEOMETRY
    Use   [set_geometry.f, 244]        SET_GEOMETRY

l_bar    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_mobility.f, 29]   thermal_mobility
    Set   [thermal_mobility.f, 69]     thermal_mobility
    Use   [thermal_mobility.f, 71]     thermal_mobility

L_rm    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_k_s.f, 75]          CALC_K_S
    Set   [calc_k_s.f, 100]            CALC_K_S
    Use   [calc_k_s.f, 105]            CALC_K_S

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4571]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4616]   GET_LIP_WITH_GHOST_LAYERS
    Use Argument   [check_data_cartesian.f, 4624]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4632]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4636]   GET_LIP_WITH_GHOST_LAYERS

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5333]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5378]   GET_LIP_WITH_GHOST_LAYERS0
    Use Argument   [check_data_cartesian.f, 5386]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5394]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5398]   GET_LIP_WITH_GHOST_LAYERS0

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4705]   MINIMIZE_LOAD_IMBALANCE
    Declare   [check_data_cartesian.f, 4751]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4762]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4765]   MINIMIZE_LOAD_IMBALANCE
    Set   [check_data_cartesian.f, 4787]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4787]   MINIMIZE_LOAD_IMBALANCE
    Set   [check_data_cartesian.f, 4788]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4788]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4790]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4798]   MINIMIZE_LOAD_IMBALANCE
    Set   [check_data_cartesian.f, 4823]   MINIMIZE_LOAD_IMBALANCE

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5467]   MINIMIZE_LOAD_IMBALANCE0
    Declare   [check_data_cartesian.f, 5513]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5525]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5528]   MINIMIZE_LOAD_IMBALANCE0
    Set   [check_data_cartesian.f, 5550]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5550]   MINIMIZE_LOAD_IMBALANCE0
    Set   [check_data_cartesian.f, 5551]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5551]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5553]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5561]   MINIMIZE_LOAD_IMBALANCE0
    Set   [check_data_cartesian.f, 5586]   MINIMIZE_LOAD_IMBALANCE0

l_ver    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_geometry.f, 66]      SET_GEOMETRY
    Set   [set_geometry.f, 234]        SET_GEOMETRY
    Use   [set_geometry.f, 235]        SET_GEOMETRY
    Use   [set_geometry.f, 235]        SET_GEOMETRY
    Set   [set_geometry.f, 242]        SET_GEOMETRY
    Use   [set_geometry.f, 243]        SET_GEOMETRY
    Use   [set_geometry.f, 243]        SET_GEOMETRY

lambda    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [ghd.f, 14]               GHD_MODEL
    Declare   [ghd.f, 45]              GHD_MODEL
    Set   [ghd.f, 105]                 GHD_MODEL
    Use Argument   [ghd.f, 198]        GHD_MODEL
    Set   [ghd.f, 218]                 GHD_MODEL
    Use   [ghd.f, 218]                 GHD_MODEL

lambda    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cooling_rate.f, 172]     FUNC_JACOBI_EVAL
    Set   [cooling_rate.f, 180]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 203]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 204]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 225]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 235]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 238]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 245]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 247]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 249]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 252]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 253]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 260]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 262]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 263]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL

lambda    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [thermal_conductivity.f, 17]   thermal_conductivity
    Declare   [thermal_conductivity.f, 25]   thermal_conductivity
    Set   [thermal_conductivity.f, 213]   thermal_conductivity

lambda1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 709]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 715]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 721]     BUILD_C_QUADRIC_MATRIX

lambda2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 709]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 715]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 722]     BUILD_C_QUADRIC_MATRIX

lambda3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 709]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 715]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 723]     BUILD_C_QUADRIC_MATRIX

LAMBDA_1    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_vort_out.f, 35]     CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 316]   CALC_VORTICITY

LAMBDA_2    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_vort_out.f, 35]     CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 316]   CALC_VORTICITY
    Use   [calc_vort_out.f, 318]       CALC_VORTICITY

LAMBDA_3    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_vort_out.f, 35]     CALC_VORTICITY
    Use Argument   [calc_vort_out.f, 316]   CALC_VORTICITY

LAMBDA_sL_pB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_w_s.f, 118]    CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 207]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 208]       CALC_IA_MOMSOURCE_W_S

LAMBDA_sL_pE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_u_s.f, 118]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 206]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 208]       CALC_IA_MOMSOURCE_U_S

LAMBDA_sL_pN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_v_s.f, 118]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 204]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 206]       CALC_IA_MOMSOURCE_V_S

LAMBDA_sL_pS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_v_s.f, 118]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 205]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 206]       CALC_IA_MOMSOURCE_V_S

LAMBDA_sL_pT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_w_s.f, 118]    CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 206]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 208]       CALC_IA_MOMSOURCE_W_S

LAMBDA_sL_pW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_u_s.f, 118]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 207]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 208]       CALC_IA_MOMSOURCE_U_S

lambdacol    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_conductivity.f, 31]   thermal_conductivity
    Set   [thermal_conductivity.f, 191]   thermal_conductivity
    Set   [thermal_conductivity.f, 202]   thermal_conductivity
    Use   [thermal_conductivity.f, 202]   thermal_conductivity
    Use   [thermal_conductivity.f, 213]   thermal_conductivity

lambdai    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [ghd.f, 75]               GHD_MODEL
    Use Argument   [ghd.f, 198]        GHD_MODEL
    Use Argument   [ghd.f, 210]        GHD_MODEL

lambdai    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [dufour_coeff.f, 20]      dufour_coeff
    Declare   [dufour_coeff.f, 28]     dufour_coeff
    Use   [dufour_coeff.f, 102]        dufour_coeff

lambdai    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [thermal_conductivity.f, 18]   thermal_conductivity
    Declare   [thermal_conductivity.f, 30]   thermal_conductivity
    Set   [thermal_conductivity.f, 182]   thermal_conductivity
    Use   [thermal_conductivity.f, 187]   thermal_conductivity

lambdai_bar    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_conductivity.f, 29]   thermal_conductivity
    Set   [thermal_conductivity.f, 153]   thermal_conductivity
    Use   [thermal_conductivity.f, 175]   thermal_conductivity

lambdakin    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_conductivity.f, 31]   thermal_conductivity
    Set   [thermal_conductivity.f, 185]   thermal_conductivity
    Set   [thermal_conductivity.f, 188]   thermal_conductivity
    Use   [thermal_conductivity.f, 188]   thermal_conductivity
    Use   [thermal_conductivity.f, 213]   thermal_conductivity

lambdakini    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_conductivity.f, 31]   thermal_conductivity
    Set   [thermal_conductivity.f, 187]   thermal_conductivity
    Use   [thermal_conductivity.f, 188]   thermal_conductivity
    Use   [thermal_conductivity.f, 205]   thermal_conductivity
    Use   [thermal_conductivity.f, 207]   thermal_conductivity

LAST    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1073]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1179]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1180]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1181]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1183]   GET_POLYGON_AREA_AND_CENTROID

LAST_EMPTY_SPOT    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 329]   PIC_MI_BC
    Set   [pic_bc_routines.f, 368]     PIC_MI_BC
    Use Argument   [pic_bc_routines.f, 456]   PIC_MI_BC
    Set   [pic_bc_routines.f, 502]     PIC_MI_BC

LAST_INDEX    (Dummy Argument)  Declared as: INTEGER INTENT(INOUT)
    Define   [pic_bc_routines.f, 566]   PIC_FIND_EMPTY_SPOT
    Declare   [pic_bc_routines.f, 576]   PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 587]     PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 595]     PIC_FIND_EMPTY_SPOT
    Set   [pic_bc_routines.f, 599]     PIC_FIND_EMPTY_SPOT

LAST_VEC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1076]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1183]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1184]   GET_POLYGON_AREA_AND_CENTROID

LASTM    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1073]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1180]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1181]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1182]   GET_POLYGON_AREA_AND_CENTROID

LASTM_VEC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1076]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1182]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1184]   GET_POLYGON_AREA_AND_CENTROID

LAYERS    (Local Variable)  Declared as: INTEGER
    Define   [check_dmp_prereqs.f, 40]   CHECK_DMP_PREREQS
    Set   [check_dmp_prereqs.f, 71]    CHECK_DMP_PREREQS
    Use   [check_dmp_prereqs.f, 72]    CHECK_DMP_PREREQS
    Use   [check_dmp_prereqs.f, 73]    CHECK_DMP_PREREQS
    Set   [check_dmp_prereqs.f, 87]    CHECK_DMP_PREREQS
    Use   [check_dmp_prereqs.f, 88]    CHECK_DMP_PREREQS
    Use   [check_dmp_prereqs.f, 89]    CHECK_DMP_PREREQS
    Set   [check_dmp_prereqs.f, 102]   CHECK_DMP_PREREQS
    Use   [check_dmp_prereqs.f, 103]   CHECK_DMP_PREREQS
    Use   [check_dmp_prereqs.f, 104]   CHECK_DMP_PREREQS

LB    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [des_init_arrays.f, 77]   DES_INIT_PARTICLE_ARRAYS
    Declare   [des_init_arrays.f, 97]   DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 100]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 103]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 104]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 105]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 106]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 107]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 110]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 111]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 112]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 120]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 126]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 127]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 128]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 131]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 134]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 135]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 138]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 139]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 143]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 146]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 147]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 152]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 153]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 158]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 159]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 160]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 161]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 166]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 167]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 168]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 169]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 170]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 175]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 176]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 177]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 178]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 179]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 181]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 186]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 187]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 189]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 190]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 192]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 198]     DES_INIT_PARTICLE_ARRAYS

lBCV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 123]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 143]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 197]     SEED_NEW_PARTICLE

lBCV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 280]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 308]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 309]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 310]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 359]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 365]     SET_NEW_PARTICLE_PROPS

lBCV_I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 123]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 143]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 173]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 174]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 175]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 184]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 186]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 188]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 191]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 200]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 201]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 202]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 204]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 205]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 206]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 210]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 211]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 212]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 214]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 215]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 216]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 220]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 221]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 222]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 224]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 225]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 226]     SEED_NEW_PARTICLE

LC    (Local Variable)  Declared as: INTEGER
    Define   [out_bin_r.f, 54]         OUT_BIN_R
    Set   [out_bin_r.f, 59]            OUT_BIN_R
    Set   [out_bin_r.f, 62]            OUT_BIN_R

LC    (Local Variable)  Declared as: INTEGER
    Define   [mass_outflow_dem.f, 24]   MASS_OUTFLOW_DEM
    Set   [mass_outflow_dem.f, 48]     MASS_OUTFLOW_DEM
    Use   [mass_outflow_dem.f, 49]     MASS_OUTFLOW_DEM

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_output_control.f, 46]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 68]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 71]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 73]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 73]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 78]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 80]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 80]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 86]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 87]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 90]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 91]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 91]   CHECK_OUTPUT_CONTROL

LC    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 330]   PIC_MI_BC
    Set   [pic_bc_routines.f, 383]     PIC_MI_BC
    Use   [pic_bc_routines.f, 384]     PIC_MI_BC
    Use   [pic_bc_routines.f, 436]     PIC_MI_BC
    Use   [pic_bc_routines.f, 436]     PIC_MI_BC
    Use   [pic_bc_routines.f, 438]     PIC_MI_BC
    Use   [pic_bc_routines.f, 438]     PIC_MI_BC
    Use   [pic_bc_routines.f, 441]     PIC_MI_BC
    Use   [pic_bc_routines.f, 442]     PIC_MI_BC
    Use   [pic_bc_routines.f, 443]     PIC_MI_BC
    Use   [pic_bc_routines.f, 443]     PIC_MI_BC
    Use   [pic_bc_routines.f, 445]     PIC_MI_BC
    Use   [pic_bc_routines.f, 446]     PIC_MI_BC

LC    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 175]   PIC_MO_BC
    Set   [pic_bc_routines.f, 195]     PIC_MO_BC
    Use   [pic_bc_routines.f, 196]     PIC_MO_BC

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mo.f, 32]     SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 86]        SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 89]        SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 127]       SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 128]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 128]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 133]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 144]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 145]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 146]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 146]       SET_BC_PIC_MO

LC    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 76]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 118]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 119]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 120]        DRAG_GS_DES1

LC    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 246]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 294]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 295]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 296]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 324]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 325]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 326]        DRAG_GS_GAS1

LC    (Local Variable)  Declared as: INTEGER
    Define   [out_bin_512i.f, 65]      OUT_BIN_512I
    Set   [out_bin_512i.f, 87]         OUT_BIN_512I

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_cell.f, 41]         CALC_CELL
    Set   [calc_cell.f, 48]            CALC_CELL
    Use   [calc_cell.f, 49]            CALC_CELL
    Use   [calc_cell.f, 50]            CALC_CELL
    Use   [calc_cell.f, 51]            CALC_CELL
    Use   [calc_cell.f, 53]            CALC_CELL
    Use   [calc_cell.f, 54]            CALC_CELL

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_cell.f, 146]        CALC_CELL_INTERSECT
    Set   [calc_cell.f, 154]           CALC_CELL_INTERSECT
    Use   [calc_cell.f, 155]           CALC_CELL_INTERSECT
    Use   [calc_cell.f, 157]           CALC_CELL_INTERSECT

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_cell.f, 100]        CALC_LOC
    Set   [calc_cell.f, 104]           CALC_LOC
    Set   [calc_cell.f, 107]           CALC_LOC

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 347]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 409]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 412]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 462]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 463]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 463]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 468]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 480]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 481]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 482]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 482]       SET_DEM_BCMI_IJK

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 56]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 102]        CALC_PG_GRAD
    Use   [calc_pg_grad.f, 103]        CALC_PG_GRAD
    Use   [calc_pg_grad.f, 104]        CALC_PG_GRAD

LC    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 70]     DISPLAY_FIELD_RESID
    Set   [display_resid.f, 74]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 77]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 78]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 80]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 80]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 84]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 85]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 93]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 96]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 97]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 100]       DISPLAY_FIELD_RESID
    Use   [display_resid.f, 100]       DISPLAY_FIELD_RESID
    Use   [display_resid.f, 104]       DISPLAY_FIELD_RESID
    Use   [display_resid.f, 105]       DISPLAY_FIELD_RESID

LC    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 139]    DISPLAY_GROUP_RESID
    Set   [display_resid.f, 143]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 145]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 146]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 148]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 148]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 151]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 152]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 154]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 154]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 158]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 159]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 161]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 161]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 165]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 166]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 168]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 168]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 172]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 173]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 175]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 175]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 179]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 180]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 182]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 182]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 185]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 186]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 197]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 199]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 200]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 202]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 202]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 205]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 206]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 208]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 208]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 212]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 213]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 215]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 215]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 219]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 220]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 222]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 222]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 226]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 227]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 229]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 229]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 233]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 234]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 236]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 236]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 239]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 240]       DISPLAY_GROUP_RESID

LC    (Local Variable)  Declared as: INTEGER
    Define   [init_namelist.f, 56]     INIT_NAMELIST
    Set   [init_namelist.f, 1694]      INIT_NAMELIST
    Use   [init_namelist.f, 1699]      INIT_NAMELIST
    Use   [init_namelist.f, 1705]      INIT_NAMELIST
    Use   [init_namelist.f, 1711]      INIT_NAMELIST
    Use   [init_namelist.f, 1717]      INIT_NAMELIST
    Use   [init_namelist.f, 1723]      INIT_NAMELIST
    Use   [init_namelist.f, 1729]      INIT_NAMELIST
    Use   [init_namelist.f, 1735]      INIT_NAMELIST
    Use   [init_namelist.f, 1741]      INIT_NAMELIST
    Use   [init_namelist.f, 1747]      INIT_NAMELIST
    Use   [init_namelist.f, 1753]      INIT_NAMELIST
    Use   [init_namelist.f, 1759]      INIT_NAMELIST
    Use   [init_namelist.f, 1765]      INIT_NAMELIST
    Use   [init_namelist.f, 1777]      INIT_NAMELIST
    Use   [init_namelist.f, 1783]      INIT_NAMELIST
    Use   [init_namelist.f, 1793]      INIT_NAMELIST
    Use   [init_namelist.f, 1802]      INIT_NAMELIST
    Use   [init_namelist.f, 1808]      INIT_NAMELIST
    Use   [init_namelist.f, 1820]      INIT_NAMELIST
    Use   [init_namelist.f, 1830]      INIT_NAMELIST
    Use   [init_namelist.f, 1836]      INIT_NAMELIST
    Use   [init_namelist.f, 1843]      INIT_NAMELIST
    Use   [init_namelist.f, 1850]      INIT_NAMELIST
    Use   [init_namelist.f, 1860]      INIT_NAMELIST
    Use   [init_namelist.f, 1867]      INIT_NAMELIST
    Use   [init_namelist.f, 1877]      INIT_NAMELIST
    Use   [init_namelist.f, 1884]      INIT_NAMELIST
    Use   [init_namelist.f, 1890]      INIT_NAMELIST
    Use   [init_namelist.f, 1897]      INIT_NAMELIST
    Use   [init_namelist.f, 1903]      INIT_NAMELIST
    Use   [init_namelist.f, 1910]      INIT_NAMELIST
    Use   [init_namelist.f, 1916]      INIT_NAMELIST
    Use   [init_namelist.f, 1923]      INIT_NAMELIST
    Use   [init_namelist.f, 1930]      INIT_NAMELIST
    Use   [init_namelist.f, 1938]      INIT_NAMELIST
    Use   [init_namelist.f, 1945]      INIT_NAMELIST
    Use   [init_namelist.f, 1951]      INIT_NAMELIST
    Use   [init_namelist.f, 1957]      INIT_NAMELIST
    Use   [init_namelist.f, 1964]      INIT_NAMELIST
    Use   [init_namelist.f, 1976]      INIT_NAMELIST
    Use   [init_namelist.f, 1988]      INIT_NAMELIST
    Set   [init_namelist.f, 1998]      INIT_NAMELIST
    Use   [init_namelist.f, 2004]      INIT_NAMELIST
    Use   [init_namelist.f, 2010]      INIT_NAMELIST
    Use   [init_namelist.f, 2016]      INIT_NAMELIST
    Use   [init_namelist.f, 2022]      INIT_NAMELIST
    Use   [init_namelist.f, 2028]      INIT_NAMELIST
    Use   [init_namelist.f, 2034]      INIT_NAMELIST
    Use   [init_namelist.f, 2040]      INIT_NAMELIST
    Use   [init_namelist.f, 2046]      INIT_NAMELIST
    Use   [init_namelist.f, 2052]      INIT_NAMELIST
    Use   [init_namelist.f, 2058]      INIT_NAMELIST
    Use   [init_namelist.f, 2064]      INIT_NAMELIST
    Use   [init_namelist.f, 2070]      INIT_NAMELIST
    Use   [init_namelist.f, 2127]      INIT_NAMELIST
    Use   [init_namelist.f, 2133]      INIT_NAMELIST
    Use   [init_namelist.f, 2140]      INIT_NAMELIST
    Use   [init_namelist.f, 2146]      INIT_NAMELIST
    Use   [init_namelist.f, 2153]      INIT_NAMELIST
    Use   [init_namelist.f, 2159]      INIT_NAMELIST
    Use   [init_namelist.f, 2166]      INIT_NAMELIST
    Use   [init_namelist.f, 2172]      INIT_NAMELIST
    Use   [init_namelist.f, 2179]      INIT_NAMELIST
    Use   [init_namelist.f, 2194]      INIT_NAMELIST
    Use   [init_namelist.f, 2229]      INIT_NAMELIST
    Use   [init_namelist.f, 2240]      INIT_NAMELIST
    Use   [init_namelist.f, 2250]      INIT_NAMELIST
    Use   [init_namelist.f, 2259]      INIT_NAMELIST
    Use   [init_namelist.f, 2268]      INIT_NAMELIST
    Use   [init_namelist.f, 2277]      INIT_NAMELIST
    Use   [init_namelist.f, 2288]      INIT_NAMELIST
    Use   [init_namelist.f, 2298]      INIT_NAMELIST
    Use   [init_namelist.f, 2308]      INIT_NAMELIST
    Use   [init_namelist.f, 2318]      INIT_NAMELIST
    Use   [init_namelist.f, 2329]      INIT_NAMELIST
    Use   [init_namelist.f, 2339]      INIT_NAMELIST
    Use   [init_namelist.f, 2350]      INIT_NAMELIST
    Use   [init_namelist.f, 2361]      INIT_NAMELIST
    Use   [init_namelist.f, 2372]      INIT_NAMELIST
    Use   [init_namelist.f, 2382]      INIT_NAMELIST
    Use   [init_namelist.f, 2392]      INIT_NAMELIST
    Use   [init_namelist.f, 2402]      INIT_NAMELIST
    Use   [init_namelist.f, 2408]      INIT_NAMELIST
    Use   [init_namelist.f, 2414]      INIT_NAMELIST
    Use   [init_namelist.f, 2421]      INIT_NAMELIST
    Use   [init_namelist.f, 2428]      INIT_NAMELIST
    Use   [init_namelist.f, 2434]      INIT_NAMELIST
    Use   [init_namelist.f, 2441]      INIT_NAMELIST
    Use   [init_namelist.f, 2448]      INIT_NAMELIST
    Use   [init_namelist.f, 2455]      INIT_NAMELIST
    Use   [init_namelist.f, 2463]      INIT_NAMELIST
    Use   [init_namelist.f, 2469]      INIT_NAMELIST
    Use   [init_namelist.f, 2476]      INIT_NAMELIST
    Use   [init_namelist.f, 2482]      INIT_NAMELIST
    Use   [init_namelist.f, 2489]      INIT_NAMELIST
    Use   [init_namelist.f, 2495]      INIT_NAMELIST
    Use   [init_namelist.f, 2502]      INIT_NAMELIST
    Use   [init_namelist.f, 2508]      INIT_NAMELIST
    Use   [init_namelist.f, 2515]      INIT_NAMELIST
    Use   [init_namelist.f, 2521]      INIT_NAMELIST
    Use   [init_namelist.f, 2528]      INIT_NAMELIST
    Use   [init_namelist.f, 2542]      INIT_NAMELIST
    Use   [init_namelist.f, 2548]      INIT_NAMELIST
    Use   [init_namelist.f, 2554]      INIT_NAMELIST
    Use   [init_namelist.f, 2560]      INIT_NAMELIST
    Use   [init_namelist.f, 2566]      INIT_NAMELIST
    Use   [init_namelist.f, 2572]      INIT_NAMELIST
    Use   [init_namelist.f, 2579]      INIT_NAMELIST
    Use   [init_namelist.f, 2585]      INIT_NAMELIST
    Use   [init_namelist.f, 2591]      INIT_NAMELIST
    Use   [init_namelist.f, 2598]      INIT_NAMELIST
    Use   [init_namelist.f, 2606]      INIT_NAMELIST
    Use   [init_namelist.f, 2617]      INIT_NAMELIST
    Use   [init_namelist.f, 2628]      INIT_NAMELIST
    Use   [init_namelist.f, 2635]      INIT_NAMELIST
    Use   [init_namelist.f, 2639]      INIT_NAMELIST
    Set   [init_namelist.f, 2648]      INIT_NAMELIST
    Use   [init_namelist.f, 2654]      INIT_NAMELIST
    Use   [init_namelist.f, 2660]      INIT_NAMELIST
    Use   [init_namelist.f, 2666]      INIT_NAMELIST
    Use   [init_namelist.f, 2672]      INIT_NAMELIST
    Use   [init_namelist.f, 2678]      INIT_NAMELIST
    Use   [init_namelist.f, 2684]      INIT_NAMELIST
    Use   [init_namelist.f, 2690]      INIT_NAMELIST
    Use   [init_namelist.f, 2696]      INIT_NAMELIST
    Use   [init_namelist.f, 2702]      INIT_NAMELIST
    Use   [init_namelist.f, 2708]      INIT_NAMELIST
    Use   [init_namelist.f, 2714]      INIT_NAMELIST
    Use   [init_namelist.f, 2720]      INIT_NAMELIST
    Use   [init_namelist.f, 2733]      INIT_NAMELIST
    Use   [init_namelist.f, 2748]      INIT_NAMELIST
    Use   [init_namelist.f, 2749]      INIT_NAMELIST
    Use   [init_namelist.f, 2756]      INIT_NAMELIST
    Set   [init_namelist.f, 2764]      INIT_NAMELIST
    Use   [init_namelist.f, 2769]      INIT_NAMELIST
    Use   [init_namelist.f, 2775]      INIT_NAMELIST
    Use   [init_namelist.f, 2781]      INIT_NAMELIST
    Use   [init_namelist.f, 2787]      INIT_NAMELIST
    Use   [init_namelist.f, 2793]      INIT_NAMELIST
    Use   [init_namelist.f, 2799]      INIT_NAMELIST
    Use   [init_namelist.f, 2805]      INIT_NAMELIST
    Use   [init_namelist.f, 2811]      INIT_NAMELIST
    Use   [init_namelist.f, 2817]      INIT_NAMELIST
    Use   [init_namelist.f, 2823]      INIT_NAMELIST
    Use   [init_namelist.f, 2829]      INIT_NAMELIST
    Use   [init_namelist.f, 2835]      INIT_NAMELIST
    Use   [init_namelist.f, 2842]      INIT_NAMELIST
    Use   [init_namelist.f, 2848]      INIT_NAMELIST
    Use   [init_namelist.f, 2854]      INIT_NAMELIST
    Use   [init_namelist.f, 2860]      INIT_NAMELIST
    Use   [init_namelist.f, 2866]      INIT_NAMELIST
    Use   [init_namelist.f, 2873]      INIT_NAMELIST
    Use   [init_namelist.f, 2880]      INIT_NAMELIST
    Use   [init_namelist.f, 2887]      INIT_NAMELIST
    Use   [init_namelist.f, 2894]      INIT_NAMELIST
    Use   [init_namelist.f, 2901]      INIT_NAMELIST
    Use   [init_namelist.f, 2908]      INIT_NAMELIST
    Use   [init_namelist.f, 2916]      INIT_NAMELIST
    Set   [init_namelist.f, 3165]      INIT_NAMELIST
    Use   [init_namelist.f, 3171]      INIT_NAMELIST
    Use   [init_namelist.f, 3177]      INIT_NAMELIST
    Use   [init_namelist.f, 3183]      INIT_NAMELIST
    Use   [init_namelist.f, 3189]      INIT_NAMELIST
    Use   [init_namelist.f, 3195]      INIT_NAMELIST
    Use   [init_namelist.f, 3201]      INIT_NAMELIST
    Use   [init_namelist.f, 3207]      INIT_NAMELIST
    Use   [init_namelist.f, 3213]      INIT_NAMELIST
    Use   [init_namelist.f, 3219]      INIT_NAMELIST
    Use   [init_namelist.f, 3225]      INIT_NAMELIST
    Use   [init_namelist.f, 3231]      INIT_NAMELIST
    Use   [init_namelist.f, 3237]      INIT_NAMELIST
    Use   [init_namelist.f, 3243]      INIT_NAMELIST
    Use   [init_namelist.f, 3249]      INIT_NAMELIST
    Use   [init_namelist.f, 3257]      INIT_NAMELIST
    Use   [init_namelist.f, 3265]      INIT_NAMELIST
    Use   [init_namelist.f, 3271]      INIT_NAMELIST

LC    (Local Variable)  Declared as: INTEGER
    Define   [output_manager.f, 497]   BACKUP_RES
    Set   [output_manager.f, 502]      BACKUP_RES
    Use   [output_manager.f, 503]      BACKUP_RES
    Use Argument   [output_manager.f, 504]   BACKUP_RES
    Use   [output_manager.f, 508]      BACKUP_RES
    Use Argument   [output_manager.f, 509]   BACKUP_RES

LC    (Local Variable)  Declared as: INTEGER
    Define   [output_manager.f, 398]   INIT_OUTPUT_VARS
    Set   [output_manager.f, 442]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 443]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 444]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 446]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 448]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 448]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 449]      INIT_OUTPUT_VARS
    Set   [output_manager.f, 457]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 458]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 459]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 461]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 463]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 463]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 464]      INIT_OUTPUT_VARS

LC    (Local Variable)  Declared as: INTEGER
    Define   [output_manager.f, 58]    OUTPUT_MANAGER
    Set   [output_manager.f, 108]      OUTPUT_MANAGER
    Use   [output_manager.f, 109]      OUTPUT_MANAGER
    Use   [output_manager.f, 110]      OUTPUT_MANAGER
    Use   [output_manager.f, 110]      OUTPUT_MANAGER
    Use Argument   [output_manager.f, 112]   OUTPUT_MANAGER
    Use   [output_manager.f, 113]      OUTPUT_MANAGER
    Use   [output_manager.f, 113]      OUTPUT_MANAGER
    Use   [output_manager.f, 115]      OUTPUT_MANAGER
    Set   [output_manager.f, 133]      OUTPUT_MANAGER
    Use   [output_manager.f, 134]      OUTPUT_MANAGER
    Use   [output_manager.f, 135]      OUTPUT_MANAGER
    Use   [output_manager.f, 135]      OUTPUT_MANAGER
    Use Argument   [output_manager.f, 136]   OUTPUT_MANAGER
    Use   [output_manager.f, 137]      OUTPUT_MANAGER
    Use   [output_manager.f, 137]      OUTPUT_MANAGER
    Set   [output_manager.f, 148]      OUTPUT_MANAGER
    Use   [output_manager.f, 149]      OUTPUT_MANAGER
    Use   [output_manager.f, 150]      OUTPUT_MANAGER
    Use   [output_manager.f, 150]      OUTPUT_MANAGER
    Use Argument   [output_manager.f, 151]   OUTPUT_MANAGER
    Use Argument   [output_manager.f, 152]   OUTPUT_MANAGER

LC    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 22]   MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 38]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 39]      MASS_INFLOW_DEM

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3359]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3439]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3440]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3440]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3455]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3456]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3456]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3472]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3473]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3473]   ADJUST_IJK_SIZE

LC    (Local Variable)  Declared as: INTEGER
    Define   [shift_dxyz.f, 48]        SHIFT_DXYZ
    Set   [shift_dxyz.f, 55]           SHIFT_DXYZ
    Use   [shift_dxyz.f, 56]           SHIFT_DXYZ
    Use   [shift_dxyz.f, 56]           SHIFT_DXYZ
    Set   [shift_dxyz.f, 66]           SHIFT_DXYZ
    Use   [shift_dxyz.f, 67]           SHIFT_DXYZ
    Use   [shift_dxyz.f, 67]           SHIFT_DXYZ
    Set   [shift_dxyz.f, 78]           SHIFT_DXYZ
    Use   [shift_dxyz.f, 79]           SHIFT_DXYZ
    Use   [shift_dxyz.f, 79]           SHIFT_DXYZ

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_axis.f, 60]        CHECK_AXIS
    Set   [check_axis.f, 107]          CHECK_AXIS
    Use   [check_axis.f, 108]          CHECK_AXIS
    Use   [check_axis.f, 109]          CHECK_AXIS
    Set   [check_axis.f, 167]          CHECK_AXIS
    Use   [check_axis.f, 168]          CHECK_AXIS
    Use   [check_axis.f, 168]          CHECK_AXIS
    Use   [check_axis.f, 169]          CHECK_AXIS
    Use   [check_axis.f, 172]          CHECK_AXIS
    Set   [check_axis.f, 185]          CHECK_AXIS
    Use   [check_axis.f, 186]          CHECK_AXIS
    Use   [check_axis.f, 187]          CHECK_AXIS
    Set   [check_axis.f, 198]          CHECK_AXIS
    Use   [check_axis.f, 199]          CHECK_AXIS

LC    (Local Variable)  Declared as: INTEGER
    Define   [open_files.f, 33]        OPEN_FILES
    Set   [open_files.f, 97]           OPEN_FILES
    Use   [open_files.f, 98]           OPEN_FILES
    Use   [open_files.f, 98]           OPEN_FILES
    Use   [open_files.f, 99]           OPEN_FILES
    Set   [open_files.f, 137]          OPEN_FILES
    Use   [open_files.f, 138]          OPEN_FILES
    Use   [open_files.f, 138]          OPEN_FILES
    Use   [open_files.f, 139]          OPEN_FILES
    Set   [open_files.f, 179]          OPEN_FILES
    Use   [open_files.f, 180]          OPEN_FILES
    Use   [open_files.f, 180]          OPEN_FILES
    Use   [open_files.f, 181]          OPEN_FILES

LC    (Local Variable)  Declared as: INTEGER
    Define   [out_bin_512r.f, 65]      OUT_BIN_512R
    Set   [out_bin_512r.f, 87]         OUT_BIN_512R

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mi.f, 149]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 205]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 208]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 249]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 250]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 250]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 255]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 267]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 268]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 269]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 270]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 272]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 272]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 274]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 275]       SET_PIC_BCMI_IJK

LC    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields1.f, 29]   COMP_MEAN_FIELDS1
    Set   [comp_mean_fields1.f, 71]    COMP_MEAN_FIELDS1
    Use   [comp_mean_fields1.f, 72]    COMP_MEAN_FIELDS1
    Use   [comp_mean_fields1.f, 74]    COMP_MEAN_FIELDS1

LC    (Local Variable)  Declared as: INTEGER
    Define   [out_bin_512.f, 65]       OUT_BIN_512
    Set   [out_bin_512.f, 86]          OUT_BIN_512

LC    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 514]    LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 595]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 596]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 596]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 597]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 598]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 599]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 599]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 599]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 607]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 608]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 608]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 609]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 610]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 611]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 611]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 611]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 682]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 684]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 685]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 687]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 688]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 690]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 691]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 693]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 693]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 697]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 702]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 765]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 766]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 767]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 768]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 769]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 790]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 794]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 794]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 795]       LAYOUT_DEM_MI_EW

LC    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 120]    LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 202]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 203]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 203]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 204]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 205]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 206]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 206]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 206]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 214]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 215]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 215]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 216]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 217]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 218]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 218]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 218]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 289]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 291]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 292]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 294]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 295]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 297]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 298]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 300]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 300]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 304]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 309]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 372]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 373]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 374]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 375]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 376]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 397]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 401]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 401]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 402]       LAYOUT_DEM_MI_NS

LC    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 908]    LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 991]       LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 992]       LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 992]       LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 993]       LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 994]       LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 995]       LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 995]       LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 995]       LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1002]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1003]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1003]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1004]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1005]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1006]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1006]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1006]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1058]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1060]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1061]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1063]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1064]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1066]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1067]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1069]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1069]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1073]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1078]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1141]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1142]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1143]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1144]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1145]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1166]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1170]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1170]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1171]      LAYOUT_DEM_MI_TB

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 619]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 679]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 686]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 686]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 689]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 690]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 693]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 694]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 695]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 696]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 699]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 711]    CHECK_SOLIDS_DEM_COLL_HERTZ

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 370]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 449]    CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 457]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 457]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 460]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 461]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 463]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 464]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 465]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 466]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 469]    CHECK_SOLIDS_DEM_COLL_LSD

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_out1.f, 50]        WRITE_OUT1
    Set   [write_out1.f, 89]           WRITE_OUT1
    Use   [write_out1.f, 90]           WRITE_OUT1
    Use   [write_out1.f, 92]           WRITE_OUT1
    Use   [write_out1.f, 95]           WRITE_OUT1
    Use   [write_out1.f, 96]           WRITE_OUT1
    Use   [write_out1.f, 97]           WRITE_OUT1
    Use   [write_out1.f, 99]           WRITE_OUT1
    Set   [write_out1.f, 109]          WRITE_OUT1
    Use   [write_out1.f, 110]          WRITE_OUT1
    Use   [write_out1.f, 112]          WRITE_OUT1
    Set   [write_out1.f, 126]          WRITE_OUT1
    Use   [write_out1.f, 127]          WRITE_OUT1
    Use   [write_out1.f, 128]          WRITE_OUT1
    Use   [write_out1.f, 129]          WRITE_OUT1
    Use   [write_out1.f, 131]          WRITE_OUT1
    Set   [write_out1.f, 158]          WRITE_OUT1
    Use   [write_out1.f, 159]          WRITE_OUT1
    Use   [write_out1.f, 161]          WRITE_OUT1
    Use   [write_out1.f, 165]          WRITE_OUT1
    Use   [write_out1.f, 167]          WRITE_OUT1
    Use   [write_out1.f, 171]          WRITE_OUT1
    Use   [write_out1.f, 173]          WRITE_OUT1
    Use   [write_out1.f, 178]          WRITE_OUT1
    Use   [write_out1.f, 180]          WRITE_OUT1
    Set   [write_out1.f, 189]          WRITE_OUT1
    Use   [write_out1.f, 190]          WRITE_OUT1
    Use   [write_out1.f, 192]          WRITE_OUT1
    Set   [write_out1.f, 208]          WRITE_OUT1
    Use   [write_out1.f, 209]          WRITE_OUT1
    Use   [write_out1.f, 211]          WRITE_OUT1

LC    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 22]           WRITE_DBG_VTU_AND_VTP_FILES
    Set   [vtk_out.f, 24]              WRITE_DBG_VTU_AND_VTP_FILES
    Use Argument   [vtk_out.f, 25]     WRITE_DBG_VTU_AND_VTP_FILES
    Use Argument   [vtk_out.f, 26]     WRITE_DBG_VTU_AND_VTP_FILES

LC    (Local Variable)  Declared as: INTEGER
    Define   [solve_k_epsilon_eq.f, 78]   SOLVE_K_Epsilon_EQ
    Set   [solve_k_epsilon_eq.f, 123]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 124]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 125]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 126]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 127]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 128]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 129]   SOLVE_K_Epsilon_EQ

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_continuum.f, 29]   CHECK_SOLIDS_CONTINUUM
    Set   [check_solids_continuum.f, 246]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 247]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 248]   CHECK_SOLIDS_CONTINUUM

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_res1.f, 69]        WRITE_RES1
    Set   [write_res1.f, 149]          WRITE_RES1
    Use   [write_res1.f, 151]          WRITE_RES1
    Use   [write_res1.f, 154]          WRITE_RES1
    Use   [write_res1.f, 156]          WRITE_RES1
    Use   [write_res1.f, 158]          WRITE_RES1
    Use   [write_res1.f, 160]          WRITE_RES1
    Use   [write_res1.f, 162]          WRITE_RES1
    Use   [write_res1.f, 164]          WRITE_RES1
    Use   [write_res1.f, 166]          WRITE_RES1
    Use   [write_res1.f, 167]          WRITE_RES1
    Set   [write_res1.f, 173]          WRITE_RES1
    Use   [write_res1.f, 174]          WRITE_RES1
    Set   [write_res1.f, 182]          WRITE_RES1
    Use   [write_res1.f, 183]          WRITE_RES1
    Use   [write_res1.f, 185]          WRITE_RES1
    Set   [write_res1.f, 190]          WRITE_RES1
    Use   [write_res1.f, 191]          WRITE_RES1

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_res0.f, 60]        WRITE_RES0
    Set   [write_res0.f, 106]          WRITE_RES0
    Use   [write_res0.f, 107]          WRITE_RES0
    Set   [write_res0.f, 141]          WRITE_RES0
    Use   [write_res0.f, 142]          WRITE_RES0
    Use   [write_res0.f, 142]          WRITE_RES0
    Set   [write_res0.f, 167]          WRITE_RES0
    Use   [write_res0.f, 168]          WRITE_RES0
    Use   [write_res0.f, 169]          WRITE_RES0
    Use   [write_res0.f, 170]          WRITE_RES0
    Use   [write_res0.f, 171]          WRITE_RES0
    Use   [write_res0.f, 172]          WRITE_RES0
    Use   [write_res0.f, 173]          WRITE_RES0
    Use   [write_res0.f, 174]          WRITE_RES0
    Set   [write_res0.f, 203]          WRITE_RES0
    Use   [write_res0.f, 204]          WRITE_RES0
    Use   [write_res0.f, 205]          WRITE_RES0
    Use   [write_res0.f, 206]          WRITE_RES0
    Use   [write_res0.f, 207]          WRITE_RES0
    Use   [write_res0.f, 208]          WRITE_RES0
    Use   [write_res0.f, 209]          WRITE_RES0
    Use   [write_res0.f, 210]          WRITE_RES0
    Use   [write_res0.f, 212]          WRITE_RES0
    Use   [write_res0.f, 214]          WRITE_RES0
    Set   [write_res0.f, 217]          WRITE_RES0
    Use   [write_res0.f, 218]          WRITE_RES0
    Set   [write_res0.f, 249]          WRITE_RES0
    Use   [write_res0.f, 250]          WRITE_RES0
    Set   [write_res0.f, 252]          WRITE_RES0
    Use   [write_res0.f, 253]          WRITE_RES0
    Set   [write_res0.f, 268]          WRITE_RES0
    Use   [write_res0.f, 269]          WRITE_RES0
    Set   [write_res0.f, 272]          WRITE_RES0
    Use   [write_res0.f, 273]          WRITE_RES0
    Set   [write_res0.f, 283]          WRITE_RES0
    Use   [write_res0.f, 284]          WRITE_RES0
    Use   [write_res0.f, 284]          WRITE_RES0
    Use   [write_res0.f, 285]          WRITE_RES0
    Use   [write_res0.f, 285]          WRITE_RES0
    Set   [write_res0.f, 290]          WRITE_RES0
    Use   [write_res0.f, 291]          WRITE_RES0
    Set   [write_res0.f, 323]          WRITE_RES0
    Use   [write_res0.f, 324]          WRITE_RES0
    Use   [write_res0.f, 325]          WRITE_RES0
    Use   [write_res0.f, 326]          WRITE_RES0
    Use   [write_res0.f, 327]          WRITE_RES0
    Set   [write_res0.f, 345]          WRITE_RES0
    Use   [write_res0.f, 346]          WRITE_RES0
    Use   [write_res0.f, 347]          WRITE_RES0
    Use   [write_res0.f, 381]          WRITE_RES0
    Set   [write_res0.f, 381]          WRITE_RES0
    Set   [write_res0.f, 383]          WRITE_RES0
    Use   [write_res0.f, 384]          WRITE_RES0
    Use   [write_res0.f, 385]          WRITE_RES0
    Use   [write_res0.f, 386]          WRITE_RES0
    Use   [write_res0.f, 386]          WRITE_RES0

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 80]        WRITE_SPX1
    Set   [write_spx1.f, 243]          WRITE_SPX1
    Use   [write_spx1.f, 245]          WRITE_SPX1
    Use   [write_spx1.f, 247]          WRITE_SPX1
    Use   [write_spx1.f, 249]          WRITE_SPX1
    Use   [write_spx1.f, 252]          WRITE_SPX1
    Use   [write_spx1.f, 252]          WRITE_SPX1
    Use   [write_spx1.f, 253]          WRITE_SPX1
    Use   [write_spx1.f, 253]          WRITE_SPX1
    Use   [write_spx1.f, 254]          WRITE_SPX1
    Use   [write_spx1.f, 254]          WRITE_SPX1
    Set   [write_spx1.f, 263]          WRITE_SPX1
    Use   [write_spx1.f, 264]          WRITE_SPX1
    Use   [write_spx1.f, 265]          WRITE_SPX1
    Use   [write_spx1.f, 266]          WRITE_SPX1
    Set   [write_spx1.f, 286]          WRITE_SPX1
    Use   [write_spx1.f, 288]          WRITE_SPX1
    Use   [write_spx1.f, 291]          WRITE_SPX1
    Use   [write_spx1.f, 291]          WRITE_SPX1
    Set   [write_spx1.f, 298]          WRITE_SPX1
    Use   [write_spx1.f, 299]          WRITE_SPX1
    Set   [write_spx1.f, 322]          WRITE_SPX1
    Use   [write_spx1.f, 323]          WRITE_SPX1
    Set   [write_spx1.f, 328]          WRITE_SPX1
    Use   [write_spx1.f, 329]          WRITE_SPX1
    Use   [write_spx1.f, 329]          WRITE_SPX1
    Set   [write_spx1.f, 338]          WRITE_SPX1
    Use   [write_spx1.f, 339]          WRITE_SPX1
    Set   [write_spx1.f, 363]          WRITE_SPX1
    Use   [write_spx1.f, 364]          WRITE_SPX1
    Use   [write_spx1.f, 365]          WRITE_SPX1
    Set   [write_spx1.f, 373]          WRITE_SPX1
    Use   [write_spx1.f, 374]          WRITE_SPX1
    Use   [write_spx1.f, 375]          WRITE_SPX1
    Use   [write_spx1.f, 375]          WRITE_SPX1
    Set   [write_spx1.f, 393]          WRITE_SPX1
    Use   [write_spx1.f, 394]          WRITE_SPX1
    Use   [write_spx1.f, 395]          WRITE_SPX1
    Set   [write_spx1.f, 417]          WRITE_SPX1
    Use   [write_spx1.f, 418]          WRITE_SPX1
    Set   [write_spx1.f, 422]          WRITE_SPX1
    Use   [write_spx1.f, 423]          WRITE_SPX1
    Use   [write_spx1.f, 423]          WRITE_SPX1
    Set   [write_spx1.f, 430]          WRITE_SPX1
    Use   [write_spx1.f, 431]          WRITE_SPX1
    Set   [write_spx1.f, 452]          WRITE_SPX1
    Use   [write_spx1.f, 453]          WRITE_SPX1
    Set   [write_spx1.f, 457]          WRITE_SPX1
    Use   [write_spx1.f, 458]          WRITE_SPX1
    Use   [write_spx1.f, 458]          WRITE_SPX1
    Set   [write_spx1.f, 465]          WRITE_SPX1
    Use   [write_spx1.f, 466]          WRITE_SPX1
    Set   [write_spx1.f, 486]          WRITE_SPX1
    Use   [write_spx1.f, 487]          WRITE_SPX1
    Set   [write_spx1.f, 491]          WRITE_SPX1
    Use   [write_spx1.f, 492]          WRITE_SPX1
    Use   [write_spx1.f, 492]          WRITE_SPX1
    Set   [write_spx1.f, 499]          WRITE_SPX1
    Use   [write_spx1.f, 500]          WRITE_SPX1

lc    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [read_database.f, 319]       writeCp
    Use   [read_database.f, 320]       writeCp
    Use   [read_database.f, 321]       writeCp
    Use   [read_database.f, 321]       writeCp

LC    (Local Variable)  Declared as: INTEGER
    Define   [read_res1.f, 60]         READ_RES1
    Set   [read_res1.f, 167]           READ_RES1
    Use   [read_res1.f, 168]           READ_RES1
    Use   [read_res1.f, 171]           READ_RES1
    Use   [read_res1.f, 174]           READ_RES1
    Use   [read_res1.f, 176]           READ_RES1
    Use   [read_res1.f, 177]           READ_RES1
    Use   [read_res1.f, 178]           READ_RES1
    Use   [read_res1.f, 181]           READ_RES1
    Use   [read_res1.f, 184]           READ_RES1
    Use   [read_res1.f, 185]           READ_RES1
    Set   [read_res1.f, 201]           READ_RES1
    Use   [read_res1.f, 202]           READ_RES1
    Use   [read_res1.f, 204]           READ_RES1

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 36]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 98]        SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 101]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 136]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 137]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 137]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 176]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 177]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 177]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 182]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 193]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 194]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 195]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 195]       SET_BC_DEM_MO

LC    (Local Variable)  Declared as: INTEGER
    Define   [reinitialize.f, 197]     REINIT_RXN_DATA
    Set   [reinitialize.f, 210]        REINIT_RXN_DATA
    Use   [reinitialize.f, 211]        REINIT_RXN_DATA
    Use   [reinitialize.f, 212]        REINIT_RXN_DATA
    Use   [reinitialize.f, 213]        REINIT_RXN_DATA
    Use   [reinitialize.f, 214]        REINIT_RXN_DATA
    Use   [reinitialize.f, 215]        REINIT_RXN_DATA
    Use   [reinitialize.f, 216]        REINIT_RXN_DATA
    Set   [reinitialize.f, 232]        REINIT_RXN_DATA
    Use   [reinitialize.f, 233]        REINIT_RXN_DATA
    Use   [reinitialize.f, 234]        REINIT_RXN_DATA
    Use   [reinitialize.f, 235]        REINIT_RXN_DATA
    Use   [reinitialize.f, 236]        REINIT_RXN_DATA
    Use   [reinitialize.f, 237]        REINIT_RXN_DATA
    Use   [reinitialize.f, 238]        REINIT_RXN_DATA

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_epg_des.f, 68]      CALC_EPG_DES
    Set   [calc_epg_des.f, 138]        CALC_EPG_DES
    Use   [calc_epg_des.f, 139]        CALC_EPG_DES

LC1    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 30]    WRITE_RES0_DES
    Set   [write_res0_des.f, 48]       WRITE_RES0_DES
    Use   [write_res0_des.f, 49]       WRITE_RES0_DES
    Set   [write_res0_des.f, 56]       WRITE_RES0_DES
    Use   [write_res0_des.f, 57]       WRITE_RES0_DES
    Set   [write_res0_des.f, 60]       WRITE_RES0_DES
    Use   [write_res0_des.f, 61]       WRITE_RES0_DES
    Set   [write_res0_des.f, 74]       WRITE_RES0_DES
    Use   [write_res0_des.f, 75]       WRITE_RES0_DES
    Set   [write_res0_des.f, 81]       WRITE_RES0_DES
    Use   [write_res0_des.f, 82]       WRITE_RES0_DES
    Set   [write_res0_des.f, 88]       WRITE_RES0_DES
    Use   [write_res0_des.f, 89]       WRITE_RES0_DES
    Set   [write_res0_des.f, 93]       WRITE_RES0_DES
    Use   [write_res0_des.f, 94]       WRITE_RES0_DES
    Use   [write_res0_des.f, 95]       WRITE_RES0_DES
    Use   [write_res0_des.f, 96]       WRITE_RES0_DES
    Use   [write_res0_des.f, 97]       WRITE_RES0_DES
    Use   [write_res0_des.f, 98]       WRITE_RES0_DES
    Use   [write_res0_des.f, 99]       WRITE_RES0_DES
    Use   [write_res0_des.f, 100]      WRITE_RES0_DES
    Use   [write_res0_des.f, 101]      WRITE_RES0_DES
    Use   [write_res0_des.f, 102]      WRITE_RES0_DES
    Use   [write_res0_des.f, 103]      WRITE_RES0_DES

lc1    (Local Variable)  Declared as: INTEGER
    Define   [set_ps.f, 282]           DEBUG_PS
    Set   [set_ps.f, 295]              DEBUG_PS
    Set   [set_ps.f, 301]              DEBUG_PS
    Use   [set_ps.f, 301]              DEBUG_PS
    Use   [set_ps.f, 306]              DEBUG_PS
    Use   [set_ps.f, 307]              DEBUG_PS
    Set   [set_ps.f, 378]              DEBUG_PS
    Set   [set_ps.f, 383]              DEBUG_PS
    Use   [set_ps.f, 383]              DEBUG_PS
    Use   [set_ps.f, 384]              DEBUG_PS

LC1    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 27]     READ_RES0_DES
    Set   [read_res0_des.f, 47]        READ_RES0_DES
    Use   [read_res0_des.f, 48]        READ_RES0_DES
    Set   [read_res0_des.f, 51]        READ_RES0_DES
    Use   [read_res0_des.f, 52]        READ_RES0_DES
    Set   [read_res0_des.f, 62]        READ_RES0_DES
    Use   [read_res0_des.f, 63]        READ_RES0_DES
    Set   [read_res0_des.f, 69]        READ_RES0_DES
    Use   [read_res0_des.f, 70]        READ_RES0_DES
    Set   [read_res0_des.f, 80]        READ_RES0_DES
    Use   [read_res0_des.f, 81]        READ_RES0_DES
    Set   [read_res0_des.f, 95]        READ_RES0_DES
    Use   [read_res0_des.f, 96]        READ_RES0_DES
    Use   [read_res0_des.f, 97]        READ_RES0_DES
    Use   [read_res0_des.f, 98]        READ_RES0_DES
    Use   [read_res0_des.f, 99]        READ_RES0_DES
    Use   [read_res0_des.f, 100]       READ_RES0_DES
    Use   [read_res0_des.f, 101]       READ_RES0_DES
    Use   [read_res0_des.f, 103]       READ_RES0_DES
    Use   [read_res0_des.f, 105]       READ_RES0_DES
    Use   [read_res0_des.f, 106]       READ_RES0_DES
    Use   [read_res0_des.f, 107]       READ_RES0_DES
    Use   [read_res0_des.f, 108]       READ_RES0_DES
    Use   [read_res0_des.f, 109]       READ_RES0_DES
    Use   [read_res0_des.f, 110]       READ_RES0_DES
    Use   [read_res0_des.f, 111]       READ_RES0_DES
    Use   [read_res0_des.f, 112]       READ_RES0_DES

lc1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 982]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1021]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1025]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1027]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1029]            IJK_Pg_SEARCH

LC1    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 1257]   SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1269]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1270]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1271]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1273]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1279]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1280]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1281]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1283]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1289]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1290]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1291]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1293]      SET_DEM_MI_OWNER

LC1    (Dummy Argument)  Declared as: INTEGER INTENT(IN) OPTIONAL
    Define   [check_data_30.f, 715]    REPORT_ERROR
    Declare   [check_data_30.f, 722]   REPORT_ERROR
    Use   [check_data_30.f, 729]       REPORT_ERROR
    Use Argument   [check_data_30.f, 730]   REPORT_ERROR
    Use   [check_data_30.f, 731]       REPORT_ERROR

LC1    (Dummy Argument)  Declared as: INTEGER INTENT(IN) OPTIONAL
    Define   [check_data_20.f, 267]    REPORT_ERROR
    Declare   [check_data_20.f, 272]   REPORT_ERROR
    Use   [check_data_20.f, 277]       REPORT_ERROR
    Use Argument   [check_data_20.f, 278]   REPORT_ERROR
    Use   [check_data_20.f, 279]       REPORT_ERROR

LC2    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 27]     READ_RES0_DES
    Set   [read_res0_des.f, 103]       READ_RES0_DES
    Use   [read_res0_des.f, 105]       READ_RES0_DES
    Use   [read_res0_des.f, 107]       READ_RES0_DES
    Use   [read_res0_des.f, 109]       READ_RES0_DES
    Use   [read_res0_des.f, 111]       READ_RES0_DES

lc2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 981]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1020]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1025]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1027]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1029]            IJK_Pg_SEARCH

LC2    (Dummy Argument)  Declared as: INTEGER INTENT(IN) OPTIONAL
    Define   [check_data_30.f, 715]    REPORT_ERROR
    Declare   [check_data_30.f, 722]   REPORT_ERROR
    Use Argument   [check_data_30.f, 728]   REPORT_ERROR
    Use   [check_data_30.f, 729]       REPORT_ERROR

LC2    (Dummy Argument)  Declared as: INTEGER INTENT(IN) OPTIONAL
    Define   [check_data_20.f, 267]    REPORT_ERROR
    Declare   [check_data_20.f, 272]   REPORT_ERROR
    Use Argument   [check_data_20.f, 276]   REPORT_ERROR
    Use   [check_data_20.f, 277]       REPORT_ERROR

lCALL_ISAT    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [write_res0.f, 66]        WRITE_RES0
    Set   [write_res0.f, 66]           WRITE_RES0
    Use   [write_res0.f, 376]          WRITE_RES0

lChemEq    (Dummy Argument)  Declared as: CHARACTER INTENT(OUT)
    Define   [parse_rxn.f, 642]        getChemEq
    Declare   [parse_rxn.f, 649]       getChemEq
    Set   [parse_rxn.f, 669]           getChemEq
    Set   [parse_rxn.f, 745]           getChemEq
    Use Argument   [parse_rxn.f, 745]   getChemEq
    Use Argument   [parse_rxn.f, 748]   getChemEq

lChemEq    (Dummy Argument)  Declared as: CHARACTER INTENT(INOUT)
    Define   [parse_rxn.f, 22]         PARSE_RXN
    Declare   [parse_rxn.f, 42]        PARSE_RXN
    Use Argument   [parse_rxn.f, 100]   PARSE_RXN
    Use Argument   [parse_rxn.f, 117]   PARSE_RXN
    Use Argument   [parse_rxn.f, 137]   PARSE_RXN
    Use Argument   [parse_rxn.f, 144]   PARSE_RXN

Lcol    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_mobility.f, 30]   thermal_mobility
    Set   [thermal_mobility.f, 106]    thermal_mobility
    Set   [thermal_mobility.f, 112]    thermal_mobility
    Use   [thermal_mobility.f, 112]    thermal_mobility
    Use   [thermal_mobility.f, 120]    thermal_mobility

lcount    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 257]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 338]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 341]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 341]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 341]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 345]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 345]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 345]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 349]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 349]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 349]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 352]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 352]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 352]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 354]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 354]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 354]      WRITE_DES_TECPLOT

LCOUNT1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4611]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4623]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4626]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4627]   GET_LIP_WITH_GHOST_LAYERS

LCOUNT1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5373]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5385]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5388]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5389]   GET_LIP_WITH_GHOST_LAYERS0

LCOUNT2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4611]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4624]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4626]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4627]   GET_LIP_WITH_GHOST_LAYERS

LCOUNT2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5373]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5386]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5388]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5389]   GET_LIP_WITH_GHOST_LAYERS0

lCP    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [read_database.f, 336]       writeCp
    Use   [read_database.f, 338]       writeCp
    Set   [read_database.f, 355]       writeCp
    Use   [read_database.f, 357]       writeCp

lCp    (Unknown Variable)    Set   [physical_prop.f, 366]       PHYSICAL_PROP_CPg
    Use   [physical_prop.f, 367]       PHYSICAL_PROP_CPg
    Set   [physical_prop.f, 451]       PHYSICAL_PROP_CPs
    Use   [physical_prop.f, 453]       PHYSICAL_PROP_CPs

lCP_Err    (Unknown Variable)    Set   [physical_prop.f, 359]       PHYSICAL_PROP_CPg
    Use Argument   [physical_prop.f, 366]   PHYSICAL_PROP_CPg
    Use Argument   [physical_prop.f, 368]   PHYSICAL_PROP_CPg
    Set   [physical_prop.f, 442]       PHYSICAL_PROP_CPs
    Use Argument   [physical_prop.f, 451]   PHYSICAL_PROP_CPs

lCPoR    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [des_physical_prop.f, 62]    DES_PHYSICAL_PROP
    Use   [des_physical_prop.f, 64]    DES_PHYSICAL_PROP

lcTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_u_g.f, 243]          CALC_CG_TAU_U_G
    Declare   [tau_u_g.f, 272]         CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 582]    CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 585]             CALC_CG_TAU_U_G

lcTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_u_g.f, 51]           CALC_TAU_U_G
    Declare   [tau_u_g.f, 77]          CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 208]    CALC_TAU_U_G
    Set   [tau_u_g.f, 212]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 219]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 223]    CALC_TAU_U_G

lcTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [tau_u_g.f, 602]          GET_FULL_TAU_U_G
    Declare   [tau_u_g.f, 630]         GET_FULL_TAU_U_G
    Set   [tau_u_g.f, 691]             GET_FULL_TAU_U_G

lcTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_v_g.f, 193]          CALC_CG_TAU_V_G
    Declare   [tau_v_g.f, 226]         CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 535]    CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 538]             CALC_CG_TAU_V_G

lcTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_v_g.f, 35]           CALC_TAU_V_G
    Declare   [tau_v_g.f, 61]          CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 159]    CALC_TAU_V_G
    Set   [tau_v_g.f, 163]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 170]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 174]    CALC_TAU_V_G

lcTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [tau_v_g.f, 555]          GET_FULL_TAU_V_G
    Declare   [tau_v_g.f, 580]         GET_FULL_TAU_V_G
    Set   [tau_v_g.f, 624]             GET_FULL_TAU_V_G

lcTAU_w_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_w_g.f, 256]          CALC_CG_TAU_w_G
    Declare   [tau_w_g.f, 286]         CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 584]    CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 588]             CALC_CG_TAU_w_G

lcTAU_w_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_w_g.f, 61]           CALC_TAU_W_G
    Declare   [tau_w_g.f, 87]          CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 221]    CALC_TAU_W_G
    Set   [tau_w_g.f, 225]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 232]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 236]    CALC_TAU_W_G

lcTAU_W_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [tau_w_g.f, 605]          GET_FULL_TAU_W_G
    Declare   [tau_w_g.f, 634]         GET_FULL_TAU_W_G
    Set   [tau_w_g.f, 731]             GET_FULL_TAU_W_G

lcurpar    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 38]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 173]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 175]     MAKE_ARRAYS_DES

lcurpar    (Local Variable)  Declared as: INTEGER
    Define   [read_particle_input.f, 30]   READ_PAR_INPUT
    Set   [read_particle_input.f, 82]   READ_PAR_INPUT
    Use Argument   [read_particle_input.f, 83]   READ_PAR_INPUT
    Use   [read_particle_input.f, 84]   READ_PAR_INPUT
    Use   [read_particle_input.f, 85]   READ_PAR_INPUT
    Use   [read_particle_input.f, 85]   READ_PAR_INPUT
    Use   [read_particle_input.f, 86]   READ_PAR_INPUT
    Set   [read_particle_input.f, 102]   READ_PAR_INPUT
    Use   [read_particle_input.f, 104]   READ_PAR_INPUT
    Use   [read_particle_input.f, 104]   READ_PAR_INPUT
    Use   [read_particle_input.f, 105]   READ_PAR_INPUT
    Use   [read_particle_input.f, 105]   READ_PAR_INPUT
    Use Argument   [read_particle_input.f, 118]   READ_PAR_INPUT

LCV    (Dummy Argument)  Declared as: INTEGER
    Define   [vtk_out.f, 45]           WRITE_VTU_FILE
    Declare   [vtk_out.f, 78]          WRITE_VTU_FILE
    Use   [vtk_out.f, 96]              WRITE_VTU_FILE
    Use   [vtk_out.f, 98]              WRITE_VTU_FILE
    Use   [vtk_out.f, 99]              WRITE_VTU_FILE
    Use   [vtk_out.f, 100]             WRITE_VTU_FILE

lData_dp    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [set_ps.f, 33]            SET_PS
    Set   [set_ps.f, 76]               SET_PS
    Set   [set_ps.f, 76]               SET_PS
    Set   [set_ps.f, 94]               SET_PS
    Use   [set_ps.f, 94]               SET_PS
    Use Argument   [set_ps.f, 104]     SET_PS
    Use Argument   [set_ps.f, 113]     SET_PS
    Set   [set_ps.f, 113]              SET_PS

LDB    (Dummy Argument)  Declared as: INTEGER
    Define   [DGTSV.f, 2]              DGTSV
    Declare   [DGTSV.f, 11]            DGTSV
    Use   [DGTSV.f, 14]                DGTSV
    Use   [DGTSV.f, 97]                DGTSV

lDBG    (Dummy Argument)  Declared as: LOGICAL INTENT(IN)
    Define   [diffuse_mean_fields.f, 121]   CALC_DIF_DES
    Declare   [diffuse_mean_fields.f, 135]   CALC_DIF_DES
    Use   [diffuse_mean_fields.f, 158]   CALC_DIF_DES

lDEBUG    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [check_cell_movement.f, 215]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 215]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 221]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 253]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 264]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 282]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 294]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 312]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 323]   CHECK_CELL_MOVEMENT_PIC

lDELETED    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 211]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 225]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 260]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 260]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 290]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 290]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 319]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 319]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 346]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 350]   CHECK_CELL_MOVEMENT_PIC

ldFlag    (Dummy Argument)  Declared as: LOGICAL INTENT(IN)
    Define   [set_bc0.f, 958]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 975]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1014]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1105]            IJK_Pg_SEARCH

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1278]         DRAG_BVK
    Declare   [drag_gs.f, 1291]        DRAG_BVK
    Set   [drag_gs.f, 1333]            DRAG_BVK
    Set   [drag_gs.f, 1334]            DRAG_BVK

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 484]          DRAG_GIDASPOW
    Declare   [drag_gs.f, 497]         DRAG_GIDASPOW
    Set   [drag_gs.f, 526]             DRAG_GIDASPOW
    Set   [drag_gs.f, 536]             DRAG_GIDASPOW
    Set   [drag_gs.f, 539]             DRAG_GIDASPOW

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 561]          DRAG_GIDASPOW_BLEND
    Declare   [drag_gs.f, 575]         DRAG_GIDASPOW_BLEND
    Set   [drag_gs.f, 625]             DRAG_GIDASPOW_BLEND
    Set   [drag_gs.f, 626]             DRAG_GIDASPOW_BLEND

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1352]         DRAG_HYS
    Declare   [drag_gs.f, 1367]        DRAG_HYS
    Set   [drag_gs.f, 1484]            DRAG_HYS

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1152]         DRAG_KOCH_HILL
    Declare   [drag_gs.f, 1165]        DRAG_KOCH_HILL
    Set   [drag_gs.f, 1259]            DRAG_KOCH_HILL
    Set   [drag_gs.f, 1260]            DRAG_KOCH_HILL

ldGA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 392]          DRAG_SYAM_OBRIEN
    Declare   [drag_gs.f, 407]         DRAG_SYAM_OBRIEN
    Set   [drag_gs.f, 466]             DRAG_SYAM_OBRIEN
    Set   [drag_gs.f, 468]             DRAG_SYAM_OBRIEN

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 644]          DRAG_WEN_YU
    Declare   [drag_gs.f, 656]         DRAG_WEN_YU
    Set   [drag_gs.f, 690]             DRAG_WEN_YU
    Set   [drag_gs.f, 691]             DRAG_WEN_YU

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [drag_gs.f, 720]          SUBGRID_DRAG_IGCI
    Declare   [drag_gs.f, 735]         SUBGRID_DRAG_IGCI
    Set   [drag_gs.f, 825]             SUBGRID_DRAG_IGCI
    Use   [drag_gs.f, 825]             SUBGRID_DRAG_IGCI

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [drag_gs.f, 855]          SUBGRID_DRAG_MILIOLI
    Declare   [drag_gs.f, 871]         SUBGRID_DRAG_MILIOLI
    Set   [drag_gs.f, 1056]            SUBGRID_DRAG_MILIOLI
    Use   [drag_gs.f, 1056]            SUBGRID_DRAG_MILIOLI

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [usr_drag.f, 25]          DRAG_USR
    Declare   [usr_drag.f, 39]         DRAG_USR
    Set   [usr_drag.f, 65]             DRAG_USR

lDH    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [parse_rxn.f, 451]        getDH
    Declare   [parse_rxn.f, 456]       getDH
    Set   [parse_rxn.f, 480]           getDH

lDH    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [parse_rxn.f, 22]         PARSE_RXN
    Declare   [parse_rxn.f, 44]        PARSE_RXN
    Use Argument   [parse_rxn.f, 117]   PARSE_RXN
    Use Argument   [parse_rxn.f, 138]   PARSE_RXN
    Use Argument   [parse_rxn.f, 145]   PARSE_RXN

lDIF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [diffuse_mean_fields.f, 141]   CALC_DIF_DES
    Set   [diffuse_mean_fields.f, 148]   CALC_DIF_DES
    Use   [diffuse_mean_fields.f, 154]   CALC_DIF_DES
    Use Argument   [diffuse_mean_fields.f, 159]   CALC_DIF_DES

LDIF    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 493]       PARSE_ARITH
    Set   [parse_line.f, 560]          PARSE_ARITH
    Use   [parse_line.f, 561]          PARSE_ARITH
    Use   [parse_line.f, 566]          PARSE_ARITH
    Use   [parse_line.f, 566]          PARSE_ARITH

lDIM_N    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 153]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 161]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 166]              CALC_PS_CpxMFLOW
    Use   [set_ps.f, 168]              CALC_PS_CpxMFLOW

lDIMN    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 32]    WRITE_RES0_DES
    Set   [write_res0_des.f, 40]       WRITE_RES0_DES
    Use   [write_res0_des.f, 48]       WRITE_RES0_DES
    Use   [write_res0_des.f, 56]       WRITE_RES0_DES
    Use   [write_res0_des.f, 88]       WRITE_RES0_DES

lDIMN    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 306]   PIC_SEARCH
    Declare   [particles_in_cell.f, 317]   PIC_SEARCH
    Use   [particles_in_cell.f, 319]   PIC_SEARCH

lDIMN    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 28]     READ_RES0_DES
    Set   [read_res0_des.f, 32]        READ_RES0_DES
    Use   [read_res0_des.f, 47]        READ_RES0_DES
    Use   [read_res0_des.f, 80]        READ_RES0_DES

ldP    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 654]        getChemEq
    Set   [parse_rxn.f, 677]           getChemEq
    Use   [parse_rxn.f, 680]           getChemEq
    Use   [parse_rxn.f, 682]           getChemEq
    Use   [parse_rxn.f, 685]           getChemEq

lDP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 65]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 106]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 115]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 116]   DRAG_SS_DEM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 124]   DRAG_SS_DEM_NONINTERP

lDP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 216]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 254]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 267]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 268]   DRAG_SS_TFM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 270]   DRAG_SS_TFM_NONINTERP

lDRAG_BM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 256]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 321]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 329]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 331]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 333]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 342]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 344]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 346]        DRAG_GS_GAS1

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss.f, 70]           DRAG_SS
    Use Argument   [drag_ss.f, 128]    DRAG_SS
    Use   [drag_ss.f, 130]             DRAG_SS

ldss    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_ss.f, 167]          DRAG_SS_SYAM
    Declare   [drag_ss.f, 181]         DRAG_SS_SYAM
    Set   [drag_ss.f, 211]             DRAG_SS_SYAM

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 67]   DRAG_SS_DEM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 124]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 127]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 127]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 131]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 131]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 135]   DRAG_SS_DEM_NONINTERP

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 218]   DRAG_SS_TFM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 270]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 273]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 273]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 277]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 277]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 281]   DRAG_SS_TFM_NONINTERP

lDT    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [dif_phi_source_des.f, 12]   DIF_PHI_SOURCE_DES
    Declare   [dif_phi_source_des.f, 48]   DIF_PHI_SOURCE_DES
    Use   [dif_phi_source_des.f, 60]   DIF_PHI_SOURCE_DES

LE    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 70]     DISPLAY_FIELD_RESID
    Set   [display_resid.f, 78]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 79]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 85]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 86]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 97]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 98]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 105]       DISPLAY_FIELD_RESID
    Use   [display_resid.f, 106]       DISPLAY_FIELD_RESID

LE    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 139]    DISPLAY_GROUP_RESID
    Set   [display_resid.f, 146]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 147]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 152]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 153]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 159]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 160]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 166]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 167]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 173]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 174]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 180]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 181]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 186]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 187]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 200]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 201]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 206]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 207]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 213]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 214]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 220]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 221]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 227]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 228]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 234]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 235]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 240]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 241]       DISPLAY_GROUP_RESID

lE1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 982]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1001]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1017]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1021]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1062]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1066]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1066]            IJK_Pg_SEARCH

lE2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 981]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1002]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1020]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1063]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1069]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1069]            IJK_Pg_SEARCH

LEGACY_LOCKED    (Unknown Variable)    Use   [read_namelist.f, 446]       SET_KEYWORD

LEGEND    (Dummy Argument)  Declared as: CHARACTER
    Define   [write_table.f, 23]       WRITE_TABLE
    Declare   [write_table.f, 39]      WRITE_TABLE
    Use   [write_table.f, 102]         WRITE_TABLE
    Use   [write_table.f, 103]         WRITE_TABLE
    Use   [write_table.f, 104]         WRITE_TABLE
    Use   [write_table.f, 109]         WRITE_TABLE
    Use   [write_table.f, 110]         WRITE_TABLE
    Use   [write_table.f, 111]         WRITE_TABLE

LEGEND    (Local Variable)  Declared as: CHARACTER
    Define   [write_out0.f, 60]        WRITE_OUT0
    Set   [write_out0.f, 224]          WRITE_OUT0
    Set   [write_out0.f, 225]          WRITE_OUT0
    Set   [write_out0.f, 226]          WRITE_OUT0
    Use Argument   [write_out0.f, 227]   WRITE_OUT0
    Set   [write_out0.f, 232]          WRITE_OUT0
    Set   [write_out0.f, 233]          WRITE_OUT0
    Set   [write_out0.f, 234]          WRITE_OUT0
    Use Argument   [write_out0.f, 235]   WRITE_OUT0
    Set   [write_out0.f, 239]          WRITE_OUT0
    Set   [write_out0.f, 240]          WRITE_OUT0
    Set   [write_out0.f, 241]          WRITE_OUT0
    Use Argument   [write_out0.f, 242]   WRITE_OUT0

lEm    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_thermo_rad.f, 44]    DES_RADIATION
    Set   [des_thermo_rad.f, 54]       DES_RADIATION
    Use   [des_thermo_rad.f, 59]       DES_RADIATION

LEND    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2554]   WRITE_INT_TABLE
    Declare   [set_increments.f, 2583]   WRITE_INT_TABLE
    Use   [set_increments.f, 2613]     WRITE_INT_TABLE
    Use   [set_increments.f, 2621]     WRITE_INT_TABLE
    Use   [set_increments.f, 2623]     WRITE_INT_TABLE

lEND    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 306]   PIC_SEARCH
    Declare   [particles_in_cell.f, 321]   PIC_SEARCH
    Use   [particles_in_cell.f, 323]   PIC_SEARCH

LEND    (Dummy Argument)  Declared as: INTEGER
    Define   [write_table.f, 23]       WRITE_TABLE
    Declare   [write_table.f, 48]      WRITE_TABLE
    Use   [write_table.f, 51]          WRITE_TABLE
    Use   [write_table.f, 91]          WRITE_TABLE
    Use   [write_table.f, 94]          WRITE_TABLE
    Use   [write_table.f, 96]          WRITE_TABLE
    Use   [write_table.f, 106]         WRITE_TABLE
    Use   [write_table.f, 108]         WRITE_TABLE

LEND    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 487]       PARSE_ARITH
    Set   [parse_line.f, 518]          PARSE_ARITH
    Use   [parse_line.f, 519]          PARSE_ARITH
    Use   [parse_line.f, 529]          PARSE_ARITH
    Use   [parse_line.f, 532]          PARSE_ARITH
    Use   [parse_line.f, 553]          PARSE_ARITH
    Use   [parse_line.f, 555]          PARSE_ARITH
    Use   [parse_line.f, 565]          PARSE_ARITH

LEND    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 56]        PARSE_LINE
    Set   [parse_line.f, 77]           PARSE_LINE
    Use   [parse_line.f, 78]           PARSE_LINE
    Use   [parse_line.f, 84]           PARSE_LINE
    Use   [parse_line.f, 84]           PARSE_LINE
    Use   [parse_line.f, 102]          PARSE_LINE
    Use   [parse_line.f, 102]          PARSE_LINE
    Use   [parse_line.f, 109]          PARSE_LINE
    Use   [parse_line.f, 109]          PARSE_LINE

LENGTH    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 490]       PARSE_ARITH
    Set   [parse_line.f, 553]          PARSE_ARITH
    Use   [parse_line.f, 554]          PARSE_ARITH
    Use   [parse_line.f, 558]          PARSE_ARITH
    Use   [parse_line.f, 560]          PARSE_ARITH

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 80]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 111]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 122]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 122]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 132]        DRAG_GS_DES1
    Use Argument   [drag_gs_des1.f, 148]   DRAG_GS_DES1

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 250]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 288]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 298]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 298]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 306]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 313]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 313]        DRAG_GS_GAS1
    Use Argument   [drag_gs_des1.f, 316]   DRAG_GS_GAS1

lEPSoDP    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_ss_dem_noninterp.f, 401]   CALC_EPSoDP
    Declare   [drag_ss_dem_noninterp.f, 432]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 440]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 445]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 445]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 448]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 448]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 452]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 452]   CALC_EPSoDP

LEQ_BICGS0.MATVEC    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_bicgs.f, 111]        LEQ_BICGS0
    Call   [leq_bicgs.f, 280]          LEQ_BICGS0
    Call   [leq_bicgs.f, 398]          LEQ_BICGS0
    Call   [leq_bicgs.f, 468]          LEQ_BICGS0
    Call   [leq_bicgs.f, 508]          LEQ_BICGS0
    Call   [leq_bicgs.f, 603]          LEQ_BICGS0

LEQ_BICGS0.MSOLVE    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_bicgs.f, 111]        LEQ_BICGS0
    Call   [leq_bicgs.f, 397]          LEQ_BICGS0
    Call   [leq_bicgs.f, 507]          LEQ_BICGS0

LEQ_CG0.MATVEC    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_cg.f, 98]            LEQ_CG0
    Call   [leq_cg.f, 238]             LEQ_CG0
    Call   [leq_cg.f, 338]             LEQ_CG0
    Call   [leq_cg.f, 414]             LEQ_CG0

LEQ_CG0.MSOLVE    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_cg.f, 98]            LEQ_CG0
    Call   [leq_cg.f, 276]             LEQ_CG0

LEQ_GMRES0.MATVEC    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_gmres.f, 99]         LEQ_GMRES0
    Call   [leq_gmres.f, 232]          LEQ_GMRES0
    Call   [leq_gmres.f, 266]          LEQ_GMRES0
    Call   [leq_gmres.f, 305]          LEQ_GMRES0
    Call   [leq_gmres.f, 515]          LEQ_GMRES0
    Call   [leq_gmres.f, 558]          LEQ_GMRES0

LEQ_GMRES0.MSOLVE    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_gmres.f, 99]         LEQ_GMRES0
    Call   [leq_gmres.f, 245]          LEQ_GMRES0
    Call   [leq_gmres.f, 280]          LEQ_GMRES0
    Call   [leq_gmres.f, 307]          LEQ_GMRES0
    Call   [leq_gmres.f, 529]          LEQ_GMRES0

LEQ_IT_CONV    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [adjust_leq.f, 41]        ADJUST_LEQ
    Set   [adjust_leq.f, 41]           ADJUST_LEQ

LEQ_ITL    (Dummy Argument)  Declared as: INTEGER
    Define   [adjust_leq.f, 20]        ADJUST_LEQ
    Declare   [adjust_leq.f, 34]       ADJUST_LEQ
    Use   [adjust_leq.f, 55]           ADJUST_LEQ

LEQ_METHOD_CONV    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [adjust_leq.f, 42]        ADJUST_LEQ
    Set   [adjust_leq.f, 42]           ADJUST_LEQ

LEQ_METHOD_NAME    (Local Variable)  Declared as: CHARACTER
    Define   [write_out0.f, 63]        WRITE_OUT0
    Set   [write_out0.f, 71]           WRITE_OUT0
    Use   [write_out0.f, 187]          WRITE_OUT0
    Use   [write_out0.f, 192]          WRITE_OUT0

LEQ_METHODL    (Dummy Argument)  Declared as: INTEGER
    Define   [adjust_leq.f, 20]        ADJUST_LEQ
    Declare   [adjust_leq.f, 34]       ADJUST_LEQ
    Use   [adjust_leq.f, 54]           ADJUST_LEQ

leq_tol_scheme1    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [solve_lin_eq.f, 84]      SOLVE_LIN_EQ
    Set   [solve_lin_eq.f, 84]         SOLVE_LIN_EQ
    Use   [solve_lin_eq.f, 108]        SOLVE_LIN_EQ

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_epp.f, 71]         SOLVE_EPP
    Use Argument   [solve_epp.f, 138]   SOLVE_EPP
    Use Argument   [solve_epp.f, 141]   SOLVE_EPP

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_pp_g.f, 65]        SOLVE_PP_G
    Set   [solve_pp_g.f, 121]          SOLVE_PP_G
    Use Argument   [solve_pp_g.f, 127]   SOLVE_PP_G

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_energy_eq.f, 79]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 274]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 277]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 292]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 294]   SOLVE_ENERGY_EQ

LEQI    (Dummy Argument)  Declared as: INTEGER
    Define   [adjust_leq.f, 20]        ADJUST_LEQ
    Declare   [adjust_leq.f, 34]       ADJUST_LEQ
    Set   [adjust_leq.f, 55]           ADJUST_LEQ

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_granular_energy.f, 73]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 219]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 337]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 340]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 421]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 424]   SOLVE_GRANULAR_ENERGY

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_continuity.f, 51]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 88]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 89]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 119]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 120]   SOLVE_CONTINUITY

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_scalar_eq.f, 89]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 168]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 171]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 234]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 237]   SOLVE_Scalar_EQ

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_species_eq.f, 72]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 169]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 173]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 258]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 261]   SOLVE_SPECIES_EQ

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_k_epsilon_eq.f, 90]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 198]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 201]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 356]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 359]   SOLVE_K_Epsilon_EQ

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [diffuse_mean_fields.f, 51]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 88]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 90]   DIFFUSE_MEAN_FIELD

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_vel_star.f, 80]    SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 234]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 235]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 248]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 250]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 361]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 362]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 375]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 377]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 486]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 487]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 500]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 502]   SOLVE_VEL_STAR

LEQIT    (Dummy Argument)  Declared as: INTEGER
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 56]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 124]   TEST_LIN_EQ

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_epp.f, 71]         SOLVE_EPP
    Use Argument   [solve_epp.f, 138]   SOLVE_EPP
    Use Argument   [solve_epp.f, 141]   SOLVE_EPP

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_pp_g.f, 65]        SOLVE_PP_G
    Set   [solve_pp_g.f, 122]          SOLVE_PP_G
    Use Argument   [solve_pp_g.f, 127]   SOLVE_PP_G

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_energy_eq.f, 79]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 274]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 277]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 292]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 295]   SOLVE_ENERGY_EQ

LEQM    (Dummy Argument)  Declared as: INTEGER
    Define   [adjust_leq.f, 20]        ADJUST_LEQ
    Declare   [adjust_leq.f, 34]       ADJUST_LEQ
    Set   [adjust_leq.f, 54]           ADJUST_LEQ

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_granular_energy.f, 73]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 219]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 337]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 340]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 421]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 424]   SOLVE_GRANULAR_ENERGY

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_continuity.f, 51]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 88]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 90]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 119]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 121]   SOLVE_CONTINUITY

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_scalar_eq.f, 89]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 168]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 171]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 234]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 237]   SOLVE_Scalar_EQ

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_species_eq.f, 72]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 169]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 173]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 258]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 261]   SOLVE_SPECIES_EQ

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_k_epsilon_eq.f, 90]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 198]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 201]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 356]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 359]   SOLVE_K_Epsilon_EQ

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [diffuse_mean_fields.f, 51]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 88]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 90]   DIFFUSE_MEAN_FIELD

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_vel_star.f, 80]    SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 234]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 235]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 248]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 250]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 361]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 362]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 375]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 377]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 486]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 488]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 500]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 502]   SOLVE_VEL_STAR

LEQMETHOD    (Dummy Argument)  Declared as: INTEGER
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 56]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 124]   TEST_LIN_EQ

LEQPC    (Dummy Argument)  Declared as: CHARACTER
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 59]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 124]   TEST_LIN_EQ

leqsol.DO_TRANSPOSE    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 34]        leqsol
    Set   [check_numerics.f, 110]      CHECK_NUMERICS
    Set   [init_namelist.f, 810]       INIT_NAMELIST
    Use   [solve_lin_eq.f, 139]        SOLVE_LIN_EQ

leqsol.dot_product_par.do_global_sum    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [leqsol_mod.f, 1120]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1120]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1129]         leqsol.dot_product_par

leqsol.dot_product_par.i    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1126]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1148]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1150]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1176]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1178]         leqsol.dot_product_par

leqsol.dot_product_par.ijk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1126]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1135]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1136]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1136]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1136]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1150]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1151]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1151]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1178]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1180]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1180]         leqsol.dot_product_par

leqsol.dot_product_par.j    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1126]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1149]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1150]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1177]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1178]         leqsol.dot_product_par

leqsol.dot_product_par.k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1126]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1147]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1150]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1175]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1178]         leqsol.dot_product_par

leqsol.dot_product_par.prod    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 1125]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1130]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1136]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1136]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1139]   leqsol.dot_product_par
    Set   [leqsol_mod.f, 1151]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1151]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1156]   leqsol.dot_product_par
    Set   [leqsol_mod.f, 1172]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1180]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1180]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1186]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1188]         leqsol.dot_product_par

leqsol.dot_product_par.r1    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1100]      leqsol.dot_product_par
    Declare   [leqsol_mod.f, 1116]     leqsol.dot_product_par
    Use   [leqsol_mod.f, 1136]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1151]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1168]   leqsol.dot_product_par

leqsol.dot_product_par.r1_g    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [leqsol_mod.f, 1124]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1162]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1165]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1168]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1180]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1190]         leqsol.dot_product_par

leqsol.dot_product_par.r2    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1100]      leqsol.dot_product_par
    Declare   [leqsol_mod.f, 1116]     leqsol.dot_product_par
    Use   [leqsol_mod.f, 1136]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1151]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1169]   leqsol.dot_product_par

leqsol.dot_product_par.r2_g    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [leqsol_mod.f, 1124]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1163]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1166]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1169]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1180]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1191]         leqsol.dot_product_par

leqsol.dot_product_par2.do_global_sum    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [leqsol_mod.f, 1222]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1222]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1231]         leqsol.dot_product_par2

leqsol.dot_product_par2.i    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1228]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1237]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1240]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1242]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1269]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1271]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1272]         leqsol.dot_product_par2

leqsol.dot_product_par2.ijk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1228]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1242]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1243]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1243]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1244]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1244]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1272]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1274]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1274]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1275]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1275]         leqsol.dot_product_par2

leqsol.dot_product_par2.j    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1228]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1238]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1240]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1242]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1270]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1271]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1272]         leqsol.dot_product_par2

leqsol.dot_product_par2.k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1228]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1236]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1240]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1242]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1268]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1271]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1272]         leqsol.dot_product_par2

leqsol.dot_product_par2.prod    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 1227]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1233]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1243]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1243]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1244]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1244]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1249]   leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1266]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1274]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1274]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1275]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1275]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1280]   leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1282]         leqsol.dot_product_par2

leqsol.dot_product_par2.r1    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1204]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1218]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1243]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1253]         leqsol.dot_product_par2

leqsol.dot_product_par2.r2    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1204]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1218]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1243]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1254]         leqsol.dot_product_par2

leqsol.dot_product_par2.r3    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1204]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1218]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1244]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1255]         leqsol.dot_product_par2

leqsol.dot_product_par2.r4    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1204]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1218]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1244]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1256]         leqsol.dot_product_par2

leqsol.dot_product_par2.r_temp    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [leqsol_mod.f, 1226]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1252]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1253]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1254]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1255]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1256]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1263]   leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1284]         leqsol.dot_product_par2

leqsol.dot_product_par2.rg_temp    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [leqsol_mod.f, 1226]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1259]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1261]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1263]   leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1274]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1274]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1275]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1275]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1285]         leqsol.dot_product_par2

leqsol.ICHECK_BICGS    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 37]        leqsol
    Set   [init_namelist.f, 818]       INIT_NAMELIST
    Use Argument   [leq_bicgs.f, 557]   LEQ_BICGS0

leqsol.ITER_TOT    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 19]        leqsol
    Set   [leqsol_mod.f, 19]           leqsol
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS
    Set   [leq_sor.f, 120]             LEQ_SOR
    Set   [leq_bicgst.f, 549]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 549]          LEQ_BICGS0t
    Set   [leq_bicgst.f, 598]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 598]          LEQ_BICGS0t
    Set   [leq_cg.f, 401]              LEQ_CG0
    Use   [leq_cg.f, 401]              LEQ_CG0
    Set   [leq_cg.f, 448]              LEQ_CG0
    Use   [leq_cg.f, 448]              LEQ_CG0
    Set   [leq_bicgs.f, 589]           LEQ_BICGS0
    Use   [leq_bicgs.f, 589]           LEQ_BICGS0
    Set   [leq_bicgs.f, 640]           LEQ_BICGS0
    Use   [leq_bicgs.f, 640]           LEQ_BICGS0

leqsol.LEQ_ADJUST    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 10]        leqsol
    Set   [iterate.f, 140]             ITERATE
    Set   [iterate.f, 352]             ITERATE

leqsol.LEQ_IJSWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1026]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1050]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1066]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1067]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1069]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1070]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 1026]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1052]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 1056]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1088]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 1056]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1066]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1074]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 1056]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 1056]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1067]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1075]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 1026]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1044]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1087]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1057]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1066]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1067]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1069]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1069]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1070]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1070]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1087]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1088]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1057]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1076]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1079]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1082]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.J    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 1026]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1044]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1087]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.K    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1057]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1063]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1066]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1067]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1086]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1087]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1088]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1057]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1060]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1063]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1075]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1086]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1057]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1061]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1063]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1074]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1077]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1086]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [leqsol_mod.f, 1026]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1048]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1069]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1070]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1088]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 1026]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1046]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1080]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IKSWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 854]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 880]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 903]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 904]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 905]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 854]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 882]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 886]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 921]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 886]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.CLASS    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 888]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 903]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 904]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 905]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 886]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 886]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 909]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 854]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 874]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 921]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 888]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 903]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 903]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 904]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 904]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 905]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 905]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 887]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 910]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 914]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 915]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.J    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 888]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 895]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 920]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 921]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 921]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.K    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 854]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 874]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 921]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 887]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 891]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 895]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 909]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 920]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 887]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 892]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 895]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 912]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 920]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [leqsol_mod.f, 854]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 878]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 902]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 903]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 904]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 905]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 921]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 854]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 876]      leqsol.LEQ_IKSWEEP

leqsol.LEQ_ISWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 769]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 795]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 816]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 818]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 769]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 797]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 801]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 825]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 833]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 801]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 821]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 825]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 801]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 825]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 801]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 816]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 822]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 825]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 769]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 789]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 832]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 803]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 812]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 813]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 816]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 818]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 832]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 833]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.IM1JK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 803]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 812]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 802]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 823]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 825]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 827]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.IP1JK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 803]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 813]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 818]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.J    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 803]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 810]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 816]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 831]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 832]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 833]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.K    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 803]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 808]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 832]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 802]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 806]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 810]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 822]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 831]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 802]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 807]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 810]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 821]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 831]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [leqsol_mod.f, 769]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 793]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 817]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 818]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 833]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 769]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 791]      leqsol.LEQ_ISWEEP

leqsol.LEQ_IT    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 13]        leqsol
    Use Argument   [solve_epp.f, 137]   SOLVE_EPP
    Use   [solve_pp_g.f, 121]          SOLVE_PP_G
    Use Argument   [solve_energy_eq.f, 273]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 291]   SOLVE_ENERGY_EQ
    Use Argument   [solve_granular_energy.f, 218]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 336]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 420]   SOLVE_GRANULAR_ENERGY
    Set   [init_namelist.f, 633]       INIT_NAMELIST
    Set   [init_namelist.f, 634]       INIT_NAMELIST
    Set   [init_namelist.f, 635]       INIT_NAMELIST
    Set   [init_namelist.f, 636]       INIT_NAMELIST
    Set   [init_namelist.f, 637]       INIT_NAMELIST
    Set   [init_namelist.f, 638]       INIT_NAMELIST
    Set   [init_namelist.f, 639]       INIT_NAMELIST
    Set   [init_namelist.f, 640]       INIT_NAMELIST
    Set   [init_namelist.f, 641]       INIT_NAMELIST
    Set   [init_namelist.f, 642]       INIT_NAMELIST
    Use Argument   [solve_continuity.f, 87]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 118]   SOLVE_CONTINUITY
    Use Argument   [solve_scalar_eq.f, 167]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 233]   SOLVE_Scalar_EQ
    Use Argument   [solve_species_eq.f, 168]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 257]   SOLVE_SPECIES_EQ
    Use Argument   [solve_k_epsilon_eq.f, 197]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 355]   SOLVE_K_Epsilon_EQ
    Use Argument   [diffuse_mean_fields.f, 88]   DIFFUSE_MEAN_FIELD
    Use   [write_out0.f, 186]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 233]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 247]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 360]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 374]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 485]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 499]   SOLVE_VEL_STAR
    Use   [write_res0.f, 317]          WRITE_RES0

leqsol.LEQ_JKSWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 943]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 967]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 984]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 986]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 987]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 988]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 943]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 969]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 973]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1005]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 973]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 991]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 973]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 973]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 984]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 992]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.I    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 974]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 984]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 1003]         leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1004]         leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1005]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 974]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 984]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 986]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 986]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 987]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 987]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 988]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 988]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 1004]         leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1005]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 974]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 993]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 996]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 999]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.J    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 943]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 961]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1004]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.K    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 943]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 961]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1004]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 974]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 977]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 992]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1003]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 974]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 978]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 991]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1003]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [leqsol_mod.f, 943]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 965]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 985]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 986]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 987]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 988]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 1005]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 943]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 963]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 997]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_MATVEC.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 105]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 127]      leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 153]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 154]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 162]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 201]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 202]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 246]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 247]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.AVar    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [leqsol_mod.f, 105]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 130]      leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 197]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 242]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC
    Use Argument   [leqsol_mod.f, 260]   leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.class    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 137]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 188]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 201]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 202]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 240]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 246]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 247]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.I    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 135]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 193]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 195]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 221]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 224]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 224]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 239]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 135]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 143]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 145]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 146]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 147]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 153]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 154]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 157]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 158]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 162]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 195]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 197]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 201]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 201]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 202]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 202]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 239]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 240]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 242]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 246]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 246]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 247]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 247]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijkm1    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 157]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijkp1    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 158]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 162]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijm1k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 147]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijp1k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 154]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.im1jk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 145]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.interval    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 137]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 237]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 238]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 238]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ip1jk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 146]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 153]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.J    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 135]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 194]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 195]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 238]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 239]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.j_end    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 138]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 214]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 216]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 226]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 228]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 231]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 233]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 238]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.j_start    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 138]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 213]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 215]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 225]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 227]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 230]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 232]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 238]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.K    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 135]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 192]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 195]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 220]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 224]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 224]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 239]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 105]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 124]      leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 153]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 154]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 161]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 162]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 201]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 202]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 205]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 206]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 246]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 247]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 250]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 251]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 105]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 121]      leqsol.LEQ_MATVEC

leqsol.LEQ_METHOD    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 16]        leqsol
    Use Argument   [solve_epp.f, 137]   SOLVE_EPP
    Set   [check_numerics.f, 115]      CHECK_NUMERICS
    Set   [check_numerics.f, 116]      CHECK_NUMERICS
    Use   [solve_pp_g.f, 122]          SOLVE_PP_G
    Use Argument   [solve_energy_eq.f, 273]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 291]   SOLVE_ENERGY_EQ
    Use Argument   [solve_granular_energy.f, 218]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 337]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 420]   SOLVE_GRANULAR_ENERGY
    Set   [init_namelist.f, 612]       INIT_NAMELIST
    Use Argument   [solve_continuity.f, 87]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 118]   SOLVE_CONTINUITY
    Use Argument   [solve_scalar_eq.f, 167]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 233]   SOLVE_Scalar_EQ
    Use Argument   [solve_species_eq.f, 169]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 258]   SOLVE_SPECIES_EQ
    Use Argument   [solve_k_epsilon_eq.f, 197]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 355]   SOLVE_K_Epsilon_EQ
    Use Argument   [diffuse_mean_fields.f, 88]   DIFFUSE_MEAN_FIELD
    Use   [write_out0.f, 187]          WRITE_OUT0
    Use   [write_out0.f, 192]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 233]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 248]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 360]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 375]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 486]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 500]   SOLVE_VEL_STAR
    Use   [write_res0.f, 317]          WRITE_RES0

leqsol.LEQ_MSOLVE.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 288]       leqsol.LEQ_MSOLVE
    Declare   [leqsol_mod.f, 312]      leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 377]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 385]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 389]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 417]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 441]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 466]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 501]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 505]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 514]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 518]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 547]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 559]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 571]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 579]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 288]       leqsol.LEQ_MSOLVE
    Declare   [leqsol_mod.f, 309]      leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 351]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 377]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 385]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 389]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 417]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 441]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 466]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 501]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 505]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 514]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 518]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 547]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 559]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 571]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 579]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.CH    (Local Variable)  Declared as: CHARACTER
    Define   [leqsol_mod.f, 335]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 364]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 365]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 365]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 366]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 366]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 367]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 367]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 368]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 368]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 369]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 369]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 370]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 370]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.CMETHOD    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 288]       leqsol.LEQ_MSOLVE
    Declare   [leqsol_mod.f, 318]      leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 359]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 364]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.DO_ALL    (Local Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 337]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 368]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 398]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.DO_ISWEEP    (Local Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 336]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 365]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 374]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 538]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 567]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.DO_JSWEEP    (Local Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 336]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 366]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.DO_KSWEEP    (Local Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 336]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 367]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 550]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 575]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.DO_REDBLACK    (Local Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 337]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 369]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 382]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 475]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.DO_SENDRECV    (Local Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 337]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 370]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 590]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.I    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 329]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 348]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 350]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 376]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 377]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 384]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 385]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 388]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 389]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 439]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 440]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 440]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 440]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 441]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 464]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 465]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 465]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 465]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 466]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 500]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 501]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 504]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 505]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 513]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 514]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 517]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 518]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 546]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 547]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 554]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 556]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 558]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 559]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 570]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 571]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 577]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 579]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.I1    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 425]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 429]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 439]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 440]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 449]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 453]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 464]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 465]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 532]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 536]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 546]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 554]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 556]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 558]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.I2    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 427]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 429]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 440]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 440]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 451]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 453]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 465]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 465]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 534]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 536]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.ICASE    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 332]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 407]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 409]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 431]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 433]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 456]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 458]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.IJ    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 433]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 434]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 435]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 437]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 439]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 329]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 350]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 351]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 351]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.IK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 458]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 459]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 460]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 462]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 464]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 540]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 541]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 542]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 544]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 546]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 552]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 553]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 554]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 556]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 558]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.ISIZE    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 331]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 429]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 433]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 434]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 435]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 437]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 439]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 453]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 458]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 459]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 460]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 462]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 464]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 536]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 540]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 541]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 542]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 544]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 546]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 552]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.ITER    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 328]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 361]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 364]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 364]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.J    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 329]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 349]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 350]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 415]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 416]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 416]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 416]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 417]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 435]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 437]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 439]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 439]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 441]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.J1    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 401]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 405]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 415]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 416]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 426]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 430]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 435]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 437]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 439]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.J2    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 403]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 405]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 416]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 416]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 428]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 430]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.JK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 409]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 410]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 411]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 413]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 415]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 331]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 405]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 409]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 410]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 411]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 413]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 415]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 430]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 433]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.K    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 329]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 347]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 350]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 411]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 413]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 415]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 415]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 417]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 460]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 462]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 464]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 464]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 466]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 498]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 499]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 501]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 505]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 511]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 512]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 514]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 518]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 542]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 544]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 546]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 547]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 558]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 559]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 569]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 571]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 578]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 579]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.K1    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 402]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 406]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 411]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 413]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 415]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 450]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 454]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 460]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 462]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 464]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 533]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 537]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 542]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 544]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 546]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 558]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.K2    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 330]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 404]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 406]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 452]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 454]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 535]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 537]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.KSIZE    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 331]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 406]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 409]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 454]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 458]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 537]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 540]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 552]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 553]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 554]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 556]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 558]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.NITER    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 328]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 359]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 361]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.SETGUESS    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [leqsol_mod.f, 323]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 323]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 345]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.USE_IKLOOP    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [leqsol_mod.f, 322]       leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 322]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 529]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [leqsol_mod.f, 288]       leqsol.LEQ_MSOLVE
    Declare   [leqsol_mod.f, 315]      leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 351]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 356]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 377]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 377]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 385]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 385]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 389]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 389]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 417]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 417]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 421]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 441]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 441]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 445]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 466]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 466]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 501]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 501]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 505]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 505]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 514]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 514]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 518]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 518]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 547]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 547]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 559]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 559]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 571]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 571]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 579]          leqsol.LEQ_MSOLVE
    Set   [leqsol_mod.f, 579]          leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 590]   leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 288]       leqsol.LEQ_MSOLVE
    Declare   [leqsol_mod.f, 306]      leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 377]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 385]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 389]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 417]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 441]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 466]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 501]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 505]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 514]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 518]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 547]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 559]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 571]          leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 579]          leqsol.LEQ_MSOLVE

leqsol.LEQ_MSOLVE0.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 616]       leqsol.LEQ_MSOLVE0
    Declare   [leqsol_mod.f, 640]      leqsol.LEQ_MSOLVE0

leqsol.LEQ_MSOLVE0.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 616]       leqsol.LEQ_MSOLVE0
    Declare   [leqsol_mod.f, 637]      leqsol.LEQ_MSOLVE0
    Use   [leqsol_mod.f, 656]          leqsol.LEQ_MSOLVE0
    Use   [leqsol_mod.f, 659]          leqsol.LEQ_MSOLVE0

leqsol.LEQ_MSOLVE0.CMETHOD    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 616]       leqsol.LEQ_MSOLVE0
    Declare   [leqsol_mod.f, 645]      leqsol.LEQ_MSOLVE0

leqsol.LEQ_MSOLVE0.ijk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 649]       leqsol.LEQ_MSOLVE0
    Set   [leqsol_mod.f, 655]          leqsol.LEQ_MSOLVE0
    Use   [leqsol_mod.f, 656]          leqsol.LEQ_MSOLVE0
    Use   [leqsol_mod.f, 656]          leqsol.LEQ_MSOLVE0

leqsol.LEQ_MSOLVE0.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [leqsol_mod.f, 616]       leqsol.LEQ_MSOLVE0
    Declare   [leqsol_mod.f, 643]      leqsol.LEQ_MSOLVE0
    Set   [leqsol_mod.f, 656]          leqsol.LEQ_MSOLVE0
    Set   [leqsol_mod.f, 659]          leqsol.LEQ_MSOLVE0
    Use Argument   [leqsol_mod.f, 661]   leqsol.LEQ_MSOLVE0

leqsol.LEQ_MSOLVE0.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 616]       leqsol.LEQ_MSOLVE0
    Declare   [leqsol_mod.f, 634]      leqsol.LEQ_MSOLVE0

leqsol.LEQ_MSOLVE1.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 682]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 709]      leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 737]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 744]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [leqsol_mod.f, 682]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 706]      leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 737]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 744]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.CMETHOD    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 682]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 714]      leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.i    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 718]       leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 734]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 736]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.ijk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 718]       leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 723]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 724]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 736]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 737]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 737]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 737]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 743]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 744]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 744]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 744]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.j    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 718]       leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 735]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 736]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 718]       leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 733]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 736]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [leqsol_mod.f, 682]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 712]      leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 724]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 727]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 737]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 744]          leqsol.LEQ_MSOLVE1
    Use Argument   [leqsol_mod.f, 748]   leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.Vname    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [leqsol_mod.f, 682]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 703]      leqsol.LEQ_MSOLVE1

leqsol.LEQ_PC    (Variable)  Declared as: CHARACTER
    Define   [leqsol_mod.f, 28]        leqsol
    Use Argument   [solve_epp.f, 142]   SOLVE_EPP
    Use Argument   [solve_pp_g.f, 128]   SOLVE_PP_G
    Use Argument   [solve_energy_eq.f, 278]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 295]   SOLVE_ENERGY_EQ
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 340]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 424]   SOLVE_GRANULAR_ENERGY
    Set   [init_namelist.f, 669]       INIT_NAMELIST
    Set   [check_data_cartesian.f, 937]   CHECK_DATA_CARTESIAN
    Use Argument   [solve_continuity.f, 90]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 121]   SOLVE_CONTINUITY
    Use Argument   [solve_scalar_eq.f, 172]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 238]   SOLVE_Scalar_EQ
    Use Argument   [solve_species_eq.f, 173]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 261]   SOLVE_SPECIES_EQ
    Use Argument   [solve_k_epsilon_eq.f, 202]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 360]   SOLVE_K_Epsilon_EQ
    Use Argument   [diffuse_mean_fields.f, 91]   DIFFUSE_MEAN_FIELD
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 236]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 251]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 363]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 378]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 488]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 503]   SOLVE_VEL_STAR

leqsol.LEQ_SWEEP    (Variable)  Declared as: CHARACTER
    Define   [leqsol_mod.f, 22]        leqsol
    Use Argument   [solve_epp.f, 142]   SOLVE_EPP
    Set   [check_numerics.f, 114]      CHECK_NUMERICS
    Use Argument   [solve_pp_g.f, 128]   SOLVE_PP_G
    Use Argument   [solve_energy_eq.f, 278]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 295]   SOLVE_ENERGY_EQ
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 340]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 424]   SOLVE_GRANULAR_ENERGY
    Set   [init_namelist.f, 657]       INIT_NAMELIST
    Use Argument   [solve_continuity.f, 90]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 121]   SOLVE_CONTINUITY
    Use Argument   [solve_scalar_eq.f, 172]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 238]   SOLVE_Scalar_EQ
    Use Argument   [solve_species_eq.f, 173]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 261]   SOLVE_SPECIES_EQ
    Use Argument   [solve_k_epsilon_eq.f, 202]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 360]   SOLVE_K_Epsilon_EQ
    Use Argument   [diffuse_mean_fields.f, 91]   DIFFUSE_MEAN_FIELD
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 236]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 250]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 363]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 377]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 488]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 502]   SOLVE_VEL_STAR

leqsol.LEQ_TOL    (Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 25]        leqsol
    Use Argument   [solve_epp.f, 142]   SOLVE_EPP
    Use Argument   [solve_pp_g.f, 128]   SOLVE_PP_G
    Use Argument   [solve_energy_eq.f, 278]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 295]   SOLVE_ENERGY_EQ
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 340]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 424]   SOLVE_GRANULAR_ENERGY
    Set   [init_namelist.f, 622]       INIT_NAMELIST
    Use Argument   [solve_continuity.f, 90]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 121]   SOLVE_CONTINUITY
    Use Argument   [solve_scalar_eq.f, 172]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 238]   SOLVE_Scalar_EQ
    Use Argument   [solve_species_eq.f, 173]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 261]   SOLVE_SPECIES_EQ
    Use Argument   [solve_k_epsilon_eq.f, 202]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 360]   SOLVE_K_Epsilon_EQ
    Use Argument   [diffuse_mean_fields.f, 91]   DIFFUSE_MEAN_FIELD
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 236]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 250]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 363]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 377]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 488]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 503]   SOLVE_VEL_STAR

leqsol.MAX_NIT    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 6]         leqsol
    Set   [init_namelist.f, 508]       INIT_NAMELIST
    Use   [check_data_cartesian.f, 911]   CHECK_DATA_CARTESIAN
    Use   [get_data.f, 168]            GET_DATA
    Use   [adjust_dt_mod.f, 107]       ADJUST_DT.ADJUSTDT
    Use   [iterate.f, 363]             ITERATE
    Use   [iterate.f, 512]             ITERATE

leqsol.MINIMIZE_DOTPRODUCTS    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 31]        leqsol
    Set   [check_numerics.f, 111]      CHECK_NUMERICS
    Use   [leq_bicgst.f, 389]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 488]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 515]          LEQ_BICGS0t
    Use   [leq_bicgs.f, 437]           LEQ_BICGS0
    Use   [leq_bicgs.f, 524]           LEQ_BICGS0
    Use   [leq_bicgs.f, 557]           LEQ_BICGS0

leqsol.OPT_PARALLEL    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 40]        leqsol
    Use   [check_numerics.f, 108]      CHECK_NUMERICS
    Set   [init_namelist.f, 825]       INIT_NAMELIST

leqsol.REPORT_SOLVER_STATS.LC    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 60]        leqsol.REPORT_SOLVER_STATS
    Set   [leqsol_mod.f, 76]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS

leqsol.REPORT_SOLVER_STATS.STEPS    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 52]        leqsol.REPORT_SOLVER_STATS
    Declare   [leqsol_mod.f, 58]       leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 62]           leqsol.REPORT_SOLVER_STATS

leqsol.REPORT_SOLVER_STATS.TNIT    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 52]        leqsol.REPORT_SOLVER_STATS
    Declare   [leqsol_mod.f, 58]       leqsol.REPORT_SOLVER_STATS
    Use Argument   [leqsol_mod.f, 62]   leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 62]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS

leqsol.SOLVER_STATISTICS    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 43]        leqsol
    Set   [check_numerics.f, 112]      CHECK_NUMERICS
    Use   [time_march.f, 220]          TIME_MARCH
    Use   [time_march.f, 365]          TIME_MARCH
    Set   [init_namelist.f, 3347]      INIT_NAMELIST

LEQSWEEP    (Dummy Argument)  Declared as: CHARACTER
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 57]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 124]   TEST_LIN_EQ

LEQTOL    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 58]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 124]   TEST_LIN_EQ
    Use   [test_lin_eq.f, 156]         TEST_LIN_EQ

lERR    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_axis.f, 62]        CHECK_AXIS
    Set   [check_axis.f, 179]          CHECK_AXIS
    Use   [check_axis.f, 180]          CHECK_AXIS
    Use   [check_axis.f, 182]          CHECK_AXIS

LEVEL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [physical_prop.f, 29]     PHYSICAL_PROP
    Declare   [physical_prop.f, 50]    PHYSICAL_PROP
    Use   [physical_prop.f, 67]        PHYSICAL_PROP
    Use   [physical_prop.f, 73]        PHYSICAL_PROP
    Use   [physical_prop.f, 83]        PHYSICAL_PROP

lEXISTS    (Local Variable)  Declared as: LOGICAL
    Define   [read_namelist.f, 78]     READ_NAMELIST
    Set   [read_namelist.f, 123]       READ_NAMELIST
    Use   [read_namelist.f, 124]       READ_NAMELIST

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [set_ro_s.f, 137]         CHECK_SET_ROs
    Set   [set_ro_s.f, 167]            CHECK_SET_ROs
    Use   [set_ro_s.f, 168]            CHECK_SET_ROs

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 547]    ROgErr_LOG
    Set   [physical_prop.f, 559]       ROgErr_LOG
    Use   [physical_prop.f, 560]       ROgErr_LOG

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 641]    ROsErr_LOG
    Set   [physical_prop.f, 653]       ROsErr_LOG
    Use   [physical_prop.f, 654]       ROsErr_LOG

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [calc_vol_fr.f, 318]      EPgErr_LOG
    Set   [calc_vol_fr.f, 331]         EPgErr_LOG
    Use   [calc_vol_fr.f, 332]         EPgErr_LOG

lEXISTS    (Local Variable)  Declared as: LOGICAL
    Define   [read_particle_input.f, 38]   READ_PAR_INPUT
    Set   [read_particle_input.f, 60]   READ_PAR_INPUT
    Use   [read_particle_input.f, 61]   READ_PAR_INPUT

lfactor_mus    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [calc_mu_s.f, 2394]       subgrid_stress_wall
    Declare   [calc_mu_s.f, 2409]      subgrid_stress_wall
    Set   [calc_mu_s.f, 2429]          subgrid_stress_wall
    Set   [calc_mu_s.f, 2436]          subgrid_stress_wall

lfactor_ps    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [calc_mu_s.f, 2394]       subgrid_stress_wall
    Declare   [calc_mu_s.f, 2407]      subgrid_stress_wall
    Set   [calc_mu_s.f, 2428]          subgrid_stress_wall
    Set   [calc_mu_s.f, 2434]          subgrid_stress_wall

lfcount    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 815]      des_dbgpic
    Set   [cfnewvalues.f, 815]         des_dbgpic
    Set   [cfnewvalues.f, 823]         des_dbgpic
    Use   [cfnewvalues.f, 823]         des_dbgpic
    Use   [cfnewvalues.f, 824]         des_dbgpic

lfcount    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 868]      des_dbgtecplot
    Set   [cfnewvalues.f, 868]         des_dbgtecplot
    Set   [cfnewvalues.f, 877]         des_dbgtecplot
    Use   [cfnewvalues.f, 877]         des_dbgtecplot
    Use   [cfnewvalues.f, 878]         des_dbgtecplot

lFDH    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [parse_rxn.f, 22]         PARSE_RXN
    Declare   [parse_rxn.f, 46]        PARSE_RXN
    Use Argument   [parse_rxn.f, 117]   PARSE_RXN
    Use Argument   [parse_rxn.f, 138]   PARSE_RXN
    Use Argument   [parse_rxn.f, 145]   PARSE_RXN

lFile    (Local Variable)  Declared as: CHARACTER
    Define   [physical_prop.f, 548]    ROgErr_LOG
    Set   [physical_prop.f, 553]       ROgErr_LOG
    Set   [physical_prop.f, 555]       ROgErr_LOG
    Set   [physical_prop.f, 557]       ROgErr_LOG
    Use Argument   [physical_prop.f, 559]   ROgErr_LOG
    Use Argument   [physical_prop.f, 561]   ROgErr_LOG
    Use Argument   [physical_prop.f, 564]   ROgErr_LOG

lFile    (Local Variable)  Declared as: CHARACTER
    Define   [physical_prop.f, 642]    ROsErr_LOG
    Set   [physical_prop.f, 647]       ROsErr_LOG
    Set   [physical_prop.f, 649]       ROsErr_LOG
    Set   [physical_prop.f, 651]       ROsErr_LOG
    Use Argument   [physical_prop.f, 653]   ROsErr_LOG
    Use Argument   [physical_prop.f, 655]   ROsErr_LOG
    Use Argument   [physical_prop.f, 658]   ROsErr_LOG

lFile    (Local Variable)  Declared as: CHARACTER
    Define   [calc_vol_fr.f, 319]      EPgErr_LOG
    Set   [calc_vol_fr.f, 325]         EPgErr_LOG
    Set   [calc_vol_fr.f, 327]         EPgErr_LOG
    Set   [calc_vol_fr.f, 329]         EPgErr_LOG
    Use Argument   [calc_vol_fr.f, 331]   EPgErr_LOG
    Use Argument   [calc_vol_fr.f, 333]   EPgErr_LOG
    Use Argument   [calc_vol_fr.f, 336]   EPgErr_LOG

lfilename    (Local Variable)  Declared as: CHARACTER
    Define   [read_particle_input.f, 34]   READ_PAR_INPUT
    Set   [read_particle_input.f, 52]   READ_PAR_INPUT
    Set   [read_particle_input.f, 53]   READ_PAR_INPUT
    Set   [read_particle_input.f, 55]   READ_PAR_INPUT
    Use   [read_particle_input.f, 60]   READ_PAR_INPUT
    Use   [read_particle_input.f, 66]   READ_PAR_INPUT

lFlags_i    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_ps.f, 284]           DEBUG_PS
    Set   [set_ps.f, 292]              DEBUG_PS
    Set   [set_ps.f, 292]              DEBUG_PS
    Set   [set_ps.f, 306]              DEBUG_PS
    Set   [set_ps.f, 307]              DEBUG_PS
    Use Argument   [set_ps.f, 315]     DEBUG_PS
    Use Argument   [set_ps.f, 391]     DEBUG_PS
    Set   [set_ps.f, 391]              DEBUG_PS

LFLUID    (Local Variable)  Declared as: INTEGER
    Define   [CG_set_outflow.f, 68]    CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 101]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 106]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 109]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 112]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 116]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 123]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 127]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 134]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 135]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 141]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 143]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 144]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 155]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 334]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 339]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 342]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 345]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 349]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 356]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 360]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 367]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 368]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 373]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 375]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 376]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 386]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 436]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 443]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 446]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 449]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 453]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 460]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 464]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 471]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 472]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 477]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 479]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 480]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 490]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 655]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 662]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 665]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 668]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 672]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 679]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 683]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 690]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 691]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 696]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 698]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 699]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 709]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 753]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 756]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 759]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 762]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 766]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 773]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 777]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 784]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 785]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 790]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 792]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 793]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 803]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 940]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 943]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 946]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 949]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 953]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 960]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 964]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 971]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 972]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 977]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 979]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 980]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 990]      CG_SET_OUTFLOW

LFLUID    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 255]      SET_WALL_BC1
    Set   [set_wall_bc.f, 299]         SET_WALL_BC1
    Use   [set_wall_bc.f, 302]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 303]   SET_WALL_BC1
    Use   [set_wall_bc.f, 307]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 308]   SET_WALL_BC1
    Set   [set_wall_bc.f, 314]         SET_WALL_BC1
    Use   [set_wall_bc.f, 317]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 318]   SET_WALL_BC1
    Use   [set_wall_bc.f, 322]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 323]   SET_WALL_BC1
    Set   [set_wall_bc.f, 330]         SET_WALL_BC1
    Use   [set_wall_bc.f, 333]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 334]   SET_WALL_BC1
    Use   [set_wall_bc.f, 338]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 339]   SET_WALL_BC1
    Set   [set_wall_bc.f, 345]         SET_WALL_BC1
    Use   [set_wall_bc.f, 348]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 349]   SET_WALL_BC1
    Use   [set_wall_bc.f, 353]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 354]   SET_WALL_BC1
    Set   [set_wall_bc.f, 362]         SET_WALL_BC1
    Use   [set_wall_bc.f, 365]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 367]   SET_WALL_BC1
    Use   [set_wall_bc.f, 371]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 373]   SET_WALL_BC1
    Set   [set_wall_bc.f, 379]         SET_WALL_BC1
    Use   [set_wall_bc.f, 382]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 384]   SET_WALL_BC1
    Use   [set_wall_bc.f, 388]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 390]   SET_WALL_BC1

lFName    (Local Variable)  Declared as: CHARACTER
    Define   [set_ro_s.f, 138]         CHECK_SET_ROs
    Set   [set_ro_s.f, 161]            CHECK_SET_ROs
    Set   [set_ro_s.f, 163]            CHECK_SET_ROs
    Set   [set_ro_s.f, 165]            CHECK_SET_ROs
    Use Argument   [set_ro_s.f, 167]   CHECK_SET_ROs
    Use Argument   [set_ro_s.f, 169]   CHECK_SET_ROs
    Use Argument   [set_ro_s.f, 171]   CHECK_SET_ROs

lFORCE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 254]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 318]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 319]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 319]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 321]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 335]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 349]        DRAG_GS_GAS1

lFORCE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 222]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 281]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 283]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 285]   DRAG_SS_TFM_NONINTERP

lFracDH    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [parse_rxn.f, 521]        getFracDH
    Declare   [parse_rxn.f, 531]       getFracDH
    Set   [parse_rxn.f, 580]           getFracDH

lfreq    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 815]      des_dbgpic
    Set   [cfnewvalues.f, 815]         des_dbgpic
    Set   [cfnewvalues.f, 819]         des_dbgpic
    Use   [cfnewvalues.f, 819]         des_dbgpic
    Use   [cfnewvalues.f, 820]         des_dbgpic
    Set   [cfnewvalues.f, 821]         des_dbgpic

lfreq    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 868]      des_dbgtecplot
    Set   [cfnewvalues.f, 868]         des_dbgtecplot
    Set   [cfnewvalues.f, 873]         des_dbgtecplot
    Use   [cfnewvalues.f, 873]         des_dbgtecplot
    Use   [cfnewvalues.f, 874]         des_dbgtecplot
    Set   [cfnewvalues.f, 875]         des_dbgtecplot

lgathercnts    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 257]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 329]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 330]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 331]   WRITE_DES_TECPLOT

lglobal_id    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 346]   PIC_MI_BC
    Set   [pic_bc_routines.f, 523]     PIC_MI_BC
    Set   [pic_bc_routines.f, 526]     PIC_MI_BC
    Use   [pic_bc_routines.f, 526]     PIC_MI_BC
    Use   [pic_bc_routines.f, 527]     PIC_MI_BC

lglobal_id    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 38]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 171]     MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 174]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 174]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 175]     MAKE_ARRAYS_DES

lglocnt    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 257]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 323]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 325]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 326]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 326]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 327]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 359]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 363]      WRITE_DES_TECPLOT

lHORg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 103]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 137]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 269]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 269]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 274]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 274]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 281]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 281]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 315]   STIFF_CHEM_RRATES

lHoRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 89]       DES_RRATES0
    Set   [des_rrates0.f, 110]         DES_RRATES0
    Set   [des_rrates0.f, 205]         DES_RRATES0
    Use   [des_rrates0.f, 205]         DES_RRATES0
    Set   [des_rrates0.f, 208]         DES_RRATES0
    Use   [des_rrates0.f, 208]         DES_RRATES0
    Use   [des_rrates0.f, 247]         DES_RRATES0

lHORs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 113]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 138]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 271]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 271]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 276]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 276]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 283]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 283]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 328]   STIFF_CHEM_RRATES

lHoRs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 82]       DES_RRATES0
    Set   [des_rrates0.f, 127]         DES_RRATES0
    Set   [des_rrates0.f, 193]         DES_RRATES0
    Use   [des_rrates0.f, 193]         DES_RRATES0
    Set   [des_rrates0.f, 200]         DES_RRATES0
    Use   [des_rrates0.f, 200]         DES_RRATES0
    Use   [des_rrates0.f, 206]         DES_RRATES0
    Use   [des_rrates0.f, 209]         DES_RRATES0

lI    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 168]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 233]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 237]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 237]     SEED_NEW_PARTICLE

lI    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 290]   SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 339]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 347]   SET_NEW_PARTICLE_PROPS

lICP    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [read_database.f, 337]       writeCp
    Use   [read_database.f, 338]       writeCp
    Set   [read_database.f, 356]       writeCp
    Use   [read_database.f, 357]       writeCp

LID_VEL    (Variable)  Declared as: DOUBLE PRECISION
    Define   [deprecated.f, 56]        DEPRECATED_OR_UNKNOWN
    Contain   [deprecated.f, 89]       DEP_2014_1

lIE    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1050]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1066]         POINT_SOURCE_U_G
    Set   [source_u_g.f, 1069]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1074]         POINT_SOURCE_U_G

lIE    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1181]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1196]         POINT_SOURCE_U_S
    Set   [source_u_s.f, 1199]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1204]         POINT_SOURCE_U_S

liend    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 426]   DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 460]     DES_NEW_PARTICLE_TEST

lIER    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 725]    REPORT_ERROR
    Use Argument   [check_data_30.f, 737]   REPORT_ERROR

Lij    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [ghd.f, 15]               GHD_MODEL
    Declare   [ghd.f, 46]              GHD_MODEL
    Set   [ghd.f, 106]                 GHD_MODEL
    Use Argument   [ghd.f, 204]        GHD_MODEL
    Set   [ghd.f, 224]                 GHD_MODEL
    Use   [ghd.f, 224]                 GHD_MODEL

Lij    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [thermal_mobility.f, 19]   thermal_mobility
    Declare   [thermal_mobility.f, 26]   thermal_mobility
    Set   [thermal_mobility.f, 120]    thermal_mobility

lijk    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 814]      des_dbgpic
    Set   [cfnewvalues.f, 828]         des_dbgpic
    Use   [cfnewvalues.f, 829]         des_dbgpic
    Use   [cfnewvalues.f, 830]         des_dbgpic
    Use   [cfnewvalues.f, 830]         des_dbgpic

lijk    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 867]      des_dbgtecplot
    Set   [cfnewvalues.f, 886]         des_dbgtecplot
    Use   [cfnewvalues.f, 887]         des_dbgtecplot
    Use   [cfnewvalues.f, 888]         des_dbgtecplot

lIJKP    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [mass_inflow_dem.f, 124]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 151]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 204]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 205]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 206]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 214]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 215]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 216]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 224]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 225]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 226]     SEED_NEW_PARTICLE

lIJKP    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 288]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 332]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 333]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 333]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 333]   SET_NEW_PARTICLE_PROPS

LijTermB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 78]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 302]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 304]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 308]   SOURCE_GHD_GRANULAR_ENERGY

LijTermB_A    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 83]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 300]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 301]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 304]   SOURCE_GHD_GRANULAR_ENERGY

LijTermB_H    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 83]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 299]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 301]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 302]   SOURCE_GHD_GRANULAR_ENERGY

LijTermE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 78]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 262]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 264]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 284]   SOURCE_GHD_GRANULAR_ENERGY

LijTermE_A    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 81]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 259]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 261]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 264]   SOURCE_GHD_GRANULAR_ENERGY

LijTermE_H    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 81]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 258]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 261]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 262]   SOURCE_GHD_GRANULAR_ENERGY

LijTermN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 78]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 270]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 272]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 287]   SOURCE_GHD_GRANULAR_ENERGY

LijTermN_A    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 82]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 268]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 269]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 272]   SOURCE_GHD_GRANULAR_ENERGY

LijTermN_H    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 82]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 267]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 269]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 270]   SOURCE_GHD_GRANULAR_ENERGY

LijTermS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 78]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 278]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 280]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 287]   SOURCE_GHD_GRANULAR_ENERGY

LijTermS_A    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 82]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 276]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 277]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 280]   SOURCE_GHD_GRANULAR_ENERGY

LijTermS_H    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 82]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 275]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 277]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 278]   SOURCE_GHD_GRANULAR_ENERGY

LijTermT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 78]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 294]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 296]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 308]   SOURCE_GHD_GRANULAR_ENERGY

LijTermT_A    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 83]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 292]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 293]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 296]   SOURCE_GHD_GRANULAR_ENERGY

LijTermT_H    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 82]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 291]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 293]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 294]   SOURCE_GHD_GRANULAR_ENERGY

LijTermW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 78]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 253]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 255]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 284]   SOURCE_GHD_GRANULAR_ENERGY

LijTermW_A    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 82]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 251]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 252]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 255]   SOURCE_GHD_GRANULAR_ENERGY

LijTermW_H    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_ghd_granular_energy.f, 82]   SOURCE_GHD_GRANULAR_ENERGY
    Set   [source_ghd_granular_energy.f, 250]   SOURCE_GHD_GRANULAR_ENERGY
    Use Argument   [source_ghd_granular_energy.f, 252]   SOURCE_GHD_GRANULAR_ENERGY
    Use   [source_ghd_granular_energy.f, 253]   SOURCE_GHD_GRANULAR_ENERGY

LIM1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [des_functions.f, 12]     DES_GETINDEXFROMPOS
    Declare   [des_functions.f, 26]    DES_GETINDEXFROMPOS
    Use   [des_functions.f, 44]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 45]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 49]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 50]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 58]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 60]        DES_GETINDEXFROMPOS

LIM2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [des_functions.f, 12]     DES_GETINDEXFROMPOS
    Declare   [des_functions.f, 26]    DES_GETINDEXFROMPOS
    Use   [des_functions.f, 44]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 45]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 49]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 50]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 58]        DES_GETINDEXFROMPOS
    Use   [des_functions.f, 60]        DES_GETINDEXFROMPOS

LIMIT_MAX_STEPS    (Local Variable)  Declared as: LOGICAL
    Define   [check_odepack_stiff_chem.f, 159]   ODEPACK_INIT
    Set   [check_odepack_stiff_chem.f, 201]   ODEPACK_INIT
    Set   [check_odepack_stiff_chem.f, 203]   ODEPACK_INIT

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [test_lin_eq.f, 53]       TEST_LIN_EQ
    Set   [test_lin_eq.f, 158]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 161]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 164]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 165]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 166]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 167]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 168]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 169]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 172]         TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 176]   TEST_LIN_EQ

LINE    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [parse_rxn.f, 22]         PARSE_RXN
    Declare   [parse_rxn.f, 36]        PARSE_RXN
    Use Argument   [parse_rxn.f, 67]   PARSE_RXN
    Use Argument   [parse_rxn.f, 103]   PARSE_RXN
    Use Argument   [parse_rxn.f, 308]   isChemEq
    Use Argument   [parse_rxn.f, 337]   isDH
    Use Argument   [parse_rxn.f, 365]   isFracDH

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [calc_grbdry.f, 111]      CALC_GRBDRY
    Set   [calc_grbdry.f, 313]         CALC_GRBDRY
    Use Argument   [calc_grbdry.f, 314]   CALC_GRBDRY
    Set   [calc_grbdry.f, 517]         CALC_GRBDRY
    Use Argument   [calc_grbdry.f, 518]   CALC_GRBDRY
    Set   [calc_grbdry.f, 720]         CALC_GRBDRY
    Use Argument   [calc_grbdry.f, 721]   CALC_GRBDRY
    Set   [calc_grbdry.f, 727]         CALC_GRBDRY
    Use Argument   [calc_grbdry.f, 728]   CALC_GRBDRY

LINE    (Dummy Argument)  Declared as: CHARACTER
    Define   [write_error.f, 20]       WRITE_ERROR
    Declare   [write_error.f, 39]      WRITE_ERROR
    Use   [write_error.f, 53]          WRITE_ERROR

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [check_ab_m.f, 56]        CHECK_AB_M
    Set   [check_ab_m.f, 73]           CHECK_AB_M
    Use Argument   [check_ab_m.f, 75]   CHECK_AB_M
    Set   [check_ab_m.f, 83]           CHECK_AB_M
    Use Argument   [check_ab_m.f, 85]   CHECK_AB_M
    Set   [check_ab_m.f, 93]           CHECK_AB_M
    Use Argument   [check_ab_m.f, 95]   CHECK_AB_M
    Set   [check_ab_m.f, 103]          CHECK_AB_M
    Use Argument   [check_ab_m.f, 105]   CHECK_AB_M
    Set   [check_ab_m.f, 113]          CHECK_AB_M
    Use Argument   [check_ab_m.f, 115]   CHECK_AB_M
    Set   [check_ab_m.f, 123]          CHECK_AB_M
    Use Argument   [check_ab_m.f, 125]   CHECK_AB_M
    Set   [check_ab_m.f, 132]          CHECK_AB_M
    Use Argument   [check_ab_m.f, 134]   CHECK_AB_M
    Set   [check_ab_m.f, 140]          CHECK_AB_M
    Use Argument   [check_ab_m.f, 142]   CHECK_AB_M

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [conv_source_epp.f, 110]   CONV_SOURCE_EPP0
    Set   [conv_source_epp.f, 291]     CONV_SOURCE_EPP0
    Use Argument   [conv_source_epp.f, 294]   CONV_SOURCE_EPP0

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [conv_source_epp.f, 377]   CONV_SOURCE_EPP1
    Set   [conv_source_epp.f, 530]     CONV_SOURCE_EPP1
    Use Argument   [conv_source_epp.f, 534]   CONV_SOURCE_EPP1

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [corner.f, 305]           ADDCORN
    Set   [corner.f, 312]              ADDCORN
    Use Argument   [corner.f, 313]     ADDCORN

LINE    (Dummy Argument)  Declared as: CHARACTER
    Define   [line_too_big.f, 25]      LINE_TOO_BIG
    Declare   [line_too_big.f, 34]     LINE_TOO_BIG
    Use   [line_too_big.f, 55]         LINE_TOO_BIG

line    (Dummy Argument)  Declared as: CHARACTER
    Define   [get_values.f, 27]        get_values
    Declare   [get_values.f, 31]       get_values
    Use Argument   [get_values.f, 41]   get_values
    Use   [get_values.f, 42]           get_values
    Use   [get_values.f, 42]           get_values
    Use   [get_values.f, 46]           get_values
    Use Argument   [get_values.f, 54]   get_values

line    (Local Variable)  Declared as: CHARACTER
    Define   [get_values.f, 8]         get_values_tester
    Set   [get_values.f, 12]           get_values_tester
    Use   [get_values.f, 15]           get_values_tester
    Use Argument   [get_values.f, 17]   get_values_tester

LINE    (Dummy Argument)  Declared as: CHARACTER INTENT(INOUT)
    Define   [remove_comment.f, 13]    REMOVE_COMMENT
    Declare   [remove_comment.f, 20]   REMOVE_COMMENT
    Set   [remove_comment.f, 32]       REMOVE_COMMENT

LINE    (Dummy Argument)  Declared as: CHARACTER INTENT(INOUT)
    Define   [remove_comment.f, 51]    REMOVE_PAR_BLANKS
    Declare   [remove_comment.f, 58]   REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 75]   REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 78]   REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 84]   REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 86]   REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 89]   REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 97]       REMOVE_PAR_BLANKS
    Set   [remove_comment.f, 99]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 99]       REMOVE_PAR_BLANKS
    Set   [remove_comment.f, 101]      REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 107]   REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 109]   REMOVE_PAR_BLANKS
    Use Argument   [remove_comment.f, 112]   REMOVE_PAR_BLANKS

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [source_pp_g.f, 68]       SOURCE_PP_G
    Set   [source_pp_g.f, 167]         SOURCE_PP_G
    Use Argument   [source_pp_g.f, 169]   SOURCE_PP_G

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [source_rop_g.f, 55]      SOURCE_ROP_G
    Set   [source_rop_g.f, 94]         SOURCE_ROP_G
    Use Argument   [source_rop_g.f, 96]   SOURCE_ROP_G

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [out_array_kc.f, 54]      OUT_ARRAY_KC
    Set   [out_array_kc.f, 91]         OUT_ARRAY_KC
    Use   [out_array_kc.f, 94]         OUT_ARRAY_KC

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [parse_resid_string.f, 54]   PARSE_RESID_STRING
    Set   [parse_resid_string.f, 113]   PARSE_RESID_STRING
    Use Argument   [parse_resid_string.f, 116]   PARSE_RESID_STRING
    Set   [parse_resid_string.f, 121]   PARSE_RESID_STRING
    Use Argument   [parse_resid_string.f, 124]   PARSE_RESID_STRING

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [write_spx1.f, 89]        WRITE_SPX1
    Set   [write_spx1.f, 547]          WRITE_SPX1
    Use Argument   [write_spx1.f, 548]   WRITE_SPX1

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [source_rop_s.f, 58]      SOURCE_ROP_S
    Set   [source_rop_s.f, 98]         SOURCE_ROP_S
    Use Argument   [source_rop_s.f, 100]   SOURCE_ROP_S

LINE    (Dummy Argument)  Declared as: CHARACTER
    Define   [parse_line.f, 450]       PARSE_ARITH
    Declare   [parse_line.f, 472]      PARSE_ARITH
    Use Argument   [parse_line.f, 512]   PARSE_ARITH
    Use Argument   [parse_line.f, 512]   PARSE_ARITH
    Use Argument   [parse_line.f, 514]   PARSE_ARITH
    Use Argument   [parse_line.f, 518]   PARSE_ARITH
    Use   [parse_line.f, 520]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 530]          PARSE_ARITH
    Use   [parse_line.f, 532]          PARSE_ARITH
    Use   [parse_line.f, 546]          PARSE_ARITH
    Use   [parse_line.f, 547]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Set   [parse_line.f, 556]          PARSE_ARITH
    Use Argument   [parse_line.f, 559]   PARSE_ARITH
    Use Argument   [parse_line.f, 559]   PARSE_ARITH
    Use Argument   [parse_line.f, 561]   PARSE_ARITH
    Use   [parse_line.f, 562]          PARSE_ARITH
    Set   [parse_line.f, 566]          PARSE_ARITH
    Use   [parse_line.f, 566]          PARSE_ARITH
    Set   [parse_line.f, 575]          PARSE_ARITH

LINE    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [parse_line.f, 251]       END_RXN
    Declare   [parse_line.f, 254]      END_RXN
    Use Argument   [parse_line.f, 259]   END_RXN

LINE    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [parse_line.f, 22]        PARSE_LINE
    Declare   [parse_line.f, 42]       PARSE_LINE
    Use Argument   [parse_line.f, 70]   PARSE_LINE
    Use Argument   [parse_line.f, 77]   PARSE_LINE
    Use   [parse_line.f, 79]           PARSE_LINE
    Use Argument   [parse_line.f, 84]   PARSE_LINE
    Use Argument   [parse_line.f, 102]   PARSE_LINE
    Use Argument   [parse_line.f, 109]   PARSE_LINE
    Use Argument   [parse_line.f, 121]   PARSE_LINE
    Use Argument   [parse_line.f, 126]   PARSE_LINE
    Use Argument   [parse_line.f, 132]   PARSE_LINE
    Use Argument   [parse_line.f, 133]   PARSE_LINE

LINE    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [parse_line.f, 209]       START_DES_RXN
    Declare   [parse_line.f, 212]      START_DES_RXN
    Use Argument   [parse_line.f, 217]   START_DES_RXN

LINE    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [parse_line.f, 171]       START_RXN
    Declare   [parse_line.f, 174]      START_RXN
    Use Argument   [parse_line.f, 179]   START_RXN

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [bc_theta.f, 364]         CALC_THETA_BC
    Set   [bc_theta.f, 676]            CALC_THETA_BC
    Use Argument   [bc_theta.f, 677]   CALC_THETA_BC

LINE0    (Local Variable)  Declared as: CHARACTER
    Define   [solve_lin_eq.f, 99]      SOLVE_LIN_EQ
    Set   [solve_lin_eq.f, 185]        SOLVE_LIN_EQ
    Set   [solve_lin_eq.f, 186]        SOLVE_LIN_EQ
    Use Argument   [solve_lin_eq.f, 189]   SOLVE_LIN_EQ

LINE1    (Local Variable)  Declared as: CHARACTER
    Define   [solve_lin_eq.f, 99]      SOLVE_LIN_EQ
    Set   [solve_lin_eq.f, 187]        SOLVE_LIN_EQ
    Use Argument   [solve_lin_eq.f, 189]   SOLVE_LIN_EQ

LINE_LEN    (Variable)  Declared as: INTEGER
    Define   [read_namelist.f, 68]     READ_NAMELIST
    Set   [read_namelist.f, 151]       READ_NAMELIST
    Use   [read_namelist.f, 152]       READ_NAMELIST
    Use   [read_namelist.f, 154]       READ_NAMELIST
    Use Argument   [read_namelist.f, 157]   READ_NAMELIST
    Use   [read_namelist.f, 175]       READ_NAMELIST
    Set   [read_namelist.f, 182]       READ_NAMELIST
    Use   [read_namelist.f, 185]       READ_NAMELIST
    Use Argument   [read_namelist.f, 247]   SET_KEYWORD
    Use Argument   [read_namelist.f, 249]   SET_KEYWORD
    Use Argument   [read_namelist.f, 253]   SET_KEYWORD
    Use   [read_namelist.f, 263]       SET_KEYWORD
    Use   [read_namelist.f, 269]       SET_KEYWORD
    Use   [read_namelist.f, 277]       SET_KEYWORD
    Use   [read_namelist.f, 283]       SET_KEYWORD
    Use   [read_namelist.f, 291]       SET_KEYWORD
    Use   [read_namelist.f, 297]       SET_KEYWORD
    Use   [read_namelist.f, 305]       SET_KEYWORD
    Use   [read_namelist.f, 311]       SET_KEYWORD
    Use   [read_namelist.f, 319]       SET_KEYWORD
    Use   [read_namelist.f, 325]       SET_KEYWORD
    Use   [read_namelist.f, 333]       SET_KEYWORD
    Use   [read_namelist.f, 339]       SET_KEYWORD
    Use   [read_namelist.f, 346]       SET_KEYWORD
    Use   [read_namelist.f, 354]       SET_KEYWORD
    Use   [read_namelist.f, 360]       SET_KEYWORD
    Use   [read_namelist.f, 368]       SET_KEYWORD
    Use   [read_namelist.f, 374]       SET_KEYWORD
    Use   [read_namelist.f, 382]       SET_KEYWORD
    Use   [read_namelist.f, 388]       SET_KEYWORD
    Use   [read_namelist.f, 395]       SET_KEYWORD
    Use   [read_namelist.f, 403]       SET_KEYWORD
    Use   [read_namelist.f, 409]       SET_KEYWORD
    Use   [read_namelist.f, 416]       SET_KEYWORD
    Use   [read_namelist.f, 423]       SET_KEYWORD
    Use   [read_namelist.f, 431]       SET_KEYWORD
    Use   [read_namelist.f, 437]       SET_KEYWORD
    Use   [read_namelist.f, 445]       SET_KEYWORD
    Use   [read_namelist.f, 459]       SET_KEYWORD
    Use   [read_namelist.f, 466]       SET_KEYWORD
    Use   [read_namelist.f, 473]       SET_KEYWORD
    Use   [read_namelist.f, 480]       SET_KEYWORD

LINE_LEN    (Dummy Argument)  Declared as: INTEGER
    Define   [line_too_big.f, 25]      LINE_TOO_BIG
    Declare   [line_too_big.f, 37]     LINE_TOO_BIG
    Use   [line_too_big.f, 54]         LINE_TOO_BIG

LINE_NO    (Local Variable)  Declared as: INTEGER
    Define   [read_namelist.f, 70]     READ_NAMELIST
    Set   [read_namelist.f, 107]       READ_NAMELIST
    Set   [read_namelist.f, 149]       READ_NAMELIST
    Use   [read_namelist.f, 149]       READ_NAMELIST
    Use Argument   [read_namelist.f, 158]   READ_NAMELIST
    Use Argument   [read_namelist.f, 175]   READ_NAMELIST
    Use Argument   [read_namelist.f, 185]   READ_NAMELIST

LINE_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [deprecated.f, 140]       DEPRECATED
    Declare   [deprecated.f, 142]      DEPRECATED
    Use Argument   [deprecated.f, 147]   DEPRECATED

LINE_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [deprecated.f, 11]        DEPRECATED_OR_UNKNOWN
    Declare   [deprecated.f, 20]       DEPRECATED_OR_UNKNOWN
    Use Argument   [deprecated.f, 113]   DEPRECATED_OR_UNKNOWN
    Use Argument   [deprecated.f, 119]   DEPRECATED_OR_UNKNOWN
    Use Argument   [deprecated.f, 124]   DEPRECATED_OR_UNKNOWN
    Use Argument   [deprecated.f, 127]   DEPRECATED_OR_UNKNOWN

LINE_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [deprecated.f, 168]       UNKNOWN_KEYWORD
    Declare   [deprecated.f, 170]      UNKNOWN_KEYWORD
    Use Argument   [deprecated.f, 173]   UNKNOWN_KEYWORD

LINE_STRING    (Variable)  Declared as: CHARACTER
    Define   [read_namelist.f, 66]     READ_NAMELIST
    Set   [read_namelist.f, 146]       READ_NAMELIST
    Use Argument   [read_namelist.f, 151]   READ_NAMELIST
    Use Argument   [read_namelist.f, 151]   READ_NAMELIST
    Use Argument   [read_namelist.f, 152]   READ_NAMELIST
    Use Argument   [read_namelist.f, 152]   READ_NAMELIST
    Use Argument   [read_namelist.f, 155]   READ_NAMELIST
    Use Argument   [read_namelist.f, 157]   READ_NAMELIST
    Use   [read_namelist.f, 159]       READ_NAMELIST
    Use   [read_namelist.f, 169]       READ_NAMELIST
    Use Argument   [read_namelist.f, 175]   READ_NAMELIST
    Use Argument   [read_namelist.f, 181]   READ_NAMELIST
    Use Argument   [read_namelist.f, 182]   READ_NAMELIST
    Use Argument   [read_namelist.f, 185]   READ_NAMELIST
    Use Argument   [read_namelist.f, 238]   SET_KEYWORD
    Use Argument   [read_namelist.f, 239]   SET_KEYWORD
    Use Argument   [read_namelist.f, 240]   SET_KEYWORD
    Use Argument   [read_namelist.f, 241]   SET_KEYWORD
    Use Argument   [read_namelist.f, 242]   SET_KEYWORD
    Use Argument   [read_namelist.f, 243]   SET_KEYWORD
    Use Argument   [read_namelist.f, 244]   SET_KEYWORD
    Use Argument   [read_namelist.f, 245]   SET_KEYWORD
    Use Argument   [read_namelist.f, 246]   SET_KEYWORD
    Use Argument   [read_namelist.f, 247]   SET_KEYWORD
    Use Argument   [read_namelist.f, 249]   SET_KEYWORD
    Use Argument   [read_namelist.f, 250]   SET_KEYWORD
    Use Argument   [read_namelist.f, 253]   SET_KEYWORD
    Use Argument   [read_namelist.f, 263]   SET_KEYWORD
    Use Argument   [read_namelist.f, 269]   SET_KEYWORD
    Use Argument   [read_namelist.f, 277]   SET_KEYWORD
    Use Argument   [read_namelist.f, 283]   SET_KEYWORD
    Use Argument   [read_namelist.f, 291]   SET_KEYWORD
    Use Argument   [read_namelist.f, 297]   SET_KEYWORD
    Use Argument   [read_namelist.f, 305]   SET_KEYWORD
    Use Argument   [read_namelist.f, 311]   SET_KEYWORD
    Use Argument   [read_namelist.f, 319]   SET_KEYWORD
    Use Argument   [read_namelist.f, 325]   SET_KEYWORD
    Use Argument   [read_namelist.f, 333]   SET_KEYWORD
    Use Argument   [read_namelist.f, 339]   SET_KEYWORD
    Use Argument   [read_namelist.f, 346]   SET_KEYWORD
    Use Argument   [read_namelist.f, 354]   SET_KEYWORD
    Use Argument   [read_namelist.f, 360]   SET_KEYWORD
    Use Argument   [read_namelist.f, 368]   SET_KEYWORD
    Use Argument   [read_namelist.f, 374]   SET_KEYWORD
    Use Argument   [read_namelist.f, 382]   SET_KEYWORD
    Use Argument   [read_namelist.f, 388]   SET_KEYWORD
    Use Argument   [read_namelist.f, 395]   SET_KEYWORD
    Use Argument   [read_namelist.f, 403]   SET_KEYWORD
    Use Argument   [read_namelist.f, 409]   SET_KEYWORD
    Use Argument   [read_namelist.f, 416]   SET_KEYWORD
    Use Argument   [read_namelist.f, 423]   SET_KEYWORD
    Use Argument   [read_namelist.f, 431]   SET_KEYWORD
    Use Argument   [read_namelist.f, 437]   SET_KEYWORD
    Use Argument   [read_namelist.f, 445]   SET_KEYWORD
    Use Argument   [read_namelist.f, 459]   SET_KEYWORD
    Use Argument   [read_namelist.f, 466]   SET_KEYWORD
    Use Argument   [read_namelist.f, 473]   SET_KEYWORD
    Use Argument   [read_namelist.f, 480]   SET_KEYWORD

LINE_STRING    (Dummy Argument)  Declared as: CHARACTER
    Define   [make_upper_case.f, 23]   MAKE_UPPER_CASE
    Declare   [make_upper_case.f, 32]   MAKE_UPPER_CASE
    Use Argument   [make_upper_case.f, 65]   MAKE_UPPER_CASE
    Set   [make_upper_case.f, 68]      MAKE_UPPER_CASE

LINE_STRING    (Dummy Argument)  Declared as: CHARACTER
    Define   [make_upper_case.f, 95]   REPLACE_TAB
    Declare   [make_upper_case.f, 107]   REPLACE_TAB
    Use   [make_upper_case.f, 121]     REPLACE_TAB
    Set   [make_upper_case.f, 121]     REPLACE_TAB
    Use   [make_upper_case.f, 122]     REPLACE_TAB
    Set   [make_upper_case.f, 122]     REPLACE_TAB

line_t    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [pic_bc_routines.f, 811]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 870]     CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 890]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [pic_bc_routines.f, 891]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [pic_bc_routines.f, 896]     CHECK_IF_PARCEL_OVERLAPS_STL

LINE_T    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [pic_bc_routines.f, 61]   PIC_APPLY_WALLBC_STL
    Set   [pic_bc_routines.f, 90]      PIC_APPLY_WALLBC_STL
    Set   [pic_bc_routines.f, 110]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 113]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 113]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 115]     PIC_APPLY_WALLBC_STL

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3379]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3844]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3863]   ADJUST_IJK_SIZE

LIP    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4571]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4619]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4673]   GET_LIP_WITH_GHOST_LAYERS

LIP    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 5333]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5381]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5436]   GET_LIP_WITH_GHOST_LAYERS0

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4753]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4762]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4764]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4790]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4796]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4797]   MINIMIZE_LOAD_IMBALANCE

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 5516]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5525]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5527]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5553]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5559]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5560]   MINIMIZE_LOAD_IMBALANCE0

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4917]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5260]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5280]   REPORT_BEST_IJK_SIZE0

LIP_OLD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3379]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3831]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3835]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3863]   ADJUST_IJK_SIZE

LIP_OLD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4094]   REPORT_BEST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 4298]   REPORT_BEST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 4372]   REPORT_BEST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 4445]   REPORT_BEST_IJK_SIZE

LIP_OLD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4917]   REPORT_BEST_IJK_SIZE0
    Use Argument   [check_data_cartesian.f, 5157]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5247]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5280]   REPORT_BEST_IJK_SIZE0

LIST_OF_CELLS    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 803]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 829]     CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 838]     CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [pic_bc_routines.f, 858]     CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [pic_bc_routines.f, 866]     CHECK_IF_PARCEL_OVERLAPS_STL

LIST_OF_CUT_CELLS    (Local Variable)  Declared as: INTEGER
    Define   [get_delh.f, 617]         GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 633]            GET_DISTANCE_TO_WALL

listart    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 426]   DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 460]     DES_NEW_PARTICLE_TEST

lIW    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1050]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1065]         POINT_SOURCE_U_G
    Set   [source_u_g.f, 1068]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1074]         POINT_SOURCE_U_G

lIW    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1181]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1195]         POINT_SOURCE_U_S
    Set   [source_u_s.f, 1198]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1204]         POINT_SOURCE_U_S

lJ    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 168]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 234]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 238]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 238]     SEED_NEW_PARTICLE

lJ    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 290]   SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 340]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 347]   SET_NEW_PARTICLE_PROPS

ljend    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 426]   DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 459]     DES_NEW_PARTICLE_TEST

lJN    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 962]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 978]          POINT_SOURCE_V_G
    Set   [source_v_g.f, 981]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 985]          POINT_SOURCE_V_G

lJN    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1172]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1185]         POINT_SOURCE_V_S
    Set   [source_v_s.f, 1188]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1192]         POINT_SOURCE_V_S

lJS    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 962]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 977]          POINT_SOURCE_V_G
    Set   [source_v_g.f, 980]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 985]          POINT_SOURCE_V_G

lJS    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1172]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1184]         POINT_SOURCE_V_S
    Set   [source_v_s.f, 1187]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1192]         POINT_SOURCE_V_S

ljstart    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 426]   DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 459]     DES_NEW_PARTICLE_TEST

lK    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 168]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 235]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 240]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 240]     SEED_NEW_PARTICLE

lK    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 290]   SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 342]     SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 344]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 347]   SET_NEW_PARTICLE_PROPS

lKB    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 1080]      POINT_SOURCE_W_G
    Set   [source_w_g.f, 1095]         POINT_SOURCE_W_G
    Set   [source_w_g.f, 1098]         POINT_SOURCE_W_G
    Use   [source_w_g.f, 1102]         POINT_SOURCE_W_G

lKB    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1222]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1233]         POINT_SOURCE_W_S
    Set   [source_w_s.f, 1236]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1240]         POINT_SOURCE_W_S

lkend    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 426]   DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 458]     DES_NEW_PARTICLE_TEST

Lkin    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_mobility.f, 30]   thermal_mobility
    Set   [thermal_mobility.f, 99]     thermal_mobility
    Use   [thermal_mobility.f, 115]    thermal_mobility
    Use   [thermal_mobility.f, 117]    thermal_mobility
    Use   [thermal_mobility.f, 120]    thermal_mobility

lkj    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [thermal_mobility.f, 29]   thermal_mobility
    Set   [thermal_mobility.f, 92]     thermal_mobility
    Use   [thermal_mobility.f, 99]     thermal_mobility

lkstart    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 426]   DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 458]     DES_NEW_PARTICLE_TEST

lKT    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 1080]      POINT_SOURCE_W_G
    Set   [source_w_g.f, 1096]         POINT_SOURCE_W_G
    Set   [source_w_g.f, 1099]         POINT_SOURCE_W_G
    Use   [source_w_g.f, 1102]         POINT_SOURCE_W_G

lKT    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1222]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1234]         POINT_SOURCE_W_S
    Set   [source_w_s.f, 1237]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1240]         POINT_SOURCE_W_S

LL    (Variable)  Declared as: INTEGER
    Define   [calc_force_dem.f, 29]    CALC_FORCE_DEM
    Set   [calc_force_dem.f, 95]       CALC_FORCE_DEM
    Use Argument   [calc_force_dem.f, 96]   CALC_FORCE_DEM
    Use   [calc_force_dem.f, 97]       CALC_FORCE_DEM
    Use   [calc_force_dem.f, 98]       CALC_FORCE_DEM
    Use   [calc_force_dem.f, 101]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 101]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 102]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 117]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 118]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 133]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 133]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 133]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 139]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 140]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 140]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 140]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 143]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 143]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 156]      CALC_FORCE_DEM
    Use Argument   [calc_force_dem.f, 170]   CALC_FORCE_DEM
    Use   [calc_force_dem.f, 173]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 229]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 242]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 242]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 252]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 252]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 289]      PRINT_EXCESS_OVERLAP
    Use Argument   [calc_force_dem.f, 292]   PRINT_EXCESS_OVERLAP
    Use   [calc_force_dem.f, 293]      PRINT_EXCESS_OVERLAP

LL    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 53]   PIC_APPLY_WALLBC_STL
    Set   [pic_bc_routines.f, 74]      PIC_APPLY_WALLBC_STL
    Use Argument   [pic_bc_routines.f, 77]   PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 80]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 83]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 86]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 97]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 98]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 98]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 103]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 125]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 128]     PIC_APPLY_WALLBC_STL
    Use Argument   [pic_bc_routines.f, 133]   PIC_APPLY_WALLBC_STL

LL    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 582]   PIC_FIND_EMPTY_SPOT
    Set   [pic_bc_routines.f, 595]     PIC_FIND_EMPTY_SPOT
    Use Argument   [pic_bc_routines.f, 597]   PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 598]     PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 599]     PIC_FIND_EMPTY_SPOT

LL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [pic_bc_routines.f, 697]   PIC_FIND_NEW_CELL
    Declare   [pic_bc_routines.f, 708]   PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 716]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 717]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 718]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 719]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 720]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 722]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 726]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 728]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 730]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 734]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 736]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 738]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 742]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 745]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 747]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 749]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 753]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 754]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 755]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 758]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 762]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 766]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 769]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 769]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 769]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 769]     PIC_FIND_NEW_CELL

LL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [pic_bc_routines.f, 631]   PIC_REFLECT_PART
    Declare   [pic_bc_routines.f, 640]   PIC_REFLECT_PART
    Use   [pic_bc_routines.f, 661]     PIC_REFLECT_PART
    Use   [pic_bc_routines.f, 668]     PIC_REFLECT_PART
    Use   [pic_bc_routines.f, 683]     PIC_REFLECT_PART

LL    (Local Variable)  Declared as: INTEGER
    Define   [calc_grbdry.f, 844]      F_HW
    Set   [calc_grbdry.f, 997]         F_HW
    Use   [calc_grbdry.f, 998]         F_HW
    Use   [calc_grbdry.f, 999]         F_HW
    Use   [calc_grbdry.f, 1002]        F_HW
    Use   [calc_grbdry.f, 1002]        F_HW
    Use   [calc_grbdry.f, 1004]        F_HW
    Use   [calc_grbdry.f, 1009]        F_HW
    Use   [calc_grbdry.f, 1018]        F_HW
    Use   [calc_grbdry.f, 1020]        F_HW
    Use   [calc_grbdry.f, 1022]        F_HW
    Use   [calc_grbdry.f, 1028]        F_HW
    Use   [calc_grbdry.f, 1031]        F_HW
    Use   [calc_grbdry.f, 1031]        F_HW
    Use   [calc_grbdry.f, 1031]        F_HW

LL    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 70]     DISPLAY_FIELD_RESID
    Set   [display_resid.f, 75]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 76]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 79]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 94]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 95]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 99]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 99]        DISPLAY_FIELD_RESID

LL    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 422]   DES_NEW_PARTICLE_TEST
    Set   [mass_inflow_dem.f, 467]     DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 468]     DES_NEW_PARTICLE_TEST

ll    (Local Variable)  Declared as: INTEGER
    Define   [gaussj.f, 5]             gaussj
    Set   [gaussj.f, 51]               gaussj
    Use   [gaussj.f, 52]               gaussj
    Use   [gaussj.f, 53]               gaussj
    Use   [gaussj.f, 54]               gaussj
    Use   [gaussj.f, 56]               gaussj
    Use   [gaussj.f, 56]               gaussj
    Use   [gaussj.f, 59]               gaussj
    Use   [gaussj.f, 59]               gaussj

ll    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 395]     lubksb
    Set   [cooling_rate.f, 401]        lubksb
    Use   [cooling_rate.f, 402]        lubksb
    Use   [cooling_rate.f, 403]        lubksb

LL    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 39]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 61]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 63]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 66]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 66]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 66]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 68]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 69]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 70]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 71]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 73]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 77]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 79]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 82]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 117]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 119]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 121]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 121]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 121]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 126]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 130]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 134]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 137]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 137]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 138]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 139]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 140]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 160]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 163]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 165]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 165]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 165]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 168]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 168]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 170]   DES_GRANULAR_TEMPERATURE

LL    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1227]    WRITE_MPPIC_VEL_S
    Set   [pic_routines.f, 1279]       WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 1282]   WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 1284]   WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 1284]   WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 1284]   WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1286]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1287]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1287]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1287]       WRITE_MPPIC_VEL_S

LL    (Local Variable)  Declared as: INTEGER
    Define   [cfupdateold.f, 25]       CFUPDATEOLD
    Set   [cfupdateold.f, 31]          CFUPDATEOLD
    Use Argument   [cfupdateold.f, 32]   CFUPDATEOLD
    Use Argument   [cfupdateold.f, 32]   CFUPDATEOLD
    Use   [cfupdateold.f, 34]          CFUPDATEOLD
    Use   [cfupdateold.f, 34]          CFUPDATEOLD
    Use   [cfupdateold.f, 35]          CFUPDATEOLD
    Use   [cfupdateold.f, 35]          CFUPDATEOLD
    Use   [cfupdateold.f, 36]          CFUPDATEOLD
    Use   [cfupdateold.f, 36]          CFUPDATEOLD

LL    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 514]    LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 761]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 765]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 767]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 770]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 770]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 795]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 796]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 798]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 799]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 801]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 802]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 804]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 805]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 805]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 806]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 806]       LAYOUT_DEM_MI_EW

LL    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 120]    LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 368]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 372]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 374]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 377]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 377]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 402]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 403]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 405]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 406]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 408]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 409]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 411]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 412]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 412]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 413]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 413]       LAYOUT_DEM_MI_NS

LL    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 908]    LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1137]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1141]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1143]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1146]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1146]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1171]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1172]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1174]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1175]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1177]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1178]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1180]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1181]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1181]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1182]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1182]      LAYOUT_DEM_MI_TB

ll    (Local Variable)  Declared as: INTEGER
    Define   [neighbour.f, 29]         NEIGHBOUR
    Set   [neighbour.f, 57]            NEIGHBOUR
    Use   [neighbour.f, 60]            NEIGHBOUR
    Use   [neighbour.f, 60]            NEIGHBOUR
    Use   [neighbour.f, 61]            NEIGHBOUR
    Use   [neighbour.f, 64]            NEIGHBOUR
    Use   [neighbour.f, 64]            NEIGHBOUR
    Use   [neighbour.f, 65]            NEIGHBOUR

LL    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 27]           NSQUARE
    Set   [nsquare.f, 50]              NSQUARE
    Use Argument   [nsquare.f, 53]     NSQUARE
    Use   [nsquare.f, 55]              NSQUARE
    Use   [nsquare.f, 62]              NSQUARE
    Use   [nsquare.f, 63]              NSQUARE
    Use   [nsquare.f, 71]              NSQUARE
    Use   [nsquare.f, 74]              NSQUARE
    Use   [nsquare.f, 80]              NSQUARE
    Use   [nsquare.f, 83]              NSQUARE
    Use   [nsquare.f, 87]              NSQUARE
    Use   [nsquare.f, 91]              NSQUARE
    Use   [nsquare.f, 94]              NSQUARE
    Use   [nsquare.f, 122]             NSQUARE
    Use   [nsquare.f, 128]             NSQUARE

LL    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 810]         THETA_HW_CW
    Set   [bc_theta.f, 967]            THETA_HW_CW
    Use   [bc_theta.f, 968]            THETA_HW_CW
    Use   [bc_theta.f, 969]            THETA_HW_CW
    Use   [bc_theta.f, 972]            THETA_HW_CW
    Use   [bc_theta.f, 972]            THETA_HW_CW
    Use   [bc_theta.f, 974]            THETA_HW_CW
    Use   [bc_theta.f, 980]            THETA_HW_CW
    Use   [bc_theta.f, 981]            THETA_HW_CW
    Use   [bc_theta.f, 982]            THETA_HW_CW
    Use   [bc_theta.f, 1006]           THETA_HW_CW
    Use   [bc_theta.f, 1024]           THETA_HW_CW
    Use   [bc_theta.f, 1025]           THETA_HW_CW

LL1    (Local Variable)  Declared as: INTEGER
    Define   [out_array_k.f, 56]       OUT_ARRAY_K
    Set   [out_array_k.f, 86]          OUT_ARRAY_K
    Use   [out_array_k.f, 89]          OUT_ARRAY_K
    Use   [out_array_k.f, 90]          OUT_ARRAY_K
    Use   [out_array_k.f, 92]          OUT_ARRAY_K
    Use   [out_array_k.f, 95]          OUT_ARRAY_K

ll1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 957]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 974]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1001]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1001]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1062]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1065]   IJK_Pg_SEARCH

LL1    (Local Variable)  Declared as: INTEGER
    Define   [out_array_kc.f, 64]      OUT_ARRAY_KC
    Set   [out_array_kc.f, 82]         OUT_ARRAY_KC
    Use   [out_array_kc.f, 83]         OUT_ARRAY_KC
    Use   [out_array_kc.f, 84]         OUT_ARRAY_KC

LL2    (Local Variable)  Declared as: INTEGER
    Define   [out_array_k.f, 56]       OUT_ARRAY_K
    Set   [out_array_k.f, 105]         OUT_ARRAY_K
    Use Argument   [out_array_k.f, 106]   OUT_ARRAY_K
    Use Argument   [out_array_k.f, 107]   OUT_ARRAY_K
    Use   [out_array_k.f, 110]         OUT_ARRAY_K
    Use Argument   [out_array_k.f, 111]   OUT_ARRAY_K

ll2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 957]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 973]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1002]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1002]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1063]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1068]   IJK_Pg_SEARCH

LL2    (Local Variable)  Declared as: INTEGER
    Define   [out_array_kc.f, 64]      OUT_ARRAY_KC
    Set   [out_array_kc.f, 87]         OUT_ARRAY_KC
    Use Argument   [out_array_kc.f, 88]   OUT_ARRAY_KC
    Use Argument   [out_array_kc.f, 89]   OUT_ARRAY_KC
    Use   [out_array_kc.f, 91]         OUT_ARRAY_KC

LL3    (Local Variable)  Declared as: INTEGER
    Define   [out_array_k.f, 56]       OUT_ARRAY_K
    Use   [out_array_k.f, 104]         OUT_ARRAY_K
    Set   [out_array_k.f, 104]         OUT_ARRAY_K
    Use Argument   [out_array_k.f, 111]   OUT_ARRAY_K
    Set   [out_array_k.f, 111]         OUT_ARRAY_K

ll3    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 957]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 972]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1025]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1027]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1029]            IJK_Pg_SEARCH

LL3    (Local Variable)  Declared as: INTEGER
    Define   [out_array_kc.f, 64]      OUT_ARRAY_KC
    Use   [out_array_kc.f, 86]         OUT_ARRAY_KC
    Set   [out_array_kc.f, 86]         OUT_ARRAY_KC
    Use   [out_array_kc.f, 91]         OUT_ARRAY_KC
    Set   [out_array_kc.f, 91]         OUT_ARRAY_KC

LL4    (Local Variable)  Declared as: INTEGER
    Define   [out_array_kc.f, 64]      OUT_ARRAY_KC
    Set   [out_array_kc.f, 93]         OUT_ARRAY_KC
    Use   [out_array_kc.f, 94]         OUT_ARRAY_KC

llHoRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 89]       DES_RRATES0
    Set   [des_rrates0.f, 126]         DES_RRATES0
    Set   [des_rrates0.f, 190]         DES_RRATES0
    Use   [des_rrates0.f, 190]         DES_RRATES0
    Set   [des_rrates0.f, 199]         DES_RRATES0
    Use   [des_rrates0.f, 199]         DES_RRATES0
    Use   [des_rrates0.f, 205]         DES_RRATES0
    Use   [des_rrates0.f, 208]         DES_RRATES0

lLMAX    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 655]        getChemEq
    Set   [parse_rxn.f, 661]           getChemEq

lLMAX    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 459]        getDH
    Set   [parse_rxn.f, 463]           getDH
    Use   [parse_rxn.f, 471]           getDH

lLMAX    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 535]        getFracDH
    Set   [parse_rxn.f, 541]           getFracDH
    Use   [parse_rxn.f, 550]           getFracDH
    Use   [parse_rxn.f, 551]           getFracDH
    Use   [parse_rxn.f, 552]           getFracDH

llocalcnt    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 257]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 324]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 325]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 326]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 326]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 328]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 330]      WRITE_DES_TECPLOT

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 152]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 160]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 183]              CALC_PS_CpxMFLOW
    Use   [set_ps.f, 185]              CALC_PS_CpxMFLOW

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_gama.f, 69]         CALC_GAMA
    Set   [calc_gama.f, 119]           CALC_GAMA
    Use   [calc_gama.f, 120]           CALC_GAMA
    Use   [calc_gama.f, 124]           CALC_GAMA
    Use   [calc_gama.f, 125]           CALC_GAMA
    Use   [calc_gama.f, 128]           CALC_GAMA

lM    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_common_discrete.f, 89]   CHECK_SOLIDS_COMMON_DISCRETE
    Set   [check_solids_common_discrete.f, 102]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 105]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 110]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 111]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 111]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 111]   CHECK_SOLIDS_COMMON_DISCRETE

lM    (Local Variable)  Declared as: INTEGER
    Define   [drag_gp_des.f, 71]       DES_DRAG_GP
    Set   [drag_gp_des.f, 129]         DES_DRAG_GP
    Use   [drag_gp_des.f, 131]         DES_DRAG_GP
    Use   [drag_gp_des.f, 132]         DES_DRAG_GP
    Use   [drag_gp_des.f, 132]         DES_DRAG_GP
    Use   [drag_gp_des.f, 134]         DES_DRAG_GP
    Set   [drag_gp_des.f, 138]         DES_DRAG_GP
    Use   [drag_gp_des.f, 140]         DES_DRAG_GP
    Use   [drag_gp_des.f, 140]         DES_DRAG_GP
    Use   [drag_gp_des.f, 142]         DES_DRAG_GP

lM    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [mass_inflow_dem.f, 123]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 147]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 186]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 188]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 192]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 192]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 193]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 193]     SEED_NEW_PARTICLE

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 282]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 296]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 326]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 329]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 336]     SET_NEW_PARTICLE_PROPS

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 227]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 229]            CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 300]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 313]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 318]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 324]            CALC_D_N_GAS_AND_SOLIDS

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 546]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 588]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 590]            CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 601]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 612]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 615]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 619]            CALC_D_N_SOLIDS_ONLY

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 219]     PARTIAL_ELIM_IA
    Set   [partial_elim.f, 248]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 249]        PARTIAL_ELIM_IA

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 364]     PARTIAL_ELIM_U
    Set   [partial_elim.f, 399]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 403]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 403]        PARTIAL_ELIM_U

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 550]     PARTIAL_ELIM_V
    Set   [partial_elim.f, 585]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 589]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 589]        PARTIAL_ELIM_V

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 729]     PARTIAL_ELIM_W
    Set   [partial_elim.f, 764]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 768]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 768]        PARTIAL_ELIM_W

LM    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 301]   SOURCE_GRANULAR_ENERGY_IA
    Set   [source_granular_energy.f, 458]   SOURCE_GRANULAR_ENERGY_IA

LM    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_z.f, 127]          VF_SS_Z
    Set   [vf_gs_z.f, 135]             VF_SS_Z
    Use   [vf_gs_z.f, 139]             VF_SS_Z
    Use   [vf_gs_z.f, 143]             VF_SS_Z
    Use   [vf_gs_z.f, 143]             VF_SS_Z
    Use   [vf_gs_z.f, 143]             VF_SS_Z

LM    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 124]          VF_SS_Y
    Set   [vf_gs_y.f, 132]             VF_SS_Y
    Use   [vf_gs_y.f, 138]             VF_SS_Y
    Use   [vf_gs_y.f, 138]             VF_SS_Y
    Use   [vf_gs_y.f, 138]             VF_SS_Y
    Use   [vf_gs_y.f, 140]             VF_SS_Y

LM    (Local Variable)  Declared as: INTEGER
    Define   [des_rrates0.f, 73]       DES_RRATES0
    Set   [des_rrates0.f, 222]         DES_RRATES0
    Use   [des_rrates0.f, 223]         DES_RRATES0
    Use   [des_rrates0.f, 223]         DES_RRATES0
    Use   [des_rrates0.f, 224]         DES_RRATES0
    Set   [des_rrates0.f, 235]         DES_RRATES0
    Use   [des_rrates0.f, 237]         DES_RRATES0

LM    (Local Variable)  Declared as: INTEGER
    Define   [vtc_scalar.f, 44]        CALC_VTC_SS
    Set   [vtc_scalar.f, 52]           CALC_VTC_SS
    Use   [vtc_scalar.f, 57]           CALC_VTC_SS
    Use   [vtc_scalar.f, 57]           CALC_VTC_SS
    Use   [vtc_scalar.f, 59]           CALC_VTC_SS

LM    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_x.f, 117]          VF_SS_X
    Set   [vf_gs_x.f, 125]             VF_SS_X
    Use   [vf_gs_x.f, 131]             VF_SS_X
    Use   [vf_gs_x.f, 131]             VF_SS_X
    Use   [vf_gs_x.f, 131]             VF_SS_X
    Use   [vf_gs_x.f, 133]             VF_SS_X

LM    (Local Variable)  Declared as: INTEGER
    Define   [drag_ss.f, 54]           DRAG_SS
    Set   [drag_ss.f, 73]              DRAG_SS
    Use   [drag_ss.f, 130]             DRAG_SS
    Use   [drag_ss.f, 136]             DRAG_SS
    Use   [drag_ss.f, 136]             DRAG_SS
    Use   [drag_ss.f, 141]             DRAG_SS

LM    (Local Variable)  Declared as: INTEGER
    Define   [drag_ss.f, 265]          DRAG_SS_IA
    Set   [drag_ss.f, 282]             DRAG_SS_IA
    Use   [drag_ss.f, 285]             DRAG_SS_IA
    Use   [drag_ss.f, 361]             DRAG_SS_IA
    Use   [drag_ss.f, 372]             DRAG_SS_IA

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 51]   PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 99]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 104]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 104]    PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 175]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 180]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 180]    PARTIAL_ELIM_GHD_U

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 246]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 301]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 305]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 305]    PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 374]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 378]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 378]    PARTIAL_ELIM_GHD_V

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 443]   PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 491]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 495]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 495]    PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 565]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 569]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 569]    PARTIAL_ELIM_GHD_W

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [read_database.f, 20]     READ_DATABASE
    Declare   [read_database.f, 38]    READ_DATABASE
    Use   [read_database.f, 106]       READ_DATABASE
    Use   [read_database.f, 106]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 121]       READ_DATABASE
    Use   [read_database.f, 122]       READ_DATABASE
    Use   [read_database.f, 126]       READ_DATABASE
    Use   [read_database.f, 129]       READ_DATABASE
    Use   [read_database.f, 130]       READ_DATABASE
    Use   [read_database.f, 133]       READ_DATABASE
    Use   [read_database.f, 134]       READ_DATABASE
    Use   [read_database.f, 136]       READ_DATABASE
    Use   [read_database.f, 137]       READ_DATABASE
    Use Argument   [read_database.f, 146]   READ_DATABASE

lM    (Local Variable)  Declared as: INTEGER
    Define   [physical_prop.f, 500]    PHYSICAL_PROP_Dp
    Set   [physical_prop.f, 506]       PHYSICAL_PROP_Dp
    Use   [physical_prop.f, 512]       PHYSICAL_PROP_Dp
    Use   [physical_prop.f, 512]       PHYSICAL_PROP_Dp

LM    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 573]    CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 626]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 627]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 629]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 630]       CHECK_RXN_MASS_BALANCE

lM    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 117]          RRATES0
    Set   [rrates0.f, 343]             RRATES0
    Use   [rrates0.f, 344]             RRATES0
    Use   [rrates0.f, 344]             RRATES0
    Use   [rrates0.f, 345]             RRATES0
    Set   [rrates0.f, 359]             RRATES0
    Use   [rrates0.f, 361]             RRATES0
    Set   [rrates0.f, 374]             RRATES0
    Use   [rrates0.f, 376]             RRATES0
    Set   [rrates0.f, 379]             RRATES0
    Use   [rrates0.f, 381]             RRATES0

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 231]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 233]            CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 303]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 316]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 320]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 326]            CALC_D_T_GAS_AND_SOLIDS

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 547]         CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 591]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 593]            CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 604]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 615]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 618]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 623]            CALC_D_T_SOLIDS_ONLY

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 234]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 236]            CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 307]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 320]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 325]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 331]            CALC_D_E_GAS_AND_SOLIDS

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 558]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 602]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 604]            CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 615]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 627]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 632]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 636]            CALC_D_E_SOLIDS_ONLY

lMAP    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [set_bc0.f, 957]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 977]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1023]            IJK_Pg_SEARCH

LMAX    (Dummy Argument)  Declared as: INTEGER
    Define   [write_error.f, 20]       WRITE_ERROR
    Declare   [write_error.f, 42]      WRITE_ERROR
    Use   [write_error.f, 52]          WRITE_ERROR

LMAX    (Dummy Argument)  Declared as: INTEGER
    Define   [parse_line.f, 450]       PARSE_ARITH
    Declare   [parse_line.f, 468]      PARSE_ARITH
    Set   [parse_line.f, 512]          PARSE_ARITH
    Use   [parse_line.f, 518]          PARSE_ARITH
    Use   [parse_line.f, 520]          PARSE_ARITH
    Set   [parse_line.f, 559]          PARSE_ARITH
    Use   [parse_line.f, 561]          PARSE_ARITH
    Use   [parse_line.f, 565]          PARSE_ARITH

LMAX    (Dummy Argument)  Declared as: INTEGER
    Define   [parse_line.f, 251]       END_RXN
    Declare   [parse_line.f, 256]      END_RXN
    Use   [parse_line.f, 259]          END_RXN

LMAX    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [parse_line.f, 22]        PARSE_LINE
    Declare   [parse_line.f, 45]       PARSE_LINE
    Use   [parse_line.f, 60]           PARSE_LINE
    Use   [parse_line.f, 77]           PARSE_LINE
    Use   [parse_line.f, 79]           PARSE_LINE
    Use Argument   [parse_line.f, 133]   PARSE_LINE

LMAX    (Dummy Argument)  Declared as: INTEGER
    Define   [parse_line.f, 209]       START_DES_RXN
    Declare   [parse_line.f, 214]      START_DES_RXN
    Use   [parse_line.f, 217]          START_DES_RXN

LMAX    (Dummy Argument)  Declared as: INTEGER
    Define   [parse_line.f, 171]       START_RXN
    Declare   [parse_line.f, 176]      START_RXN
    Use   [parse_line.f, 179]          START_RXN

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4571]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4609]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4612]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4623]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4647]   GET_LIP_WITH_GHOST_LAYERS

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5333]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5371]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5374]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5385]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5409]   GET_LIP_WITH_GHOST_LAYERS0

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4705]   MINIMIZE_LOAD_IMBALANCE
    Declare   [check_data_cartesian.f, 4743]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4745]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4762]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4790]   MINIMIZE_LOAD_IMBALANCE

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5467]   MINIMIZE_LOAD_IMBALANCE0
    Declare   [check_data_cartesian.f, 5505]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5507]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5525]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5553]   MINIMIZE_LOAD_IMBALANCE0

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4571]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4609]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4612]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4623]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4631]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4647]   GET_LIP_WITH_GHOST_LAYERS

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5333]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5371]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5374]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5385]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5393]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5409]   GET_LIP_WITH_GHOST_LAYERS0

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4705]   MINIMIZE_LOAD_IMBALANCE
    Declare   [check_data_cartesian.f, 4743]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4745]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4762]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4790]   MINIMIZE_LOAD_IMBALANCE

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5467]   MINIMIZE_LOAD_IMBALANCE0
    Declare   [check_data_cartesian.f, 5505]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5507]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5525]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5553]   MINIMIZE_LOAD_IMBALANCE0

lMMAX    (Variable)  Declared as: INTEGER
    Define   [check_chemical_rxns.f, 49]   CHECK_CHEMICAL_RXNS
    Set   [check_chemical_rxns.f, 65]   CHECK_CHEMICAL_RXNS
    Use   [check_chemical_rxns.f, 69]   CHECK_CHEMICAL_RXNS
    Use   [check_chemical_rxns.f, 69]   CHECK_CHEMICAL_RXNS
    Use   [check_chemical_rxns.f, 73]   CHECK_CHEMICAL_RXNS
    Use   [check_chemical_rxns.f, 74]   CHECK_CHEMICAL_RXNS
    Use   [check_chemical_rxns.f, 200]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 201]   CHECK_CHEMICAL_RXNS_COMMON
    Use   [check_chemical_rxns.f, 254]   CHECK_CHEMICAL_RXNS_COMMON

lMMAX    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 123]          RRATES0
    Set   [rrates0.f, 172]             RRATES0
    Use   [rrates0.f, 276]             RRATES0
    Use   [rrates0.f, 309]             RRATES0
    Use   [rrates0.f, 316]             RRATES0
    Use   [rrates0.f, 317]             RRATES0
    Use   [rrates0.f, 328]             RRATES0
    Use   [rrates0.f, 334]             RRATES0
    Use   [rrates0.f, 358]             RRATES0
    Use   [rrates0.f, 366]             RRATES0
    Use   [rrates0.f, 378]             RRATES0

lMsg    (Local Variable)  Declared as: CHARACTER
    Define   [set_bc0.f, 806]          SET_IJK_P_G
    Set   [set_bc0.f, 859]             SET_IJK_P_G
    Set   [set_bc0.f, 867]             SET_IJK_P_G
    Set   [set_bc0.f, 875]             SET_IJK_P_G
    Set   [set_bc0.f, 886]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 895]    SET_IJK_P_G

lMsg    (Variable)  Declared as: CHARACTER
    Define   [iterate.f, 104]          ITERATE
    Set   [iterate.f, 189]             ITERATE
    Use Argument   [iterate.f, 478]    ITERATE
    Use Argument   [iterate.f, 482]    ITERATE
    Set   [iterate.f, 569]             IER_MANAGER
    Set   [iterate.f, 571]             IER_MANAGER
    Set   [iterate.f, 573]             IER_MANAGER
    Set   [iterate.f, 581]             IER_MANAGER
    Set   [iterate.f, 583]             IER_MANAGER
    Set   [iterate.f, 591]             IER_MANAGER
    Set   [iterate.f, 593]             IER_MANAGER
    Set   [iterate.f, 601]             IER_MANAGER
    Set   [iterate.f, 603]             IER_MANAGER
    Set   [iterate.f, 611]             IER_MANAGER
    Set   [iterate.f, 613]             IER_MANAGER
    Set   [iterate.f, 619]             IER_MANAGER

lMW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_h.f, 46]            CALC_H
    Set   [calc_h.f, 55]               CALC_H
    Set   [calc_h.f, 57]               CALC_H
    Use   [calc_h.f, 64]               CALC_H

lMW    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [set_ps.f, 153]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 168]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 184]              CALC_PS_CpxMFLOW

lMW    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [read_database.f, 20]     READ_DATABASE
    Declare   [read_database.f, 42]    READ_DATABASE
    Use   [read_database.f, 113]       READ_DATABASE
    Set   [read_database.f, 113]       READ_DATABASE
    Use Argument   [read_database.f, 146]   READ_DATABASE

lN    (Local Variable)  Declared as: INTEGER
    Define   [stiff_chem_rrates.f, 86]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 159]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 161]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 163]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 167]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 168]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 202]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 206]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 231]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 233]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 235]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 237]   STIFF_CHEM_RRATES

lN    (Local Variable)  Declared as: INTEGER
    Define   [des_rrates0.f, 72]       DES_RRATES0
    Set   [des_rrates0.f, 132]         DES_RRATES0
    Use   [des_rrates0.f, 134]         DES_RRATES0
    Use   [des_rrates0.f, 136]         DES_RRATES0
    Use   [des_rrates0.f, 139]         DES_RRATES0
    Use   [des_rrates0.f, 140]         DES_RRATES0
    Set   [des_rrates0.f, 180]         DES_RRATES0
    Use   [des_rrates0.f, 182]         DES_RRATES0
    Use   [des_rrates0.f, 184]         DES_RRATES0
    Use   [des_rrates0.f, 187]         DES_RRATES0

LN    (Local Variable)  Declared as: INTEGER
    Define   [solve_species_eq.f, 66]   SOLVE_SPECIES_EQ
    Set   [solve_species_eq.f, 120]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 128]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 129]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 130]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 131]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 140]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 140]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 144]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 144]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 150]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 150]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 150]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 151]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 151]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 154]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 157]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 158]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 160]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 161]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 162]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 162]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 163]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 163]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 166]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 168]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 172]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 178]    SOLVE_SPECIES_EQ
    Set   [solve_species_eq.f, 191]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 193]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 193]    SOLVE_SPECIES_EQ
    Set   [solve_species_eq.f, 200]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 208]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 209]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 210]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 211]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 221]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 221]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 225]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 225]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 230]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 230]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 231]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 231]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 232]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 234]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 237]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 238]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 240]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 241]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 242]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 242]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 243]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 243]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 246]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 257]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 260]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 266]    SOLVE_SPECIES_EQ

lN    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [read_database.f, 20]     READ_DATABASE
    Declare   [read_database.f, 38]    READ_DATABASE
    Use   [read_database.f, 106]       READ_DATABASE
    Use   [read_database.f, 106]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 121]       READ_DATABASE
    Use   [read_database.f, 122]       READ_DATABASE
    Use   [read_database.f, 126]       READ_DATABASE
    Use   [read_database.f, 129]       READ_DATABASE
    Use   [read_database.f, 130]       READ_DATABASE
    Use   [read_database.f, 133]       READ_DATABASE
    Use   [read_database.f, 134]       READ_DATABASE
    Use   [read_database.f, 136]       READ_DATABASE
    Use   [read_database.f, 137]       READ_DATABASE
    Use Argument   [read_database.f, 146]   READ_DATABASE

lN    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 116]          RRATES0
    Set   [rrates0.f, 198]             RRATES0
    Use   [rrates0.f, 200]             RRATES0
    Use   [rrates0.f, 202]             RRATES0
    Use   [rrates0.f, 206]             RRATES0
    Use   [rrates0.f, 207]             RRATES0
    Use   [rrates0.f, 242]             RRATES0
    Use   [rrates0.f, 246]             RRATES0
    Set   [rrates0.f, 292]             RRATES0
    Use   [rrates0.f, 294]             RRATES0
    Use   [rrates0.f, 296]             RRATES0
    Use   [rrates0.f, 298]             RRATES0

lNAME    (Dummy Argument)  Declared as: CHARACTER INTENT(OUT)
    Define   [parse_rxn.f, 387]        getName
    Declare   [parse_rxn.f, 394]       getName
    Set   [parse_rxn.f, 399]           getName
    Set   [parse_rxn.f, 416]           getName

lName    (Dummy Argument)  Declared as: CHARACTER INTENT(INOUT)
    Define   [parse_rxn.f, 22]         PARSE_RXN
    Declare   [parse_rxn.f, 40]        PARSE_RXN
    Use Argument   [parse_rxn.f, 85]   PARSE_RXN
    Use Argument   [parse_rxn.f, 113]   PARSE_RXN

lName    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [read_database.f, 20]     READ_DATABASE
    Declare   [read_database.f, 40]    READ_DATABASE
    Use Argument   [read_database.f, 106]   READ_DATABASE
    Use Argument   [read_database.f, 146]   READ_DATABASE
    Use Argument   [read_database.f, 161]   READ_DATABASE

lNEQ    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [stiff_chem_rrates.f, 12]   STIFF_CHEM_RRATES
    Declare   [stiff_chem_rrates.f, 72]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 133]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 141]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 301]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 337]   STIFF_CHEM_RRATES

lNEXT_REC    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 31]    WRITE_RES0_DES
    Set   [write_res0_des.f, 42]       WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 44]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 45]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 46]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 49]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 52]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 54]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 57]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 61]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 64]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 65]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 68]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 71]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 75]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 80]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 82]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 85]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 86]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 89]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 92]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 94]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 95]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 96]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 97]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 98]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 99]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 100]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 101]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 102]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 103]   WRITE_RES0_DES

lNEXT_REC    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 28]     READ_RES0_DES
    Set   [read_res0_des.f, 34]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 36]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 37]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 38]   READ_RES0_DES
    Use   [read_res0_des.f, 41]        READ_RES0_DES
    Set   [read_res0_des.f, 41]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 43]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 45]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 48]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 52]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 55]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 56]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 58]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 59]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 63]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 68]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 70]   READ_RES0_DES
    Use   [read_res0_des.f, 78]        READ_RES0_DES
    Set   [read_res0_des.f, 78]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 81]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 86]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 96]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 97]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 98]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 99]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 100]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 101]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 106]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 108]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 110]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 112]   READ_RES0_DES

lNoOfRxns    (Dummy Argument)  Declared as: INTEGER INTENT(INOUT)
    Define   [parse_rxn.f, 22]         PARSE_RXN
    Declare   [parse_rxn.f, 38]        PARSE_RXN
    Use Argument   [parse_rxn.f, 83]   PARSE_RXN
    Use Argument   [parse_rxn.f, 111]   PARSE_RXN
    Use Argument   [parse_rxn.f, 136]   PARSE_RXN
    Use Argument   [parse_rxn.f, 143]   PARSE_RXN

lNoP    (Local Variable)  Declared as: CHARACTER
    Define   [write_des_data.f, 112]   WRITE_DES_VTP
    Use Argument   [write_des_data.f, 120]   WRITE_DES_VTP
    Use   [write_des_data.f, 130]      WRITE_DES_VTP

lNOR    (Dummy Argument)  Declared as: INTEGER INTENT(INOUT)
    Define   [parse_rxn.f, 201]        getReactionIndex
    Declare   [parse_rxn.f, 207]       getReactionIndex
    Use   [parse_rxn.f, 212]           getReactionIndex
    Set   [parse_rxn.f, 218]           getReactionIndex
    Use   [parse_rxn.f, 218]           getReactionIndex
    Use   [parse_rxn.f, 219]           getReactionIndex

lNP    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 284]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 299]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 300]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 302]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 306]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 307]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 308]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 309]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 310]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 314]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 315]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 315]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 316]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 320]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 323]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 326]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 329]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 332]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 333]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 336]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 339]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 340]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 344]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 347]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 350]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 350]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 351]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 351]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 351]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 352]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 352]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 352]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 355]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 359]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 360]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 360]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 365]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 368]   SET_NEW_PARTICLE_PROPS

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_newvalues.f, 37]   DES_THERMO_NEWVALUES
    Set   [des_thermo_newvalues.f, 67]   DES_THERMO_NEWVALUES
    Use   [des_thermo_newvalues.f, 68]   DES_THERMO_NEWVALUES

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_newvalues.f, 154]   SET_INIT_avgTs
    Set   [des_thermo_newvalues.f, 175]   SET_INIT_avgTs
    Use   [des_thermo_newvalues.f, 176]   SET_INIT_avgTs

lNP    (Local Variable)  Declared as: INTEGER
    Define   [calc_thermo_des.f, 34]   CALC_THERMO_DES
    Set   [calc_thermo_des.f, 72]      CALC_THERMO_DES
    Use   [calc_thermo_des.f, 73]      CALC_THERMO_DES

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_reaction_model.f, 39]   DES_REACTION_MODEL
    Set   [des_reaction_model.f, 68]   DES_REACTION_MODEL
    Use   [des_reaction_model.f, 69]   DES_REACTION_MODEL

LOC    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [calc_cell.f, 126]        CALC_CELL_INTERSECT
    Declare   [calc_cell.f, 135]       CALC_CELL_INTERSECT
    Use   [calc_cell.f, 156]           CALC_CELL_INTERSECT
    Use   [calc_cell.f, 156]           CALC_CELL_INTERSECT

LOC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [write_out0.f, 57]        WRITE_OUT0
    Set   [write_out0.f, 422]          WRITE_OUT0
    Set   [write_out0.f, 423]          WRITE_OUT0
    Set   [write_out0.f, 424]          WRITE_OUT0
    Set   [write_out0.f, 425]          WRITE_OUT0
    Set   [write_out0.f, 426]          WRITE_OUT0
    Set   [write_out0.f, 427]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Use   [write_out0.f, 430]          WRITE_OUT0
    Set   [write_out0.f, 507]          WRITE_OUT0
    Set   [write_out0.f, 508]          WRITE_OUT0
    Set   [write_out0.f, 509]          WRITE_OUT0
    Set   [write_out0.f, 510]          WRITE_OUT0
    Set   [write_out0.f, 511]          WRITE_OUT0
    Set   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Use   [write_out0.f, 515]          WRITE_OUT0
    Set   [write_out0.f, 593]          WRITE_OUT0
    Set   [write_out0.f, 594]          WRITE_OUT0
    Set   [write_out0.f, 595]          WRITE_OUT0
    Set   [write_out0.f, 596]          WRITE_OUT0
    Set   [write_out0.f, 597]          WRITE_OUT0
    Set   [write_out0.f, 598]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0
    Use   [write_out0.f, 601]          WRITE_OUT0

LOC_DEM_BCMI_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_dem_mi.f, 343]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 404]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 462]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 482]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 485]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 488]       SET_DEM_BCMI_IJK

LOC_DEM_BCMO_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_dem_mo.f, 43]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 94]        SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 136]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 176]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 195]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 198]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 201]       SET_BC_DEM_MO

LOC_PIC_BCMI_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_pic_mi.f, 145]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 200]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 249]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 272]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 281]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 284]       SET_PIC_BCMI_IJK

LOC_PIC_BCMO_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_pic_mo.f, 39]     SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 82]        SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 127]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 146]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 149]       SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 152]       SET_BC_PIC_MO

loc_UR_F_gs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_coeff.f, 43]        CALC_COEFF_ALL
    Set   [calc_coeff.f, 53]           CALC_COEFF_ALL
    Use   [calc_coeff.f, 68]           CALC_COEFF_ALL

loc_UR_kth_sml    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_coeff.f, 45]        CALC_COEFF_ALL
    Set   [calc_coeff.f, 54]           CALC_COEFF_ALL
    Use   [calc_coeff.f, 69]           CALC_COEFF_ALL

LOCAL_INDEX    (Local Variable)  Declared as: INTEGER
    Define   [accum_resid.f, 48]       ACCUM_RESID
    Set   [accum_resid.f, 53]          ACCUM_RESID
    Set   [accum_resid.f, 61]          ACCUM_RESID
    Use   [accum_resid.f, 61]          ACCUM_RESID
    Use   [accum_resid.f, 62]          ACCUM_RESID
    Set   [accum_resid.f, 63]          ACCUM_RESID
    Use   [accum_resid.f, 63]          ACCUM_RESID
    Use   [accum_resid.f, 64]          ACCUM_RESID
    Set   [accum_resid.f, 72]          ACCUM_RESID
    Set   [accum_resid.f, 78]          ACCUM_RESID
    Use   [accum_resid.f, 78]          ACCUM_RESID
    Use   [accum_resid.f, 79]          ACCUM_RESID
    Set   [accum_resid.f, 80]          ACCUM_RESID
    Use   [accum_resid.f, 80]          ACCUM_RESID
    Use   [accum_resid.f, 81]          ACCUM_RESID

LOCAL_MAX_Q    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 2184]         PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2596]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2598]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2602]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2604]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2608]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2610]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2615]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2617]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2621]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2623]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2627]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2629]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2634]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2636]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2640]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2642]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2647]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2649]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2653]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2655]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2659]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2661]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2666]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2668]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2675]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2677]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2680]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2682]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2685]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2687]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2691]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2693]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2696]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2698]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2701]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2703]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2707]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2709]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2712]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2714]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2718]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2720]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2723]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2725]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2728]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2730]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2734]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2736]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2744]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2746]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2749]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2751]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2754]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2756]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2760]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2762]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2765]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2767]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2770]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2772]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2776]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2777]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2781]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2783]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2787]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2789]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2792]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2794]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2797]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2799]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2803]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2805]   PRINT_GRID_STATISTICS

Local_min    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1417]   SORT
    Set   [get_cut_cell_volume_area.f, 1423]   SORT
    Use   [get_cut_cell_volume_area.f, 1426]   SORT
    Set   [get_cut_cell_volume_area.f, 1427]   SORT

LOCAL_MIN_Q    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 2184]         PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2595]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2597]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2601]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2603]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2607]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2609]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2614]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2616]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2620]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2622]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2626]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2628]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2633]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2635]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2639]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2641]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2646]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2648]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2652]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2654]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2658]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2660]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2665]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2667]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2674]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2676]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2679]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2681]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2684]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2686]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2690]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2692]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2695]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2697]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2700]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2702]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2706]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2708]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2711]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2713]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2717]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2719]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2722]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2724]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2727]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2729]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2733]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2735]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2743]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2745]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2748]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2750]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2753]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2755]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2759]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2761]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2764]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2766]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2769]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2771]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2775]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2778]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2780]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2782]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2786]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2788]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2791]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2793]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2796]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2798]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2802]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2804]   PRINT_GRID_STATISTICS

LOCAL_REFP_S    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [get_delh.f, 624]         GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 639]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 649]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 650]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 651]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 712]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 714]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 715]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 716]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 773]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 774]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 775]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 856]            GET_DISTANCE_TO_WALL

log_master    (Global Object)  Declared as: fd_set
    Define   [socket.c, 38]            socket.c
    Asm Use   [socket.c, 112]          init_log_socket
    Use   [socket.c, 115]              init_log_socket
    Addr Use   [socket.c, 201]         check_sockets
    Use   [socket.c, 201]              check_sockets
    Use   [socket.c, 220]              check_sockets
    Use   [socket.c, 234]              check_sockets

log_maxfd    (Global Object)  Declared as: int
    Define   [socket.c, 36]            socket.c
    Set   [socket.c, 117]              init_log_socket
    Use   [socket.c, 203]              check_sockets
    Use   [socket.c, 206]              check_sockets
    Use   [socket.c, 222]              check_sockets
    Set   [socket.c, 223]              check_sockets

log_readfds    (Global Object)  Declared as: fd_set
    Define   [socket.c, 38]            socket.c
    Asm Use   [socket.c, 113]          init_log_socket
    Addr Use   [socket.c, 201]         check_sockets
    Addr Use   [socket.c, 203]         check_sockets
    Use   [socket.c, 207]              check_sockets

log_sockfd    (Global Object)  Declared as: int
    Define   [socket.c, 36]            socket.c
    Set   [socket.c, 79]               init_log_socket
    Use   [socket.c, 85]               init_log_socket
    Use   [socket.c, 91]               init_log_socket
    Use   [socket.c, 101]              init_log_socket
    Use   [socket.c, 106]              init_log_socket
    Use   [socket.c, 109]              init_log_socket
    Use   [socket.c, 115]              init_log_socket
    Use   [socket.c, 117]              init_log_socket
    Use   [socket.c, 210]              check_sockets
    Use   [socket.c, 211]              check_sockets

LOGFILE    (Local Variable)  Declared as: CHARACTER
    Define   [open_files.f, 296]       OPEN_PE_LOG
    Set   [open_files.f, 316]          OPEN_PE_LOG
    Set   [open_files.f, 321]          OPEN_PE_LOG
    Set   [open_files.f, 323]          OPEN_PE_LOG
    Set   [open_files.f, 325]          OPEN_PE_LOG
    Set   [open_files.f, 327]          OPEN_PE_LOG
    Set   [open_files.f, 329]          OPEN_PE_LOG
    Set   [open_files.f, 331]          OPEN_PE_LOG
    Use Argument   [open_files.f, 336]   OPEN_PE_LOG
    Use Argument   [open_files.f, 337]   OPEN_PE_LOG

LONGEST    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1218]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1320]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1322]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1324]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1330]   REORDER_POLYGON

lOoDT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [dif_phi_source_des.f, 56]   DIF_PHI_SOURCE_DES
    Set   [dif_phi_source_des.f, 60]   DIF_PHI_SOURCE_DES
    Use   [dif_phi_source_des.f, 66]   DIF_PHI_SOURCE_DES

LOSS    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_philoss.f, 24]       GET_PHILOSS
    Declare   [get_philoss.f, 67]      GET_PHILOSS
    Set   [get_philoss.f, 77]          GET_PHILOSS
    Set   [get_philoss.f, 98]          GET_PHILOSS
    Use   [get_philoss.f, 98]          GET_PHILOSS
    Set   [get_philoss.f, 101]         GET_PHILOSS
    Use   [get_philoss.f, 101]         GET_PHILOSS
    Set   [get_philoss.f, 107]         GET_PHILOSS
    Use   [get_philoss.f, 107]         GET_PHILOSS
    Set   [get_philoss.f, 110]         GET_PHILOSS
    Use   [get_philoss.f, 110]         GET_PHILOSS
    Set   [get_philoss.f, 116]         GET_PHILOSS
    Use   [get_philoss.f, 116]         GET_PHILOSS
    Set   [get_philoss.f, 119]         GET_PHILOSS
    Use   [get_philoss.f, 119]         GET_PHILOSS
    Set   [get_philoss.f, 125]         GET_PHILOSS
    Use   [get_philoss.f, 125]         GET_PHILOSS
    Set   [get_philoss.f, 128]         GET_PHILOSS
    Use   [get_philoss.f, 128]         GET_PHILOSS
    Set   [get_philoss.f, 135]         GET_PHILOSS
    Use   [get_philoss.f, 135]         GET_PHILOSS
    Set   [get_philoss.f, 138]         GET_PHILOSS
    Use   [get_philoss.f, 138]         GET_PHILOSS
    Set   [get_philoss.f, 144]         GET_PHILOSS
    Use   [get_philoss.f, 144]         GET_PHILOSS
    Set   [get_philoss.f, 148]         GET_PHILOSS
    Use   [get_philoss.f, 148]         GET_PHILOSS

lOWNS    (Dummy Argument)  Declared as: LOGICAL INTENT(OUT)
    Define   [mass_inflow_dem.f, 124]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 153]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 237]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 240]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 240]     SEED_NEW_PARTICLE

LP    (Local Variable)  Declared as: INTEGER
    Define   [mass_outflow_dem.f, 24]   MASS_OUTFLOW_DEM
    Set   [mass_outflow_dem.f, 50]     MASS_OUTFLOW_DEM
    Use   [mass_outflow_dem.f, 52]     MASS_OUTFLOW_DEM

LP    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 175]   PIC_MO_BC
    Set   [pic_bc_routines.f, 197]     PIC_MO_BC
    Use   [pic_bc_routines.f, 199]     PIC_MO_BC

lP    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 534]        getFracDH
    Set   [parse_rxn.f, 550]           getFracDH
    Use   [parse_rxn.f, 554]           getFracDH
    Use   [parse_rxn.f, 554]           getFracDH
    Use   [parse_rxn.f, 558]           getFracDH
    Use   [parse_rxn.f, 568]           getFracDH

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 302]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 303]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 303]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 304]   CALC_D_N_GAS_AND_SOLIDS

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 546]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 603]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 604]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 604]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 605]   CALC_D_N_SOLIDS_ONLY

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 219]     PARTIAL_ELIM_IA
    Set   [partial_elim.f, 275]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 276]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 277]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 278]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 278]        PARTIAL_ELIM_IA

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 69]      PARTIAL_ELIM_S
    Set   [partial_elim.f, 137]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 138]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 139]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 140]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 141]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 143]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 143]        PARTIAL_ELIM_S

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 364]     PARTIAL_ELIM_U
    Set   [partial_elim.f, 447]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 450]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 451]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 452]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 453]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 455]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 455]        PARTIAL_ELIM_U

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 550]     PARTIAL_ELIM_V
    Set   [partial_elim.f, 628]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 629]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 630]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 631]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 632]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 634]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 634]        PARTIAL_ELIM_V

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 729]     PARTIAL_ELIM_W
    Set   [partial_elim.f, 807]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 808]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 809]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 810]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 811]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 813]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 813]        PARTIAL_ELIM_W

lP    (Local Variable)  Declared as: INTEGER
    Define   [remove_comment.f, 65]    REMOVE_PAR_BLANKS
    Set   [remove_comment.f, 78]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 81]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 84]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 84]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 86]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 93]       REMOVE_PAR_BLANKS
    Set   [remove_comment.f, 112]      REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 114]      REMOVE_PAR_BLANKS

lp    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 814]      des_dbgpic
    Set   [cfnewvalues.f, 826]         des_dbgpic
    Use Argument   [cfnewvalues.f, 827]   des_dbgpic
    Use Argument   [cfnewvalues.f, 827]   des_dbgpic
    Use Argument   [cfnewvalues.f, 827]   des_dbgpic
    Use   [cfnewvalues.f, 828]         des_dbgpic
    Use   [cfnewvalues.f, 829]         des_dbgpic
    Use   [cfnewvalues.f, 829]         des_dbgpic
    Use   [cfnewvalues.f, 830]         des_dbgpic
    Use   [cfnewvalues.f, 831]         des_dbgpic
    Use   [cfnewvalues.f, 831]         des_dbgpic

lp    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 867]      des_dbgtecplot
    Set   [cfnewvalues.f, 884]         des_dbgtecplot
    Use Argument   [cfnewvalues.f, 885]   des_dbgtecplot
    Use   [cfnewvalues.f, 886]         des_dbgtecplot
    Use   [cfnewvalues.f, 887]         des_dbgtecplot
    Use   [cfnewvalues.f, 887]         des_dbgtecplot
    Use   [cfnewvalues.f, 888]         des_dbgtecplot
    Use   [cfnewvalues.f, 888]         des_dbgtecplot
    Use   [cfnewvalues.f, 889]         des_dbgtecplot
    Use   [cfnewvalues.f, 889]         des_dbgtecplot
    Use   [cfnewvalues.f, 889]         des_dbgtecplot

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 70]   PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 144]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 145]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 145]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 146]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 147]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 148]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 149]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 151]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 151]    PARTIAL_ELIM_GHD_U

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 269]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 343]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 344]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 344]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 345]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 346]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 347]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 348]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 350]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 350]    PARTIAL_ELIM_GHD_V

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 461]   PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 533]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 534]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 534]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 535]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 536]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 537]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 538]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 540]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 540]    PARTIAL_ELIM_GHD_W

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 305]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 306]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 306]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 307]   CALC_D_T_GAS_AND_SOLIDS

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 547]         CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 606]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 607]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 607]            CALC_D_T_SOLIDS_ONLY
    Use Argument   [calc_d_t.f, 608]   CALC_D_T_SOLIDS_ONLY

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 309]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 310]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 310]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 311]   CALC_D_E_GAS_AND_SOLIDS

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 558]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 617]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 618]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 618]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 619]   CALC_D_E_SOLIDS_ONLY

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 86]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 91]         DRAG_GS_DES1
    Use   [drag_gs_des1.f, 118]        DRAG_GS_DES1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 252]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 263]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 294]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 324]        DRAG_GS_GAS1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 62]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 84]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 102]        CALC_PG_GRAD

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields1.f, 39]   COMP_MEAN_FIELDS1
    Set   [comp_mean_fields1.f, 54]    COMP_MEAN_FIELDS1
    Use   [comp_mean_fields1.f, 71]    COMP_MEAN_FIELDS1

lpCnt    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 988]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1004]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1015]            IJK_Pg_SEARCH

lPF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 80]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 113]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 128]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 128]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 136]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 163]        DRAG_GS_DES1

lPF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_pg_grad.f, 60]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 101]        CALC_PG_GRAD
    Set   [calc_pg_grad.f, 105]        CALC_PG_GRAD
    Use   [calc_pg_grad.f, 105]        CALC_PG_GRAD
    Set   [calc_pg_grad.f, 108]        CALC_PG_GRAD
    Use   [calc_pg_grad.f, 112]        CALC_PG_GRAD

lpip_all    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 38]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 168]     MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 169]     MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 170]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 171]   MAKE_ARRAYS_DES

LPIP_DEL_COUNT_ALL    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 517]      CFNEWVALUES_MPPIC
    Set   [cfnewvalues.f, 728]         CFNEWVALUES_MPPIC
    Set   [cfnewvalues.f, 729]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 730]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 731]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 734]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 739]   CFNEWVALUES_MPPIC

LPIP_DEL_COUNT_ALL    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 229]      CFNEWVALUES_MPPIC_SNIDER
    Set   [cfnewvalues.f, 417]         CFNEWVALUES_MPPIC_SNIDER
    Set   [cfnewvalues.f, 418]         CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 419]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 420]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 423]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 428]   CFNEWVALUES_MPPIC_SNIDER

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 304]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 307]            CALC_D_N_GAS_AND_SOLIDS

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 546]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 605]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 607]            CALC_D_N_SOLIDS_ONLY

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 307]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 310]            CALC_D_T_GAS_AND_SOLIDS

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 547]         CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 608]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 610]            CALC_D_T_SOLIDS_ONLY

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 311]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 314]            CALC_D_E_GAS_AND_SOLIDS

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 558]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 619]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 622]            CALC_D_E_SOLIDS_ONLY

lPOS    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 654]        getChemEq
    Set   [parse_rxn.f, 682]           getChemEq
    Use   [parse_rxn.f, 684]           getChemEq
    Use   [parse_rxn.f, 684]           getChemEq
    Set   [parse_rxn.f, 687]           getChemEq
    Use   [parse_rxn.f, 689]           getChemEq
    Use   [parse_rxn.f, 689]           getChemEq
    Use   [parse_rxn.f, 715]           getChemEq
    Use   [parse_rxn.f, 730]           getChemEq
    Use   [parse_rxn.f, 730]           getChemEq
    Use   [parse_rxn.f, 732]           getChemEq
    Use   [parse_rxn.f, 746]           getChemEq

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [particles_in_cell.f, 306]   PIC_SEARCH
    Declare   [particles_in_cell.f, 315]   PIC_SEARCH
    Use   [particles_in_cell.f, 324]   PIC_SEARCH
    Use   [particles_in_cell.f, 324]   PIC_SEARCH

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [mass_inflow_dem.f, 123]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 149]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 200]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 201]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 202]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 210]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 211]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 212]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 220]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 221]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 222]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 231]     SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 233]   SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 234]   SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 235]   SEED_NEW_PARTICLE

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 286]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 306]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 307]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 314]     SET_NEW_PARTICLE_PROPS

lPOS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_cell_movement.f, 209]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 246]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 248]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 248]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 255]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 266]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 275]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 277]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 277]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 284]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 296]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 305]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 307]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 307]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 314]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 325]   CHECK_CELL_MOVEMENT_PIC

lproc    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 257]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 333]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 334]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 334]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 334]      WRITE_DES_TECPLOT

lPS_SIZE    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 249]           DEBUG_PS
    Declare   [set_ps.f, 278]          DEBUG_PS
    Use   [set_ps.f, 289]              DEBUG_PS
    Use   [set_ps.f, 292]              DEBUG_PS
    Use   [set_ps.f, 293]              DEBUG_PS

lPSV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 249]           DEBUG_PS
    Declare   [set_ps.f, 276]          DEBUG_PS
    Use   [set_ps.f, 288]              DEBUG_PS
    Use   [set_ps.f, 297]              DEBUG_PS
    Use   [set_ps.f, 297]              DEBUG_PS
    Use   [set_ps.f, 298]              DEBUG_PS
    Use   [set_ps.f, 298]              DEBUG_PS
    Use   [set_ps.f, 299]              DEBUG_PS
    Use   [set_ps.f, 299]              DEBUG_PS
    Use   [set_ps.f, 321]              DEBUG_PS
    Use   [set_ps.f, 321]              DEBUG_PS
    Use   [set_ps.f, 321]              DEBUG_PS
    Use   [set_ps.f, 321]              DEBUG_PS
    Use   [set_ps.f, 323]              DEBUG_PS
    Use   [set_ps.f, 323]              DEBUG_PS
    Use   [set_ps.f, 323]              DEBUG_PS
    Use   [set_ps.f, 323]              DEBUG_PS
    Use   [set_ps.f, 325]              DEBUG_PS
    Use   [set_ps.f, 325]              DEBUG_PS
    Use   [set_ps.f, 325]              DEBUG_PS
    Use   [set_ps.f, 325]              DEBUG_PS
    Use   [set_ps.f, 327]              DEBUG_PS
    Use   [set_ps.f, 330]              DEBUG_PS
    Use   [set_ps.f, 332]              DEBUG_PS
    Use   [set_ps.f, 333]              DEBUG_PS
    Use   [set_ps.f, 335]              DEBUG_PS
    Use   [set_ps.f, 336]              DEBUG_PS
    Use   [set_ps.f, 337]              DEBUG_PS
    Use   [set_ps.f, 339]              DEBUG_PS
    Use   [set_ps.f, 344]              DEBUG_PS
    Use   [set_ps.f, 353]              DEBUG_PS
    Use   [set_ps.f, 355]              DEBUG_PS
    Use   [set_ps.f, 356]              DEBUG_PS
    Use   [set_ps.f, 358]              DEBUG_PS
    Use   [set_ps.f, 359]              DEBUG_PS
    Use   [set_ps.f, 360]              DEBUG_PS
    Use   [set_ps.f, 362]              DEBUG_PS
    Use   [set_ps.f, 367]              DEBUG_PS
    Use   [set_ps.f, 379]              DEBUG_PS
    Use   [set_ps.f, 379]              DEBUG_PS
    Use   [set_ps.f, 380]              DEBUG_PS
    Use   [set_ps.f, 380]              DEBUG_PS
    Use   [set_ps.f, 381]              DEBUG_PS
    Use   [set_ps.f, 381]              DEBUG_PS

lQ    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 458]        getDH
    Set   [parse_rxn.f, 471]           getDH
    Use   [parse_rxn.f, 473]           getDH
    Use   [parse_rxn.f, 480]           getDH

lQ    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 534]        getFracDH
    Set   [parse_rxn.f, 552]           getFracDH
    Use   [parse_rxn.f, 562]           getFracDH
    Use   [parse_rxn.f, 580]           getFracDH

lRAND    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [mass_inflow_dem.f, 123]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 145]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 185]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 192]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 193]     SEED_NEW_PARTICLE

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 93]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 168]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 172]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 175]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 178]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 185]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 188]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 193]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 195]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 201]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 205]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 215]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 237]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 240]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 243]   STIFF_CHEM_RRATES

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 80]       DES_RRATES0
    Set   [des_rrates0.f, 140]         DES_RRATES0
    Use   [des_rrates0.f, 144]         DES_RRATES0
    Use   [des_rrates0.f, 146]         DES_RRATES0
    Use   [des_rrates0.f, 149]         DES_RRATES0
    Use   [des_rrates0.f, 157]         DES_RRATES0
    Use   [des_rrates0.f, 159]         DES_RRATES0
    Use   [des_rrates0.f, 164]         DES_RRATES0
    Use   [des_rrates0.f, 165]         DES_RRATES0
    Use   [des_rrates0.f, 168]         DES_RRATES0
    Set   [des_rrates0.f, 186]         DES_RRATES0
    Use   [des_rrates0.f, 190]         DES_RRATES0
    Use   [des_rrates0.f, 193]         DES_RRATES0

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rrates0.f, 129]          RRATES0
    Set   [rrates0.f, 207]             RRATES0
    Use   [rrates0.f, 211]             RRATES0
    Use   [rrates0.f, 213]             RRATES0
    Use   [rrates0.f, 216]             RRATES0
    Use   [rrates0.f, 224]             RRATES0
    Use   [rrates0.f, 227]             RRATES0
    Use   [rrates0.f, 234]             RRATES0
    Use   [rrates0.f, 236]             RRATES0
    Use   [rrates0.f, 241]             RRATES0
    Use   [rrates0.f, 245]             RRATES0
    Use   [rrates0.f, 257]             RRATES0
    Set   [rrates0.f, 298]             RRATES0
    Use   [rrates0.f, 301]             RRATES0
    Use   [rrates0.f, 304]             RRATES0

lRECOVERED    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 213]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 226]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 250]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 250]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 279]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 279]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 309]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 309]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 349]   CHECK_CELL_MOVEMENT_PIC

lRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 96]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 137]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 223]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 223]   STIFF_CHEM_RRATES
    Use Argument   [stiff_chem_rrates.f, 296]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 320]   STIFF_CHEM_RRATES

lRgc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 88]       DES_RRATES0
    Set   [des_rrates0.f, 109]         DES_RRATES0
    Set   [des_rrates0.f, 146]         DES_RRATES0
    Use   [des_rrates0.f, 146]         DES_RRATES0
    Use   [des_rrates0.f, 231]         DES_RRATES0
    Use   [des_rrates0.f, 245]         DES_RRATES0

lRgp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 87]       DES_RRATES0
    Set   [des_rrates0.f, 108]         DES_RRATES0
    Set   [des_rrates0.f, 157]         DES_RRATES0
    Use   [des_rrates0.f, 157]         DES_RRATES0
    Use   [des_rrates0.f, 231]         DES_RRATES0
    Use   [des_rrates0.f, 244]         DES_RRATES0

LRN    (Local Variable)  Declared as: INTEGER
    Define   [check_odepack_stiff_chem.f, 156]   ODEPACK_INIT
    Set   [check_odepack_stiff_chem.f, 188]   ODEPACK_INIT
    Use Argument   [check_odepack_stiff_chem.f, 190]   ODEPACK_INIT

lRPhase    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 93]       DES_RRATES0
    Set   [des_rrates0.f, 223]         DES_RRATES0
    Use   [des_rrates0.f, 223]         DES_RRATES0
    Use   [des_rrates0.f, 246]         DES_RRATES0

lRs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 106]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 138]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 224]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 224]   STIFF_CHEM_RRATES
    Use Argument   [stiff_chem_rrates.f, 301]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 343]   STIFF_CHEM_RRATES

LRS    (Local Variable)  Declared as: INTEGER
    Define   [check_odepack_stiff_chem.f, 156]   ODEPACK_INIT
    Set   [check_odepack_stiff_chem.f, 189]   ODEPACK_INIT
    Use Argument   [check_odepack_stiff_chem.f, 190]   ODEPACK_INIT

LS    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 70]     DISPLAY_FIELD_RESID
    Set   [display_resid.f, 77]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 79]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 84]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 86]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 96]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 98]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 104]       DISPLAY_FIELD_RESID
    Use   [display_resid.f, 106]       DISPLAY_FIELD_RESID

LS    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 139]    DISPLAY_GROUP_RESID
    Set   [display_resid.f, 145]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 147]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 151]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 153]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 158]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 160]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 165]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 167]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 172]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 174]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 179]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 181]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 185]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 187]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 199]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 201]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 205]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 207]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 212]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 214]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 219]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 221]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 226]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 228]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 233]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 235]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 239]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 241]       DISPLAY_GROUP_RESID

LS    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 22]   MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 41]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 42]      MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 65]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 85]      MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 87]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 93]      MASS_INFLOW_DEM
    Use Argument   [mass_inflow_dem.f, 96]   MASS_INFLOW_DEM

lS1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 982]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1001]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1001]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1017]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1021]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1062]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1065]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1065]            IJK_Pg_SEARCH

lS2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 981]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1002]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1002]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1020]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1063]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1068]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1068]            IJK_Pg_SEARCH

lsin_phi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_solids_continuum.f, 30]   CHECK_SOLIDS_CONTINUUM
    Set   [check_solids_continuum.f, 200]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 201]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 201]   CHECK_SOLIDS_CONTINUUM

lsP    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 654]        getChemEq
    Set   [parse_rxn.f, 678]           getChemEq
    Use   [parse_rxn.f, 680]           getChemEq
    Use   [parse_rxn.f, 685]           getChemEq
    Use   [parse_rxn.f, 687]           getChemEq

LSTART    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2554]   WRITE_INT_TABLE
    Declare   [set_increments.f, 2580]   WRITE_INT_TABLE
    Use   [set_increments.f, 2613]     WRITE_INT_TABLE
    Use   [set_increments.f, 2615]     WRITE_INT_TABLE
    Use   [set_increments.f, 2621]     WRITE_INT_TABLE

lSTART    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 306]   PIC_SEARCH
    Declare   [particles_in_cell.f, 321]   PIC_SEARCH
    Use   [particles_in_cell.f, 323]   PIC_SEARCH

LSTART    (Dummy Argument)  Declared as: INTEGER
    Define   [write_table.f, 23]       WRITE_TABLE
    Declare   [write_table.f, 45]      WRITE_TABLE
    Use   [write_table.f, 51]          WRITE_TABLE
    Use   [write_table.f, 91]          WRITE_TABLE
    Use   [write_table.f, 96]          WRITE_TABLE
    Use   [write_table.f, 98]          WRITE_TABLE
    Use   [write_table.f, 106]         WRITE_TABLE

LSTART    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [remove_comment.f, 13]    REMOVE_COMMENT
    Declare   [remove_comment.f, 22]   REMOVE_COMMENT
    Use   [remove_comment.f, 31]       REMOVE_COMMENT

LSTART    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 487]       PARSE_ARITH
    Set   [parse_line.f, 514]          PARSE_ARITH
    Use   [parse_line.f, 516]          PARSE_ARITH
    Use   [parse_line.f, 518]          PARSE_ARITH
    Use   [parse_line.f, 518]          PARSE_ARITH
    Use   [parse_line.f, 519]          PARSE_ARITH
    Use   [parse_line.f, 520]          PARSE_ARITH
    Use   [parse_line.f, 529]          PARSE_ARITH
    Use   [parse_line.f, 532]          PARSE_ARITH
    Use   [parse_line.f, 553]          PARSE_ARITH
    Use   [parse_line.f, 555]          PARSE_ARITH
    Use   [parse_line.f, 573]          PARSE_ARITH

LSTART    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 56]        PARSE_LINE
    Set   [parse_line.f, 70]           PARSE_LINE
    Use   [parse_line.f, 73]           PARSE_LINE
    Use   [parse_line.f, 77]           PARSE_LINE
    Use   [parse_line.f, 77]           PARSE_LINE
    Use   [parse_line.f, 78]           PARSE_LINE
    Use   [parse_line.f, 79]           PARSE_LINE
    Use   [parse_line.f, 84]           PARSE_LINE
    Use   [parse_line.f, 84]           PARSE_LINE
    Use   [parse_line.f, 102]          PARSE_LINE
    Use   [parse_line.f, 102]          PARSE_LINE
    Use   [parse_line.f, 109]          PARSE_LINE
    Use   [parse_line.f, 109]          PARSE_LINE
    Set   [parse_line.f, 132]          PARSE_LINE
    Use   [parse_line.f, 133]          PARSE_LINE

LSUB    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 496]       PARSE_ARITH
    Set   [parse_line.f, 528]          PARSE_ARITH
    Use   [parse_line.f, 531]          PARSE_ARITH
    Use   [parse_line.f, 535]          PARSE_ARITH
    Use   [parse_line.f, 538]          PARSE_ARITH
    Set   [parse_line.f, 545]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Set   [parse_line.f, 550]          PARSE_ARITH
    Use   [parse_line.f, 550]          PARSE_ARITH
    Set   [parse_line.f, 574]          PARSE_ARITH
    Use   [parse_line.f, 575]          PARSE_ARITH
    Use   [parse_line.f, 575]          PARSE_ARITH
    Use   [parse_line.f, 581]          PARSE_ARITH

lSubGridWall    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1086]         SUBGRID_DRAG_WALL
    Declare   [drag_gs.f, 1101]        SUBGRID_DRAG_WALL
    Set   [drag_gs.f, 1118]            SUBGRID_DRAG_WALL
    Set   [drag_gs.f, 1125]            SUBGRID_DRAG_WALL

lSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_axis.f, 62]        CHECK_AXIS
    Set   [check_axis.f, 166]          CHECK_AXIS
    Set   [check_axis.f, 172]          CHECK_AXIS
    Use   [check_axis.f, 172]          CHECK_AXIS
    Use   [check_axis.f, 179]          CHECK_AXIS
    Use   [check_axis.f, 181]          CHECK_AXIS

lSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_30.f, 575]    CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 600]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 601]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 601]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 603]   CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 604]   CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 605]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 609]   CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 620]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 622]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 627]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 627]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 630]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 630]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 634]   CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 635]   CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 636]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 641]   CHECK_RXN_MASS_BALANCE

lSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_30.f, 373]    REPORT_SPECIES_STATS
    Set   [check_data_30.f, 398]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 399]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 400]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 403]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 404]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 407]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 409]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 411]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 413]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 415]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 417]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 419]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 421]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 432]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 434]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 435]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 438]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 439]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 442]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 444]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 446]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 448]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 450]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 452]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 454]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 456]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 482]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 485]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 497]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 501]       REPORT_SPECIES_STATS

LT    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 82]           WRITE_VTU_FILE
    Set   [vtk_out.f, 207]             WRITE_VTU_FILE
    Set   [vtk_out.f, 210]             WRITE_VTU_FILE
    Use   [vtk_out.f, 212]             WRITE_VTU_FILE
    Set   [vtk_out.f, 225]             WRITE_VTU_FILE
    Set   [vtk_out.f, 228]             WRITE_VTU_FILE
    Use   [vtk_out.f, 230]             WRITE_VTU_FILE

lTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_u_g.f, 243]          CALC_CG_TAU_U_G
    Declare   [tau_u_g.f, 270]         CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 424]             CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 579]             CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 582]    CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 584]             CALC_CG_TAU_U_G

lTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_u_g.f, 51]           CALC_TAU_U_G
    Declare   [tau_u_g.f, 75]          CALC_TAU_U_G
    Set   [tau_u_g.f, 205]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 208]    CALC_TAU_U_G
    Set   [tau_u_g.f, 211]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 219]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 222]    CALC_TAU_U_G

lTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [tau_u_g.f, 602]          GET_FULL_TAU_U_G
    Declare   [tau_u_g.f, 628]         GET_FULL_TAU_U_G
    Use   [tau_u_g.f, 691]             GET_FULL_TAU_U_G

ltau_u_g    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_u_g.f, 113]       SOURCE_U_G
    Set   [source_u_g.f, 347]          SOURCE_U_G
    Use   [source_u_g.f, 354]          SOURCE_U_G

lTAU_U_s    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_u_s.f, 20]           CALC_TAU_U_S
    Declare   [tau_u_s.f, 46]          CALC_TAU_U_S
    Set   [tau_u_s.f, 106]             CALC_TAU_U_S
    Set   [tau_u_s.f, 108]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 124]    CALC_TAU_U_S

ltau_v_g    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_v_g.f, 114]       SOURCE_V_G
    Set   [source_v_g.f, 323]          SOURCE_V_G
    Use   [source_v_g.f, 346]          SOURCE_V_G

lTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_v_g.f, 193]          CALC_CG_TAU_V_G
    Declare   [tau_v_g.f, 224]         CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 375]             CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 532]             CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 535]    CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 537]             CALC_CG_TAU_V_G

lTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_v_g.f, 35]           CALC_TAU_V_G
    Declare   [tau_v_g.f, 59]          CALC_TAU_V_G
    Set   [tau_v_g.f, 156]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 159]    CALC_TAU_V_G
    Set   [tau_v_g.f, 162]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 170]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 173]    CALC_TAU_V_G

lTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [tau_v_g.f, 555]          GET_FULL_TAU_V_G
    Declare   [tau_v_g.f, 578]         GET_FULL_TAU_V_G
    Use   [tau_v_g.f, 624]             GET_FULL_TAU_V_G

lTAU_V_s    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_v_s.f, 19]           CALC_TAU_V_S
    Declare   [tau_v_s.f, 44]          CALC_TAU_V_S
    Set   [tau_v_s.f, 114]             CALC_TAU_V_S
    Set   [tau_v_s.f, 116]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 123]    CALC_TAU_V_S

ltau_w_g    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_w_g.f, 118]       SOURCE_W_G
    Set   [source_w_g.f, 396]          SOURCE_W_G
    Use   [source_w_g.f, 409]          SOURCE_W_G

lTAU_w_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_w_g.f, 256]          CALC_CG_TAU_w_G
    Declare   [tau_w_g.f, 284]         CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 429]             CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 581]             CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 584]    CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 587]             CALC_CG_TAU_w_G

lTAU_w_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_w_g.f, 61]           CALC_TAU_W_G
    Declare   [tau_w_g.f, 85]          CALC_TAU_W_G
    Set   [tau_w_g.f, 218]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 221]    CALC_TAU_W_G
    Set   [tau_w_g.f, 224]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 232]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 235]    CALC_TAU_W_G

lTAU_W_g    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [tau_w_g.f, 605]          GET_FULL_TAU_W_G
    Declare   [tau_w_g.f, 632]         GET_FULL_TAU_W_G
    Use   [tau_w_g.f, 731]             GET_FULL_TAU_W_G

lTAU_W_s    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [tau_w_s.f, 18]           CALC_TAU_W_S
    Declare   [tau_w_s.f, 41]          CALC_TAU_W_S
    Set   [tau_w_s.f, 93]              CALC_TAU_W_S
    Set   [tau_w_s.f, 95]              CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 103]    CALC_TAU_W_S

ltemp_array    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [write_des_data.f, 258]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 327]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 341]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 345]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 349]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 352]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 354]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 360]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 360]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 364]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 364]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 368]      WRITE_DES_TECPLOT

lTIME    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [output_manager.f, 171]   CHECK_TIME
    Declare   [output_manager.f, 173]   CHECK_TIME
    Use   [output_manager.f, 178]      CHECK_TIME

lTime    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [stiff_chem_rrates.f, 12]   STIFF_CHEM_RRATES
    Declare   [stiff_chem_rrates.f, 74]   STIFF_CHEM_RRATES

ltotvar    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 257]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 265]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 327]      WRITE_DES_TECPLOT

lTp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 81]       DES_RRATES0
    Set   [des_rrates0.f, 105]         DES_RRATES0
    Use Argument   [des_rrates0.f, 159]   DES_RRATES0
    Use Argument   [des_rrates0.f, 193]   DES_RRATES0

lU    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 207]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 210]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 213]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 219]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 219]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 224]              CALC_PS_VEL_MAG

lu1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 957]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 974]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1001]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1062]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1066]   IJK_Pg_SEARCH

lu2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 957]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 973]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1002]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1063]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1069]   IJK_Pg_SEARCH

lUg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [drag_gs_des1.f, 375]     CALC_CELL_CENTER_GAS_VEL
    Declare   [drag_gs_des1.f, 409]    CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 423]        CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 424]        CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 426]   CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 426]   CALC_CELL_CENTER_GAS_VEL

lUg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [usr_drag.f, 26]          DRAG_USR
    Declare   [usr_drag.f, 56]         DRAG_USR

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [set_ro_s.f, 136]         CHECK_SET_ROs
    Set   [set_ro_s.f, 136]            CHECK_SET_ROs
    Use IO   [set_ro_s.f, 169]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 171]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 178]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 185]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 187]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 192]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 193]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 194]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 200]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 203]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 208]         CHECK_SET_ROs

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 549]    ROgErr_LOG
    Set   [physical_prop.f, 549]       ROgErr_LOG
    Use IO   [physical_prop.f, 561]    ROgErr_LOG
    Use IO   [physical_prop.f, 564]    ROgErr_LOG
    Use IO   [physical_prop.f, 568]    ROgErr_LOG
    Use IO   [physical_prop.f, 573]    ROgErr_LOG
    Use IO   [physical_prop.f, 577]    ROgErr_LOG
    Use IO   [physical_prop.f, 578]    ROgErr_LOG
    Use IO   [physical_prop.f, 579]    ROgErr_LOG
    Use IO   [physical_prop.f, 580]    ROgErr_LOG
    Use IO   [physical_prop.f, 582]    ROgErr_LOG
    Use IO   [physical_prop.f, 583]    ROgErr_LOG
    Use IO   [physical_prop.f, 584]    ROgErr_LOG
    Use IO   [physical_prop.f, 588]    ROgErr_LOG

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 643]    ROsErr_LOG
    Set   [physical_prop.f, 643]       ROsErr_LOG
    Use IO   [physical_prop.f, 655]    ROsErr_LOG
    Use IO   [physical_prop.f, 658]    ROsErr_LOG
    Use IO   [physical_prop.f, 662]    ROsErr_LOG
    Use IO   [physical_prop.f, 667]    ROsErr_LOG
    Use IO   [physical_prop.f, 673]    ROsErr_LOG
    Use IO   [physical_prop.f, 674]    ROsErr_LOG
    Use IO   [physical_prop.f, 675]    ROsErr_LOG
    Use IO   [physical_prop.f, 676]    ROsErr_LOG
    Use IO   [physical_prop.f, 677]    ROsErr_LOG
    Use IO   [physical_prop.f, 680]    ROsErr_LOG
    Use IO   [physical_prop.f, 681]    ROsErr_LOG
    Use IO   [physical_prop.f, 682]    ROsErr_LOG
    Use IO   [physical_prop.f, 686]    ROsErr_LOG

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [calc_vol_fr.f, 320]      EPgErr_LOG
    Set   [calc_vol_fr.f, 320]         EPgErr_LOG
    Use IO   [calc_vol_fr.f, 333]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 336]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 340]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 345]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 349]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 350]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 352]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 355]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 357]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 359]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 362]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 364]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 366]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 369]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 372]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 374]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 377]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 379]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 381]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 384]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 386]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 388]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 391]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 393]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 395]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 398]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 400]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 402]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 405]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 407]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 409]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 412]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 416]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 417]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 418]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 422]      EPgErr_LOG

lunit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [read_particle_input.f, 32]   READ_PAR_INPUT
    Set   [read_particle_input.f, 32]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 66]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 81]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 84]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 103]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 142]   READ_PAR_INPUT

LV    (Local Variable)  Declared as: INTEGER
    Define   [check_output_control.f, 48]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 161]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 163]   CHECK_OUTPUT_CONTROL

lV    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 207]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 210]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 213]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 220]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 220]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 225]              CALC_PS_VEL_MAG

lvel_s    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_bc1.f, 263]          SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 415]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 423]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 423]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 426]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 426]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 429]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 429]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 435]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 435]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 437]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 443]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 445]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 448]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 450]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 453]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 455]             SET_BC1_ADJUST_OUTFLOW

lvel_s    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_bc0.f, 401]          SET_BC0_INFLOW
    Set   [set_bc0.f, 470]             SET_BC0_INFLOW
    Set   [set_bc0.f, 488]             SET_BC0_INFLOW
    Use   [set_bc0.f, 488]             SET_BC0_INFLOW
    Set   [set_bc0.f, 490]             SET_BC0_INFLOW
    Use   [set_bc0.f, 490]             SET_BC0_INFLOW
    Set   [set_bc0.f, 492]             SET_BC0_INFLOW
    Use   [set_bc0.f, 492]             SET_BC0_INFLOW
    Set   [set_bc0.f, 500]             SET_BC0_INFLOW
    Use   [set_bc0.f, 500]             SET_BC0_INFLOW
    Use   [set_bc0.f, 505]             SET_BC0_INFLOW
    Use   [set_bc0.f, 508]             SET_BC0_INFLOW
    Use   [set_bc0.f, 511]             SET_BC0_INFLOW

lVELFP    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_ss_dem_noninterp.f, 313]   CALC_NONINTERP_VELFP_SOLIDS
    Declare   [drag_ss_dem_noninterp.f, 347]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 361]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 364]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 369]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 372]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 378]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 381]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 384]   CALC_NONINTERP_VELFP_SOLIDS

lVg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [drag_gs_des1.f, 375]     CALC_CELL_CENTER_GAS_VEL
    Declare   [drag_gs_des1.f, 410]    CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 431]        CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 432]        CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 434]   CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 434]   CALC_CELL_CENTER_GAS_VEL

lVg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [usr_drag.f, 26]          DRAG_USR
    Declare   [usr_drag.f, 56]         DRAG_USR

lW    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 207]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 210]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 214]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 221]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 221]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 226]              CALC_PS_VEL_MAG

lWg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [drag_gs_des1.f, 375]     CALC_CELL_CENTER_GAS_VEL
    Declare   [drag_gs_des1.f, 411]    CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 440]        CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 441]        CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 443]   CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 443]   CALC_CELL_CENTER_GAS_VEL

lWg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [usr_drag.f, 26]          DRAG_USR
    Declare   [usr_drag.f, 56]         DRAG_USR

lWRITE_DT    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [output_manager.f, 188]   NEXT_TIME
    Declare   [output_manager.f, 190]   NEXT_TIME
    Use   [output_manager.f, 193]      NEXT_TIME
    Use   [output_manager.f, 193]      NEXT_TIME
    Use   [output_manager.f, 195]      NEXT_TIME

LXE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 45]        CFWALLCONTACT
    Use   [cfwallcontact.f, 85]        CFWALLCONTACT

LXW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 46]        CFWALLCONTACT
    Use   [cfwallcontact.f, 78]        CFWALLCONTACT

LYN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 47]        CFWALLCONTACT
    Use   [cfwallcontact.f, 95]        CFWALLCONTACT

LYS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 48]        CFWALLCONTACT
    Use   [cfwallcontact.f, 90]        CFWALLCONTACT

LZB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 50]        CFWALLCONTACT
    Use   [cfwallcontact.f, 100]       CFWALLCONTACT

LZT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 49]        CFWALLCONTACT
    Use   [cfwallcontact.f, 105]       CFWALLCONTACT

Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ