Object Cross Reference


Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ

J    (Local Variable)  Declared as: INTEGER
    Define   [gas_drag.f, 71]          GAS_DRAG_U
    Set   [gas_drag.f, 98]             GAS_DRAG_U
    Use   [gas_drag.f, 102]            GAS_DRAG_U
    Use   [gas_drag.f, 102]            GAS_DRAG_U
    Use   [gas_drag.f, 105]            GAS_DRAG_U
    Use   [gas_drag.f, 111]            GAS_DRAG_U
    Use   [gas_drag.f, 112]            GAS_DRAG_U

J    (Local Variable)  Declared as: INTEGER
    Define   [gas_drag.f, 220]         GAS_DRAG_V
    Set   [gas_drag.f, 245]            GAS_DRAG_V
    Use   [gas_drag.f, 249]            GAS_DRAG_V
    Use   [gas_drag.f, 249]            GAS_DRAG_V
    Use   [gas_drag.f, 252]            GAS_DRAG_V
    Use   [gas_drag.f, 259]            GAS_DRAG_V
    Use   [gas_drag.f, 260]            GAS_DRAG_V
    Set   [gas_drag.f, 281]            GAS_DRAG_V
    Use Argument   [gas_drag.f, 284]   GAS_DRAG_V
    Use Argument   [gas_drag.f, 285]   GAS_DRAG_V

J    (Local Variable)  Declared as: INTEGER
    Define   [gas_drag.f, 367]         GAS_DRAG_W
    Set   [gas_drag.f, 393]            GAS_DRAG_W
    Use   [gas_drag.f, 397]            GAS_DRAG_W
    Use   [gas_drag.f, 397]            GAS_DRAG_W
    Use   [gas_drag.f, 400]            GAS_DRAG_W
    Use   [gas_drag.f, 401]            GAS_DRAG_W
    Use   [gas_drag.f, 402]            GAS_DRAG_W

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3364]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3467]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3468]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3468]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3468]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3468]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3521]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3527]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3607]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3609]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3617]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3631]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3631]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3684]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3689]   ADJUST_IJK_SIZE

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 45]   CHECK_DATA_CARTESIAN
    Set   [check_data_cartesian.f, 702]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 703]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 703]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 705]   CHECK_DATA_CARTESIAN
    Use   [check_data_cartesian.f, 705]   CHECK_DATA_CARTESIAN

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 2536]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2871]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2872]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2872]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2902]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2903]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2903]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2908]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2909]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2909]   GET_DXYZ_FROM_CONTROL_POINTS

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4066]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4130]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4132]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4180]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4181]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4184]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4185]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4185]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4215]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4215]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4221]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4222]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4222]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4222]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4235]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4236]   REPORT_BEST_IJK_SIZE

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4910]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 4978]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 4981]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5030]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5032]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5037]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5038]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5038]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5050]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5051]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5051]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5107]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5109]   REPORT_BEST_IJK_SIZE0

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

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1918]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1948]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1952]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1952]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1990]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1995]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1996]   GET_POTENTIAL_CUT_CELLS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 45]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 102]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 103]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 103]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 103]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 142]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 149]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 149]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 154]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 154]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 527]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 529]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 533]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 534]   SET_3D_CUT_CELL_FLAGS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1404]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Set   [get_cut_cell_flags.f, 1433]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1437]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1441]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1444]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1446]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1448]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1450]   SET_3D_CUT_CELL_TREATMENT_FLAGS

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1552]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1562]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1564]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1565]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1612]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1614]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1615]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1656]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1658]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1664]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1705]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1707]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1713]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1762]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1765]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1766]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1812]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1815]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1816]   SET_GHOST_CELL_FLAGS

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

J    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 172]     FUNC_JACOBI_EVAL
    Set   [cooling_rate.f, 180]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 181]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 181]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 182]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 182]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 182]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 182]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 182]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 183]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 183]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 185]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 185]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 185]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 185]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 187]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 187]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 187]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 188]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 188]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 188]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 188]        FUNC_JACOBI_EVAL
    Set   [cooling_rate.f, 217]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 219]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 219]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 219]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 221]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 222]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 222]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 226]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 226]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 230]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 232]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 233]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 236]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 236]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 238]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 238]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 241]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 241]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 245]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 247]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 253]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 253]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 261]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 262]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 263]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 263]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 265]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 265]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 266]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 266]        FUNC_JACOBI_EVAL

j    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 397]     lubksb
    Set   [cooling_rate.f, 407]        lubksb
    Use   [cooling_rate.f, 408]        lubksb
    Use   [cooling_rate.f, 408]        lubksb
    Set   [cooling_rate.f, 418]        lubksb
    Use   [cooling_rate.f, 419]        lubksb
    Use   [cooling_rate.f, 419]        lubksb

j    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 310]     ludcmp
    Set   [cooling_rate.f, 318]        ludcmp
    Use   [cooling_rate.f, 319]        ludcmp
    Use   [cooling_rate.f, 319]        ludcmp
    Set   [cooling_rate.f, 328]        ludcmp
    Use   [cooling_rate.f, 329]        ludcmp
    Use   [cooling_rate.f, 330]        ludcmp
    Use   [cooling_rate.f, 332]        ludcmp
    Use   [cooling_rate.f, 334]        ludcmp
    Use   [cooling_rate.f, 337]        ludcmp
    Use   [cooling_rate.f, 338]        ludcmp
    Use   [cooling_rate.f, 339]        ludcmp
    Use   [cooling_rate.f, 340]        ludcmp
    Use   [cooling_rate.f, 342]        ludcmp
    Use   [cooling_rate.f, 349]        ludcmp
    Use   [cooling_rate.f, 352]        ludcmp
    Use   [cooling_rate.f, 353]        ludcmp
    Use   [cooling_rate.f, 356]        ludcmp
    Use   [cooling_rate.f, 358]        ludcmp
    Use   [cooling_rate.f, 359]        ludcmp
    Use   [cooling_rate.f, 359]        ludcmp
    Use   [cooling_rate.f, 359]        ludcmp
    Use   [cooling_rate.f, 359]        ludcmp
    Use   [cooling_rate.f, 360]        ludcmp
    Use   [cooling_rate.f, 361]        ludcmp
    Use   [cooling_rate.f, 361]        ludcmp
    Use   [cooling_rate.f, 362]        ludcmp
    Use   [cooling_rate.f, 363]        ludcmp
    Use   [cooling_rate.f, 363]        ludcmp

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 135]   CHECK_ICBC_FLAG
    Set   [set_icbc_flags.f, 145]      CHECK_ICBC_FLAG
    Use   [set_icbc_flags.f, 147]      CHECK_ICBC_FLAG
    Set   [set_icbc_flags.f, 166]      CHECK_ICBC_FLAG
    Use   [set_icbc_flags.f, 168]      CHECK_ICBC_FLAG
    Use   [set_icbc_flags.f, 169]      CHECK_ICBC_FLAG

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 43]    INIT_ICBC_FLAG
    Set   [set_icbc_flags.f, 47]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 50]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 70]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 70]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 70]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 70]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 96]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 96]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 96]       INIT_ICBC_FLAG
    Use   [set_icbc_flags.f, 96]       INIT_ICBC_FLAG

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 388]   SET_BC_FLAGS_FLOW
    Set   [set_icbc_flags.f, 448]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 451]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 452]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 454]      SET_BC_FLAGS_FLOW
    Set   [set_icbc_flags.f, 492]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 495]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 496]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 498]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 502]      SET_BC_FLAGS_FLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 307]   SET_BC_FLAGS_WALL
    Set   [set_icbc_flags.f, 327]      SET_BC_FLAGS_WALL
    Use   [set_icbc_flags.f, 330]      SET_BC_FLAGS_WALL
    Use   [set_icbc_flags.f, 331]      SET_BC_FLAGS_WALL
    Use   [set_icbc_flags.f, 333]      SET_BC_FLAGS_WALL

J    (Local Variable)  Declared as: INTEGER
    Define   [set_icbc_flags.f, 230]   SET_IC_FLAGS
    Set   [set_icbc_flags.f, 244]      SET_IC_FLAGS
    Use   [set_icbc_flags.f, 246]      SET_IC_FLAGS
    Use   [set_icbc_flags.f, 247]      SET_IC_FLAGS
    Use   [set_icbc_flags.f, 248]      SET_IC_FLAGS

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

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 997]          IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1037]   IJK_Pg_SEARCH
    Use   [set_bc0.f, 1040]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1042]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1105]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1119]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1131]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1132]            IJK_Pg_SEARCH

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 396]          SET_BC0_INFLOW
    Set   [set_bc0.f, 406]             SET_BC0_INFLOW
    Use   [set_bc0.f, 408]             SET_BC0_INFLOW
    Use   [set_bc0.f, 409]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 410]    SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 450]    SET_BC0_INFLOW
    Use   [set_bc0.f, 454]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 458]    SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 505]    SET_BC0_INFLOW
    Use   [set_bc0.f, 508]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 511]    SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 541]    SET_BC0_INFLOW
    Use   [set_bc0.f, 545]             SET_BC0_INFLOW
    Use Argument   [set_bc0.f, 549]    SET_BC0_INFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 704]          set_bc0_init_bcscalars
    Set   [set_bc0.f, 712]             set_bc0_init_bcscalars
    Use   [set_bc0.f, 714]             set_bc0_init_bcscalars
    Use   [set_bc0.f, 715]             set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 716]    set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 720]    set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 722]    set_bc0_init_bcscalars
    Use   [set_bc0.f, 724]             set_bc0_init_bcscalars
    Use   [set_bc0.f, 726]             set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 728]    set_bc0_init_bcscalars
    Use Argument   [set_bc0.f, 730]    set_bc0_init_bcscalars

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1004]      JJ_BC_V_S
    Set   [source_v_s.f, 1010]         JJ_BC_V_S
    Use   [source_v_s.f, 1012]         JJ_BC_V_S
    Use   [source_v_s.f, 1013]         JJ_BC_V_S
    Use   [source_v_s.f, 1015]         JJ_BC_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1171]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1193]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1196]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1197]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1199]         POINT_SOURCE_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 81]        SOURCE_V_S
    Set   [source_v_s.f, 137]          SOURCE_V_S
    Use Argument   [source_v_s.f, 154]   SOURCE_V_S
    Use Argument   [source_v_s.f, 166]   SOURCE_V_S
    Use Argument   [source_v_s.f, 284]   SOURCE_V_S
    Use Argument   [source_v_s.f, 308]   SOURCE_V_S
    Use Argument   [source_v_s.f, 310]   SOURCE_V_S
    Use Argument   [source_v_s.f, 313]   SOURCE_V_S
    Use Argument   [source_v_s.f, 343]   SOURCE_V_S
    Use Argument   [source_v_s.f, 344]   SOURCE_V_S
    Use Argument   [source_v_s.f, 348]   SOURCE_V_S
    Use Argument   [source_v_s.f, 349]   SOURCE_V_S
    Use Argument   [source_v_s.f, 365]   SOURCE_V_S
    Use Argument   [source_v_s.f, 370]   SOURCE_V_S
    Use Argument   [source_v_s.f, 382]   SOURCE_V_S
    Use Argument   [source_v_s.f, 387]   SOURCE_V_S
    Use Argument   [source_v_s.f, 398]   SOURCE_V_S
    Use Argument   [source_v_s.f, 400]   SOURCE_V_S
    Use Argument   [source_v_s.f, 411]   SOURCE_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 531]       SOURCE_V_S_BC
    Set   [source_v_s.f, 667]          SOURCE_V_S_BC
    Use   [source_v_s.f, 669]          SOURCE_V_S_BC
    Use   [source_v_s.f, 670]          SOURCE_V_S_BC
    Use   [source_v_s.f, 671]          SOURCE_V_S_BC
    Use   [source_v_s.f, 673]          SOURCE_V_S_BC
    Set   [source_v_s.f, 707]          SOURCE_V_S_BC
    Use   [source_v_s.f, 709]          SOURCE_V_S_BC
    Use   [source_v_s.f, 710]          SOURCE_V_S_BC
    Use   [source_v_s.f, 711]          SOURCE_V_S_BC
    Set   [source_v_s.f, 746]          SOURCE_V_S_BC
    Use   [source_v_s.f, 748]          SOURCE_V_S_BC
    Use   [source_v_s.f, 749]          SOURCE_V_S_BC
    Use   [source_v_s.f, 750]          SOURCE_V_S_BC
    Set   [source_v_s.f, 824]          SOURCE_V_S_BC
    Use   [source_v_s.f, 826]          SOURCE_V_S_BC
    Use   [source_v_s.f, 827]          SOURCE_V_S_BC
    Use   [source_v_s.f, 828]          SOURCE_V_S_BC
    Set   [source_v_s.f, 851]          SOURCE_V_S_BC
    Use   [source_v_s.f, 853]          SOURCE_V_S_BC
    Use   [source_v_s.f, 854]          SOURCE_V_S_BC
    Use   [source_v_s.f, 855]          SOURCE_V_S_BC
    Set   [source_v_s.f, 884]          SOURCE_V_S_BC
    Use   [source_v_s.f, 886]          SOURCE_V_S_BC
    Use   [source_v_s.f, 887]          SOURCE_V_S_BC
    Use   [source_v_s.f, 888]          SOURCE_V_S_BC
    Set   [source_v_s.f, 912]          SOURCE_V_S_BC
    Use   [source_v_s.f, 914]          SOURCE_V_S_BC
    Use   [source_v_s.f, 915]          SOURCE_V_S_BC
    Use   [source_v_s.f, 916]          SOURCE_V_S_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_g.f, 75]     CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 123]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 218]       CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 240]   CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 241]   CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 269]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 273]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 277]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 280]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 282]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 284]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 285]       CG_SOURCE_W_G

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ps.f, 279]           DEBUG_PS
    Set   [set_ps.f, 297]              DEBUG_PS
    Use   [set_ps.f, 301]              DEBUG_PS
    Use   [set_ps.f, 302]              DEBUG_PS
    Use   [set_ps.f, 303]              DEBUG_PS
    Set   [set_ps.f, 379]              DEBUG_PS
    Use   [set_ps.f, 381]              DEBUG_PS
    Use   [set_ps.f, 383]              DEBUG_PS

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ps.f, 24]            SET_PS
    Set   [set_ps.f, 85]               SET_PS
    Use   [set_ps.f, 88]               SET_PS
    Use   [set_ps.f, 89]               SET_PS
    Use   [set_ps.f, 90]               SET_PS

j    (Local Variable)  Declared as: INTEGER
    Define   [read_particle_input.f, 29]   READ_PAR_INPUT

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

J    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 631]   SOURCE_GRANULAR_ENERGY_GD
    Set   [source_granular_energy.f, 660]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 663]   SOURCE_GRANULAR_ENERGY_GD
    Use Argument   [source_granular_energy.f, 753]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 764]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 765]   SOURCE_GRANULAR_ENERGY_GD

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 34]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 56]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 58]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 59]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 62]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 63]      MAKE_ARRAYS_DES

J    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 49]           VF_GS_Y
    Set   [vf_gs_y.f, 60]              VF_GS_Y
    Use Argument   [vf_gs_y.f, 63]     VF_GS_Y
    Set   [vf_gs_y.f, 74]              VF_GS_Y
    Use Argument   [vf_gs_y.f, 77]     VF_GS_Y

J    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 129]          VF_SS_Y
    Set   [vf_gs_y.f, 143]             VF_SS_Y
    Use Argument   [vf_gs_y.f, 145]    VF_SS_Y
    Set   [vf_gs_y.f, 161]             VF_SS_Y
    Use Argument   [vf_gs_y.f, 163]    VF_SS_Y

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [k_epsilon_prop.f, 77]    K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 189]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 192]      K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 213]   K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 229]   K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 261]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 264]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 267]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 274]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 278]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 279]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 342]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 349]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 421]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 427]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 433]      K_Epsilon_PROP

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1025]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1050]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1053]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1054]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1056]         POINT_SOURCE_U_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 71]        SOURCE_U_G
    Set   [source_u_g.f, 119]          SOURCE_U_G
    Use   [source_u_g.f, 242]          SOURCE_U_G
    Use Argument   [source_u_g.f, 243]   SOURCE_U_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 413]       SOURCE_U_G_BC
    Set   [source_u_g.f, 573]          SOURCE_U_G_BC
    Use   [source_u_g.f, 575]          SOURCE_U_G_BC
    Use   [source_u_g.f, 576]          SOURCE_U_G_BC
    Use   [source_u_g.f, 577]          SOURCE_U_G_BC
    Set   [source_u_g.f, 608]          SOURCE_U_G_BC
    Use   [source_u_g.f, 610]          SOURCE_U_G_BC
    Use   [source_u_g.f, 611]          SOURCE_U_G_BC
    Use   [source_u_g.f, 612]          SOURCE_U_G_BC
    Set   [source_u_g.f, 643]          SOURCE_U_G_BC
    Use   [source_u_g.f, 645]          SOURCE_U_G_BC
    Use   [source_u_g.f, 646]          SOURCE_U_G_BC
    Use   [source_u_g.f, 647]          SOURCE_U_G_BC
    Use   [source_u_g.f, 649]          SOURCE_U_G_BC
    Use   [source_u_g.f, 665]          SOURCE_U_G_BC
    Use   [source_u_g.f, 666]          SOURCE_U_G_BC
    Set   [source_u_g.f, 718]          SOURCE_U_G_BC
    Use   [source_u_g.f, 720]          SOURCE_U_G_BC
    Use   [source_u_g.f, 721]          SOURCE_U_G_BC
    Use   [source_u_g.f, 722]          SOURCE_U_G_BC
    Use   [source_u_g.f, 724]          SOURCE_U_G_BC
    Use   [source_u_g.f, 735]          SOURCE_U_G_BC
    Set   [source_u_g.f, 775]          SOURCE_U_G_BC
    Use   [source_u_g.f, 777]          SOURCE_U_G_BC
    Use   [source_u_g.f, 778]          SOURCE_U_G_BC
    Use   [source_u_g.f, 779]          SOURCE_U_G_BC
    Set   [source_u_g.f, 806]          SOURCE_U_G_BC
    Use   [source_u_g.f, 808]          SOURCE_U_G_BC
    Use   [source_u_g.f, 809]          SOURCE_U_G_BC
    Use   [source_u_g.f, 810]          SOURCE_U_G_BC
    Set   [source_u_g.f, 840]          SOURCE_U_G_BC
    Use   [source_u_g.f, 842]          SOURCE_U_G_BC
    Use   [source_u_g.f, 843]          SOURCE_U_G_BC
    Use   [source_u_g.f, 844]          SOURCE_U_G_BC
    Set   [source_u_g.f, 874]          SOURCE_U_G_BC
    Use   [source_u_g.f, 876]          SOURCE_U_G_BC
    Use   [source_u_g.f, 877]          SOURCE_U_G_BC
    Use   [source_u_g.f, 878]          SOURCE_U_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 547]   Calc_mass_flux_sp
    Set   [check_mass_balance.f, 555]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 557]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 558]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 562]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 570]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 578]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 586]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 594]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 602]   Calc_mass_flux_sp

J    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 730]   Calc_mass_flux_spHR
    Set   [check_mass_balance.f, 744]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 746]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 747]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 751]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 756]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 761]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 766]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 771]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 776]   Calc_mass_flux_spHR

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 193]     CONV_DIF_PHI0
    Set   [conv_dif_phi.f, 220]        CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 239]        CONV_DIF_PHI0
    Use Argument   [conv_dif_phi.f, 257]   CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 257]        CONV_DIF_PHI0
    Use Argument   [conv_dif_phi.f, 263]   CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 263]        CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 288]        CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 316]        CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 332]        CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 368]        CONV_DIF_PHI0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 813]     CONV_DIF_PHI1
    Set   [conv_dif_phi.f, 871]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 889]        CONV_DIF_PHI1
    Use Argument   [conv_dif_phi.f, 902]   CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 902]        CONV_DIF_PHI1
    Use Argument   [conv_dif_phi.f, 908]   CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 908]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 931]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 955]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 969]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 1003]       CONV_DIF_PHI1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 475]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 517]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 519]        CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 547]        CONV_DIF_PHI_DC

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 1093]    DIF_PHI_IS
    Set   [conv_dif_phi.f, 1139]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1141]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1142]       DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 1158]   DIF_PHI_IS
    Use   [conv_dif_phi.f, 1158]       DIF_PHI_IS

J    (Local Variable)  Declared as: INTEGER
    Define   [generate_particle_config.f, 499]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 650]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 654]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 752]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 759]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 761]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 763]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 775]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 777]   GENERATE_PARTICLE_CONFIG_DEM

J    (Local Variable)  Declared as: INTEGER
    Define   [generate_particle_config.f, 898]   GENERATE_PARTICLE_CONFIG_MPPIC
    Set   [generate_particle_config.f, 1007]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1010]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1011]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1012]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1017]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1020]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1027]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1028]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1074]   GENERATE_PARTICLE_CONFIG_MPPIC
    Set   [generate_particle_config.f, 1147]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1154]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1156]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1158]   GENERATE_PARTICLE_CONFIG_MPPIC
    Use   [generate_particle_config.f, 1176]   GENERATE_PARTICLE_CONFIG_MPPIC

J    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 42]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 138]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 142]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 146]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 147]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 148]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 178]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 182]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 187]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 228]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 232]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 233]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 326]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 328]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 329]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 339]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 339]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 427]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 431]   COMP_MEAN_FIELDS0

J    (Local Variable)  Declared as: INTEGER
    Define   [get_stats.f, 56]         GET_STATS
    Set   [get_stats.f, 86]            GET_STATS
    Use   [get_stats.f, 106]           GET_STATS
    Use   [get_stats.f, 108]           GET_STATS
    Set   [get_stats.f, 149]           GET_STATS
    Use   [get_stats.f, 168]           GET_STATS
    Use   [get_stats.f, 170]           GET_STATS

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

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 142]     STORE_A_U_S0
    Set   [conv_dif_u_s.f, 167]        STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 208]   STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 209]   STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 213]   STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 214]   STORE_A_U_S0
    Use   [conv_dif_u_s.f, 215]        STORE_A_U_S0
    Use   [conv_dif_u_s.f, 282]        STORE_A_U_S0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 809]     STORE_A_U_S1
    Set   [conv_dif_u_s.f, 914]        STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 952]   STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 953]   STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 957]   STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 958]   STORE_A_U_S1
    Use   [conv_dif_u_s.f, 959]        STORE_A_U_S1
    Use   [conv_dif_u_s.f, 1013]       STORE_A_U_S1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 408]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 457]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 459]        STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 530]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 676]        STORE_A_U_SDC

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 351]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 430]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 433]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 434]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 436]       SET_DEM_BCMI_IJK

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 166]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 214]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 216]   CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 220]   CALC_D_N_GAS_AND_SOLIDS

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 420]         CALC_D_N_GAS_ONLY
    Set   [calc_d_n.f, 444]            CALC_D_N_GAS_ONLY
    Use Argument   [calc_d_n.f, 446]   CALC_D_N_GAS_ONLY
    Use Argument   [calc_d_n.f, 458]   CALC_D_N_GAS_ONLY

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 548]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 581]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 585]   CALC_D_N_SOLIDS_ONLY

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_v_s.f, 113]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 146]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 148]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 151]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 188]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 190]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 197]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 200]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 202]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 214]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 215]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 217]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 218]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 230]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 234]   CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 236]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 237]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 238]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 246]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 247]       CALC_IA_MOMSOURCE_V_S
    Use Argument   [kintheory_v_s.f, 254]   CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 255]       CALC_IA_MOMSOURCE_V_S

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ic_dem.f, 46]        SET_IC_DEM
    Set   [set_ic_dem.f, 59]           SET_IC_DEM
    Use   [set_ic_dem.f, 64]           SET_IC_DEM
    Use   [set_ic_dem.f, 65]           SET_IC_DEM
    Use   [set_ic_dem.f, 67]           SET_IC_DEM

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

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

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

j    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 678]       copy_d_to_r
    Set   [write_spx1.f, 684]          copy_d_to_r
    Use   [write_spx1.f, 687]          copy_d_to_r

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 44]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 188]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 191]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 192]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 194]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 213]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 214]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 217]      DIF_PHI_BC_DES

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 290]   DIF_PHI_BC_DES_CG
    Set   [dif_phi_bc_des.f, 299]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 303]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 303]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 335]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 336]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 342]      DIF_PHI_BC_DES_CG

j    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m.f, 72]        WRITE_AB_M
    Set   [write_ab_m.f, 107]          WRITE_AB_M
    Use   [write_ab_m.f, 109]          WRITE_AB_M
    Use   [write_ab_m.f, 112]          WRITE_AB_M
    Set   [write_ab_m.f, 125]          WRITE_AB_M
    Use   [write_ab_m.f, 127]          WRITE_AB_M
    Use   [write_ab_m.f, 129]          WRITE_AB_M
    Use   [write_ab_m.f, 131]          WRITE_AB_M
    Use   [write_ab_m.f, 131]          WRITE_AB_M

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

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 59]          DIF_U_IS
    Set   [dif_u_is.f, 99]             DIF_U_IS
    Use   [dif_u_is.f, 101]            DIF_U_IS
    Use   [dif_u_is.f, 102]            DIF_U_IS
    Use   [dif_u_is.f, 103]            DIF_U_IS
    Use Argument   [dif_u_is.f, 109]   DIF_U_IS
    Use Argument   [dif_u_is.f, 110]   DIF_U_IS
    Use   [dif_u_is.f, 110]            DIF_U_IS
    Set   [dif_u_is.f, 120]            DIF_U_IS
    Use   [dif_u_is.f, 122]            DIF_U_IS
    Use   [dif_u_is.f, 123]            DIF_U_IS
    Use   [dif_u_is.f, 124]            DIF_U_IS

J    (Local Variable)  Declared as: INTEGER
    Define   [source_phi.f, 196]       POINT_SOURCE_PHI
    Set   [source_phi.f, 214]          POINT_SOURCE_PHI
    Use   [source_phi.f, 217]          POINT_SOURCE_PHI
    Use   [source_phi.f, 218]          POINT_SOURCE_PHI
    Use   [source_phi.f, 220]          POINT_SOURCE_PHI

J    (Local Variable)  Declared as: INTEGER
    Define   [set_outflow.f, 68]       SET_OUTFLOW
    Set   [set_outflow.f, 80]          SET_OUTFLOW
    Use   [set_outflow.f, 83]          SET_OUTFLOW
    Use   [set_outflow.f, 84]          SET_OUTFLOW
    Use   [set_outflow.f, 85]          SET_OUTFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_g.f, 77]           CALC_TAU_W_G
    Set   [tau_w_g.f, 123]             CALC_TAU_W_G
    Use   [tau_w_g.f, 126]             CALC_TAU_W_G
    Use   [tau_w_g.f, 159]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 162]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 163]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 188]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 189]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 362]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 363]    CALC_TAU_W_G

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

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1012]      JJ_BC_U_S
    Set   [source_u_s.f, 1018]         JJ_BC_U_S
    Use   [source_u_s.f, 1020]         JJ_BC_U_S
    Use   [source_u_s.f, 1021]         JJ_BC_U_S
    Use   [source_u_s.f, 1023]         JJ_BC_U_S
    Use   [source_u_s.f, 1025]         JJ_BC_U_S
    Use   [source_u_s.f, 1060]         JJ_BC_U_S
    Use   [source_u_s.f, 1061]         JJ_BC_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1179]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1204]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1207]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1208]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1210]         POINT_SOURCE_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 78]        SOURCE_U_S
    Set   [source_u_s.f, 131]          SOURCE_U_S
    Use   [source_u_s.f, 342]          SOURCE_U_S
    Use Argument   [source_u_s.f, 343]   SOURCE_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 536]       SOURCE_U_S_BC
    Set   [source_u_s.f, 673]          SOURCE_U_S_BC
    Use   [source_u_s.f, 675]          SOURCE_U_S_BC
    Use   [source_u_s.f, 676]          SOURCE_U_S_BC
    Use   [source_u_s.f, 677]          SOURCE_U_S_BC
    Set   [source_u_s.f, 712]          SOURCE_U_S_BC
    Use   [source_u_s.f, 714]          SOURCE_U_S_BC
    Use   [source_u_s.f, 715]          SOURCE_U_S_BC
    Use   [source_u_s.f, 716]          SOURCE_U_S_BC
    Set   [source_u_s.f, 751]          SOURCE_U_S_BC
    Use   [source_u_s.f, 753]          SOURCE_U_S_BC
    Use   [source_u_s.f, 754]          SOURCE_U_S_BC
    Use   [source_u_s.f, 755]          SOURCE_U_S_BC
    Use   [source_u_s.f, 757]          SOURCE_U_S_BC
    Use   [source_u_s.f, 773]          SOURCE_U_S_BC
    Use   [source_u_s.f, 774]          SOURCE_U_S_BC
    Set   [source_u_s.f, 829]          SOURCE_U_S_BC
    Use   [source_u_s.f, 831]          SOURCE_U_S_BC
    Use   [source_u_s.f, 832]          SOURCE_U_S_BC
    Use   [source_u_s.f, 833]          SOURCE_U_S_BC
    Set   [source_u_s.f, 856]          SOURCE_U_S_BC
    Use   [source_u_s.f, 858]          SOURCE_U_S_BC
    Use   [source_u_s.f, 859]          SOURCE_U_S_BC
    Use   [source_u_s.f, 860]          SOURCE_U_S_BC
    Set   [source_u_s.f, 890]          SOURCE_U_S_BC
    Use   [source_u_s.f, 892]          SOURCE_U_S_BC
    Use   [source_u_s.f, 893]          SOURCE_U_S_BC
    Use   [source_u_s.f, 894]          SOURCE_U_S_BC
    Set   [source_u_s.f, 919]          SOURCE_U_S_BC
    Use   [source_u_s.f, 921]          SOURCE_U_S_BC
    Use   [source_u_s.f, 922]          SOURCE_U_S_BC
    Use   [source_u_s.f, 924]          SOURCE_U_S_BC

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 49]   CALC_INTERP_WEIGHTS1
    Set   [calc_interp_weights.f, 69]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 78]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 79]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 104]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 105]   CALC_INTERP_WEIGHTS1

j    (Local Variable)  Declared as: INTEGER
    Define   [source_population_eq.f, 16]   Source_population_eq
    Set   [source_population_eq.f, 35]   Source_population_eq
    Use   [source_population_eq.f, 36]   Source_population_eq
    Use   [source_population_eq.f, 37]   Source_population_eq
    Use   [source_population_eq.f, 38]   Source_population_eq
    Use   [source_population_eq.f, 39]   Source_population_eq
    Set   [source_population_eq.f, 58]   Source_population_eq
    Use   [source_population_eq.f, 59]   Source_population_eq
    Use   [source_population_eq.f, 59]   Source_population_eq
    Use   [source_population_eq.f, 59]   Source_population_eq
    Set   [source_population_eq.f, 68]   Source_population_eq
    Use   [source_population_eq.f, 71]   Source_population_eq
    Use   [source_population_eq.f, 71]   Source_population_eq
    Use   [source_population_eq.f, 72]   Source_population_eq
    Use   [source_population_eq.f, 74]   Source_population_eq
    Use   [source_population_eq.f, 74]   Source_population_eq
    Use   [source_population_eq.f, 75]   Source_population_eq
    Use   [source_population_eq.f, 75]   Source_population_eq
    Set   [source_population_eq.f, 85]   Source_population_eq
    Use   [source_population_eq.f, 87]   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, 92]   Source_population_eq
    Use   [source_population_eq.f, 95]   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, 99]   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, 103]   Source_population_eq
    Use   [source_population_eq.f, 104]   Source_population_eq
    Use   [source_population_eq.f, 104]   Source_population_eq
    Set   [source_population_eq.f, 146]   Source_population_eq
    Use   [source_population_eq.f, 147]   Source_population_eq
    Use   [source_population_eq.f, 148]   Source_population_eq
    Set   [source_population_eq.f, 151]   Source_population_eq
    Use   [source_population_eq.f, 152]   Source_population_eq
    Use   [source_population_eq.f, 153]   Source_population_eq
    Set   [source_population_eq.f, 157]   Source_population_eq
    Use   [source_population_eq.f, 158]   Source_population_eq
    Use   [source_population_eq.f, 158]   Source_population_eq
    Set   [source_population_eq.f, 161]   Source_population_eq
    Use   [source_population_eq.f, 162]   Source_population_eq
    Use   [source_population_eq.f, 162]   Source_population_eq
    Set   [source_population_eq.f, 192]   Source_population_eq
    Use   [source_population_eq.f, 194]   Source_population_eq
    Use   [source_population_eq.f, 194]   Source_population_eq
    Use   [source_population_eq.f, 195]   Source_population_eq
    Set   [source_population_eq.f, 201]   Source_population_eq
    Use   [source_population_eq.f, 202]   Source_population_eq
    Use   [source_population_eq.f, 202]   Source_population_eq
    Set   [source_population_eq.f, 212]   Source_population_eq
    Use   [source_population_eq.f, 214]   Source_population_eq
    Use   [source_population_eq.f, 214]   Source_population_eq

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 223]   CALC_DES_BEDHEIGHT
    Set   [des_granular_temperature.f, 239]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 242]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 242]   CALC_DES_BEDHEIGHT

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

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1709]         GATHER_DATA
    Set   [vtk_out.f, 1796]            GATHER_DATA
    Use   [vtk_out.f, 1798]            GATHER_DATA

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1896]         SETUP_VTK_NO_CUTCELL
    Set   [vtk_out.f, 1942]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1948]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1948]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1953]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 1953]            SETUP_VTK_NO_CUTCELL
    Set   [vtk_out.f, 2004]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2006]            SETUP_VTK_NO_CUTCELL

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3070]         SETUP_VTK_REGION
    Set   [vtk_out.f, 3143]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3159]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3159]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3162]            SETUP_VTK_REGION
    Set   [vtk_out.f, 3202]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3218]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3218]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3221]            SETUP_VTK_REGION

J    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 48]           WRITE_VTU_FILE
    Set   [vtk_out.f, 79]              WRITE_VTU_FILE
    Use   [vtk_out.f, 80]              WRITE_VTU_FILE
    Use   [vtk_out.f, 80]              WRITE_VTU_FILE
    Use   [vtk_out.f, 80]              WRITE_VTU_FILE

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

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_p_star.f, 161]      CALC_ep_star
    Set   [calc_p_star.f, 197]         CALC_ep_star
    Use   [calc_p_star.f, 199]         CALC_ep_star
    Use   [calc_p_star.f, 203]         CALC_ep_star
    Use   [calc_p_star.f, 205]         CALC_ep_star
    Use   [calc_p_star.f, 208]         CALC_ep_star
    Use   [calc_p_star.f, 209]         CALC_ep_star
    Use   [calc_p_star.f, 212]         CALC_ep_star
    Use   [calc_p_star.f, 213]         CALC_ep_star
    Set   [calc_p_star.f, 234]         CALC_ep_star
    Use   [calc_p_star.f, 235]         CALC_ep_star
    Use   [calc_p_star.f, 236]         CALC_ep_star
    Use   [calc_p_star.f, 236]         CALC_ep_star
    Use   [calc_p_star.f, 238]         CALC_ep_star
    Use   [calc_p_star.f, 238]         CALC_ep_star
    Use   [calc_p_star.f, 240]         CALC_ep_star
    Set   [calc_p_star.f, 258]         CALC_ep_star
    Use   [calc_p_star.f, 259]         CALC_ep_star
    Use   [calc_p_star.f, 260]         CALC_ep_star
    Use   [calc_p_star.f, 261]         CALC_ep_star
    Use   [calc_p_star.f, 261]         CALC_ep_star
    Use   [calc_p_star.f, 261]         CALC_ep_star
    Use   [calc_p_star.f, 264]         CALC_ep_star
    Use   [calc_p_star.f, 264]         CALC_ep_star
    Use   [calc_p_star.f, 264]         CALC_ep_star
    Use   [calc_p_star.f, 267]         CALC_ep_star
    Use   [calc_p_star.f, 268]         CALC_ep_star
    Use   [calc_p_star.f, 269]         CALC_ep_star
    Use   [calc_p_star.f, 269]         CALC_ep_star
    Use   [calc_p_star.f, 271]         CALC_ep_star
    Set   [calc_p_star.f, 282]         CALC_ep_star
    Use   [calc_p_star.f, 283]         CALC_ep_star
    Use   [calc_p_star.f, 287]         CALC_ep_star
    Use   [calc_p_star.f, 287]         CALC_ep_star
    Use   [calc_p_star.f, 287]         CALC_ep_star
    Set   [calc_p_star.f, 293]         CALC_ep_star
    Use   [calc_p_star.f, 294]         CALC_ep_star
    Use   [calc_p_star.f, 298]         CALC_ep_star
    Use   [calc_p_star.f, 298]         CALC_ep_star
    Use   [calc_p_star.f, 298]         CALC_ep_star

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

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

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

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_cg.f, 172]           LEQ_CG0
    Set   [leq_cg.f, 226]              LEQ_CG0
    Use   [leq_cg.f, 227]              LEQ_CG0

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_u_s.f, 113]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 154]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 155]       CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 194]   CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 195]   CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 198]       CALC_IA_MOMSOURCE_U_S

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

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

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

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [set_fluidbed_p.f, 61]    SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 96]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 98]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 99]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 100]      SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 110]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 111]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 111]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 115]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 116]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 117]      SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 129]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 132]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 133]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 134]      SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 179]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 186]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 187]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 188]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 197]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 200]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 207]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 223]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 224]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 225]      SET_FLUIDBED_P

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

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 153]     STORE_A_W_G0
    Set   [conv_dif_w_g.f, 198]        STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 249]   STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 250]   STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 253]   STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 254]   STORE_A_W_G0
    Use   [conv_dif_w_g.f, 254]        STORE_A_W_G0
    Use   [conv_dif_w_g.f, 325]        STORE_A_W_G0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 914]     STORE_A_W_G1
    Set   [conv_dif_w_g.f, 1023]       STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1071]   STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1072]   STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1075]   STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1076]   STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1076]       STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1135]       STORE_A_W_G1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 459]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 512]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 514]        STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 588]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 758]        STORE_A_W_GDC

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

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 73]           CALC_TAU_W_S
    Set   [tau_w_s.f, 133]             CALC_TAU_W_S
    Use   [tau_w_s.f, 136]             CALC_TAU_W_S
    Use   [tau_w_s.f, 168]             CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 170]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 171]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 200]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 201]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 362]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 363]    CALC_TAU_W_S

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

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

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

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

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 1260]   SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1270]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1274]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1282]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1284]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1293]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1294]      SET_DEM_MI_OWNER

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

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

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_source_epp.f, 606]   POINT_SOURCE_EPP
    Set   [conv_source_epp.f, 632]     POINT_SOURCE_EPP
    Use   [conv_source_epp.f, 635]     POINT_SOURCE_EPP
    Use   [conv_source_epp.f, 636]     POINT_SOURCE_EPP
    Use   [conv_source_epp.f, 637]     POINT_SOURCE_EPP

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

J    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 34]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 79]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 83]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 87]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 90]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 91]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 94]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 95]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 274]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 290]           GET_3D_ALPHA_U_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 453]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 497]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 501]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 505]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 508]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 509]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 512]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 513]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 693]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 713]           GET_3D_ALPHA_V_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 879]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 921]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 925]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 929]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 932]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 933]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 936]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 937]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 1114]          GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 1130]          GET_3D_ALPHA_W_CUT_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [qmomk_gas_drag.f, 63]    QMOMK_GAS_DRAG
    Set   [qmomk_gas_drag.f, 78]       QMOMK_GAS_DRAG
    Set   [qmomk_gas_drag.f, 100]      QMOMK_GAS_DRAG
    Use Argument   [qmomk_gas_drag.f, 105]   QMOMK_GAS_DRAG
    Set   [qmomk_gas_drag.f, 123]      QMOMK_GAS_DRAG

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_g.f, 74]           CALC_TAU_V_G
    Set   [tau_v_g.f, 111]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 113]    CALC_TAU_V_G
    Use   [tau_v_g.f, 115]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 147]    CALC_TAU_V_G
    Use   [tau_v_g.f, 147]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 149]    CALC_TAU_V_G
    Use   [tau_v_g.f, 149]             CALC_TAU_V_G
    Use   [tau_v_g.f, 151]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 153]    CALC_TAU_V_G
    Use   [tau_v_g.f, 153]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 155]    CALC_TAU_V_G
    Use   [tau_v_g.f, 155]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 170]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 172]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 182]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 184]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 305]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 307]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 373]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 375]    CALC_TAU_V_G

j    (Local Variable)  Declared as: INTEGER
    Define   [mfix.f, 554]             debug_write_layout
    Set   [mfix.f, 588]                debug_write_layout
    Use   [mfix.f, 589]                debug_write_layout
    Use   [mfix.f, 590]                debug_write_layout
    Use   [mfix.f, 591]                debug_write_layout
    Use   [mfix.f, 592]                debug_write_layout
    Use   [mfix.f, 594]                debug_write_layout
    Set   [mfix.f, 604]                debug_write_layout
    Use   [mfix.f, 605]                debug_write_layout
    Use   [mfix.f, 606]                debug_write_layout
    Use   [mfix.f, 608]                debug_write_layout
    Set   [mfix.f, 619]                debug_write_layout
    Use   [mfix.f, 620]                debug_write_layout
    Use   [mfix.f, 621]                debug_write_layout
    Use   [mfix.f, 623]                debug_write_layout
    Set   [mfix.f, 634]                debug_write_layout
    Use   [mfix.f, 640]                debug_write_layout
    Set   [mfix.f, 649]                debug_write_layout
    Use   [mfix.f, 654]                debug_write_layout
    Set   [mfix.f, 660]                debug_write_layout
    Use   [mfix.f, 661]                debug_write_layout
    Use   [mfix.f, 662]                debug_write_layout
    Use   [mfix.f, 664]                debug_write_layout
    Use   [mfix.f, 668]                debug_write_layout
    Use   [mfix.f, 672]                debug_write_layout
    Use   [mfix.f, 676]                debug_write_layout
    Use   [mfix.f, 680]                debug_write_layout
    Use   [mfix.f, 684]                debug_write_layout
    Use   [mfix.f, 688]                debug_write_layout
    Use   [mfix.f, 692]                debug_write_layout

j    (Local Variable)  Declared as: INTEGER
    Define   [mfix.f, 844]             write_parallel_info
    Set   [mfix.f, 867]                write_parallel_info
    Use   [mfix.f, 868]                write_parallel_info
    Use   [mfix.f, 869]                write_parallel_info
    Use   [mfix.f, 870]                write_parallel_info
    Use   [mfix.f, 871]                write_parallel_info
    Use   [mfix.f, 873]                write_parallel_info

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 91]     CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 186]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 214]       CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 230]   CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 231]   CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 270]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 274]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 278]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 281]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 283]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 285]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 286]       CG_SOURCE_U_G

J    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 413]    CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 468]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 472]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 486]       CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 582]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 586]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 589]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 591]       CG_SOURCE_U_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_continuum.f, 329]   CHECK_KT_TYPE
    Set   [check_solids_continuum.f, 409]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 410]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 415]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 419]   CHECK_KT_TYPE
    Use   [check_solids_continuum.f, 419]   CHECK_KT_TYPE

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 60]     CHECK_DATA_30
    Set   [check_data_30.f, 198]       CHECK_DATA_30
    Use   [check_data_30.f, 200]       CHECK_DATA_30
    Use   [check_data_30.f, 217]       CHECK_DATA_30
    Use   [check_data_30.f, 227]       CHECK_DATA_30
    Use   [check_data_30.f, 237]       CHECK_DATA_30
    Use   [check_data_30.f, 248]       CHECK_DATA_30
    Use   [check_data_30.f, 262]       CHECK_DATA_30
    Use   [check_data_30.f, 272]       CHECK_DATA_30
    Use   [check_data_30.f, 282]       CHECK_DATA_30
    Use   [check_data_30.f, 294]       CHECK_DATA_30
    Use   [check_data_30.f, 311]       CHECK_DATA_30
    Use   [check_data_30.f, 321]       CHECK_DATA_30
    Use   [check_data_30.f, 334]       CHECK_DATA_30
    Use   [check_data_30.f, 344]       CHECK_DATA_30
    Use   [check_data_30.f, 354]       CHECK_DATA_30
    Use   [check_data_30.f, 367]       CHECK_DATA_30
    Use   [check_data_30.f, 387]       CHECK_DATA_30
    Use   [check_data_30.f, 392]       CHECK_DATA_30
    Use   [check_data_30.f, 430]       CHECK_DATA_30
    Use   [check_data_30.f, 443]       CHECK_DATA_30
    Use   [check_data_30.f, 453]       CHECK_DATA_30
    Use   [check_data_30.f, 464]       CHECK_DATA_30
    Use   [check_data_30.f, 476]       CHECK_DATA_30
    Use   [check_data_30.f, 496]       CHECK_DATA_30
    Use   [check_data_30.f, 501]       CHECK_DATA_30
    Use   [check_data_30.f, 553]       CHECK_DATA_30
    Use   [check_data_30.f, 594]       CHECK_DATA_30
    Use   [check_data_30.f, 626]       CHECK_DATA_30
    Use   [check_data_30.f, 636]       CHECK_DATA_30
    Use   [check_data_30.f, 656]       CHECK_DATA_30
    Use   [check_data_30.f, 667]       CHECK_DATA_30

J    (Local Variable)  Declared as: INTEGER
    Define   [solve_pp_g.f, 176]       POINT_SOURCE_PP_G
    Set   [solve_pp_g.f, 189]          POINT_SOURCE_PP_G
    Use   [solve_pp_g.f, 192]          POINT_SOURCE_PP_G
    Use   [solve_pp_g.f, 193]          POINT_SOURCE_PP_G
    Use   [solve_pp_g.f, 195]          POINT_SOURCE_PP_G

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_g.f, 74]         CALC_MU_G
    Set   [calc_mu_g.f, 205]           CALC_MU_G
    Use   [calc_mu_g.f, 208]           CALC_MU_G
    Use Argument   [calc_mu_g.f, 229]   CALC_MU_G
    Use Argument   [calc_mu_g.f, 245]   CALC_MU_G
    Use   [calc_mu_g.f, 264]           CALC_MU_G
    Use   [calc_mu_g.f, 269]           CALC_MU_G
    Use   [calc_mu_g.f, 271]           CALC_MU_G

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 250]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 281]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 283]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 295]   INIT_PARTICLES_IN_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 59]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 98]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 99]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 99]    PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 100]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 103]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 104]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 105]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 105]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 106]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 107]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 108]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 108]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 109]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 110]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 111]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 111]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 113]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 144]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 148]   PARTICLES_IN_CELL

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

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 63]          DIF_V_IS
    Set   [dif_v_is.f, 98]             DIF_V_IS
    Use   [dif_v_is.f, 100]            DIF_V_IS
    Use   [dif_v_is.f, 101]            DIF_V_IS
    Use   [dif_v_is.f, 102]            DIF_V_IS
    Use Argument   [dif_v_is.f, 109]   DIF_V_IS
    Set   [dif_v_is.f, 119]            DIF_V_IS
    Use   [dif_v_is.f, 121]            DIF_V_IS
    Use   [dif_v_is.f, 122]            DIF_V_IS
    Use   [dif_v_is.f, 123]            DIF_V_IS
    Use Argument   [dif_v_is.f, 130]   DIF_V_IS

J    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 61]            BC_PHI
    Set   [bc_phi.f, 240]              BC_PHI
    Use   [bc_phi.f, 242]              BC_PHI
    Use   [bc_phi.f, 243]              BC_PHI
    Use   [bc_phi.f, 244]              BC_PHI
    Use   [bc_phi.f, 246]              BC_PHI
    Use   [bc_phi.f, 291]              BC_PHI
    Use   [bc_phi.f, 292]              BC_PHI
    Set   [bc_phi.f, 359]              BC_PHI
    Use   [bc_phi.f, 361]              BC_PHI
    Use   [bc_phi.f, 362]              BC_PHI
    Use   [bc_phi.f, 363]              BC_PHI
    Set   [bc_phi.f, 413]              BC_PHI
    Use   [bc_phi.f, 415]              BC_PHI
    Use   [bc_phi.f, 416]              BC_PHI
    Use   [bc_phi.f, 417]              BC_PHI

J    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 504]           BC_PHI_CG
    Set   [bc_phi.f, 517]              BC_PHI_CG
    Use   [bc_phi.f, 520]              BC_PHI_CG
    Use   [bc_phi.f, 520]              BC_PHI_CG
    Use   [bc_phi.f, 539]              BC_PHI_CG
    Use   [bc_phi.f, 599]              BC_PHI_CG
    Use   [bc_phi.f, 600]              BC_PHI_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [source_rop_s.f, 156]     POINT_SOURCE_ROP_S
    Set   [source_rop_s.f, 169]        POINT_SOURCE_ROP_S
    Use   [source_rop_s.f, 172]        POINT_SOURCE_ROP_S
    Use   [source_rop_s.f, 173]        POINT_SOURCE_ROP_S
    Use   [source_rop_s.f, 175]        POINT_SOURCE_ROP_S

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 71]        SOURCE_W_G
    Set   [source_w_g.f, 125]          SOURCE_W_G
    Use   [source_w_g.f, 253]          SOURCE_W_G
    Use Argument   [source_w_g.f, 254]   SOURCE_W_G
    Use   [source_w_g.f, 356]          SOURCE_W_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 467]       SOURCE_W_G_BC
    Set   [source_w_g.f, 627]          SOURCE_W_G_BC
    Use   [source_w_g.f, 629]          SOURCE_W_G_BC
    Use   [source_w_g.f, 630]          SOURCE_W_G_BC
    Use   [source_w_g.f, 631]          SOURCE_W_G_BC
    Set   [source_w_g.f, 662]          SOURCE_W_G_BC
    Use   [source_w_g.f, 664]          SOURCE_W_G_BC
    Use   [source_w_g.f, 665]          SOURCE_W_G_BC
    Use   [source_w_g.f, 666]          SOURCE_W_G_BC
    Set   [source_w_g.f, 697]          SOURCE_W_G_BC
    Use   [source_w_g.f, 699]          SOURCE_W_G_BC
    Use   [source_w_g.f, 700]          SOURCE_W_G_BC
    Use   [source_w_g.f, 701]          SOURCE_W_G_BC
    Use   [source_w_g.f, 704]          SOURCE_W_G_BC
    Use   [source_w_g.f, 755]          SOURCE_W_G_BC
    Use   [source_w_g.f, 756]          SOURCE_W_G_BC
    Set   [source_w_g.f, 787]          SOURCE_W_G_BC
    Use   [source_w_g.f, 789]          SOURCE_W_G_BC
    Use   [source_w_g.f, 790]          SOURCE_W_G_BC
    Use   [source_w_g.f, 791]          SOURCE_W_G_BC
    Use   [source_w_g.f, 794]          SOURCE_W_G_BC
    Use   [source_w_g.f, 842]          SOURCE_W_G_BC
    Set   [source_w_g.f, 873]          SOURCE_W_G_BC
    Use   [source_w_g.f, 875]          SOURCE_W_G_BC
    Use   [source_w_g.f, 876]          SOURCE_W_G_BC
    Use   [source_w_g.f, 877]          SOURCE_W_G_BC
    Set   [source_w_g.f, 904]          SOURCE_W_G_BC
    Use   [source_w_g.f, 906]          SOURCE_W_G_BC
    Use   [source_w_g.f, 907]          SOURCE_W_G_BC
    Use   [source_w_g.f, 908]          SOURCE_W_G_BC
    Set   [source_w_g.f, 937]          SOURCE_W_G_BC
    Use   [source_w_g.f, 939]          SOURCE_W_G_BC
    Use   [source_w_g.f, 940]          SOURCE_W_G_BC
    Use   [source_w_g.f, 941]          SOURCE_W_G_BC
    Set   [source_w_g.f, 970]          SOURCE_W_G_BC
    Use   [source_w_g.f, 972]          SOURCE_W_G_BC
    Use   [source_w_g.f, 973]          SOURCE_W_G_BC
    Use   [source_w_g.f, 974]          SOURCE_W_G_BC

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 32]   CHECK_CELL_MOVEMENT
    Set   [check_cell_movement.f, 51]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 55]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 55]   CHECK_CELL_MOVEMENT

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 100]   CHECK_CELL_MOVEMENT_DEM
    Set   [check_cell_movement.f, 119]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 128]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 128]   CHECK_CELL_MOVEMENT_DEM
    Use Argument   [check_cell_movement.f, 130]   CHECK_CELL_MOVEMENT_DEM

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 210]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 241]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 279]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 279]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 281]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 288]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 300]   CHECK_CELL_MOVEMENT_PIC

J    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 400]   REPORT_PIC_STATS
    Set   [check_cell_movement.f, 419]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 421]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 425]   REPORT_PIC_STATS
    Set   [check_cell_movement.f, 445]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 448]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 449]   REPORT_PIC_STATS
    Use   [check_cell_movement.f, 449]   REPORT_PIC_STATS

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 143]     STORE_A_W_S0
    Set   [conv_dif_w_s.f, 168]        STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 216]   STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 217]   STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 221]   STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 222]   STORE_A_W_S0
    Use   [conv_dif_w_s.f, 223]        STORE_A_W_S0
    Use   [conv_dif_w_s.f, 285]        STORE_A_W_S0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 800]     STORE_A_W_S1
    Set   [conv_dif_w_s.f, 901]        STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 946]   STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 947]   STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 951]   STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 952]   STORE_A_W_S1
    Use   [conv_dif_w_s.f, 953]        STORE_A_W_S1
    Use   [conv_dif_w_s.f, 1004]       STORE_A_W_S1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 403]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 454]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 456]        STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 524]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 670]        STORE_A_W_SDC

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

J    (Local Variable)  Declared as: INTEGER
    Define   [check_data_20.f, 54]     CHECK_DATA_20
    Set   [check_data_20.f, 96]        CHECK_DATA_20
    Use   [check_data_20.f, 98]        CHECK_DATA_20
    Use Argument   [check_data_20.f, 100]   CHECK_DATA_20
    Use   [check_data_20.f, 110]       CHECK_DATA_20
    Use   [check_data_20.f, 117]       CHECK_DATA_20
    Use   [check_data_20.f, 124]       CHECK_DATA_20
    Use   [check_data_20.f, 131]       CHECK_DATA_20
    Use   [check_data_20.f, 138]       CHECK_DATA_20
    Use   [check_data_20.f, 147]       CHECK_DATA_20
    Use   [check_data_20.f, 155]       CHECK_DATA_20
    Use   [check_data_20.f, 162]       CHECK_DATA_20
    Use   [check_data_20.f, 169]       CHECK_DATA_20
    Use   [check_data_20.f, 171]       CHECK_DATA_20
    Use   [check_data_20.f, 176]       CHECK_DATA_20
    Use   [check_data_20.f, 184]       CHECK_DATA_20
    Use   [check_data_20.f, 191]       CHECK_DATA_20
    Use   [check_data_20.f, 202]       CHECK_DATA_20
    Use   [check_data_20.f, 214]       CHECK_DATA_20
    Use   [check_data_20.f, 232]       CHECK_DATA_20
    Use   [check_data_20.f, 240]       CHECK_DATA_20
    Use   [check_data_20.f, 249]       CHECK_DATA_20
    Use   [check_data_20.f, 258]       CHECK_DATA_20
    Use   [check_data_20.f, 266]       CHECK_DATA_20
    Use   [check_data_20.f, 274]       CHECK_DATA_20
    Use   [check_data_20.f, 276]       CHECK_DATA_20
    Use   [check_data_20.f, 282]       CHECK_DATA_20
    Use   [check_data_20.f, 290]       CHECK_DATA_20
    Use   [check_data_20.f, 298]       CHECK_DATA_20
    Use   [check_data_20.f, 308]       CHECK_DATA_20
    Set   [check_data_20.f, 334]       CHECK_DATA_20
    Use   [check_data_20.f, 336]       CHECK_DATA_20
    Use   [check_data_20.f, 356]       CHECK_DATA_20
    Use   [check_data_20.f, 365]       CHECK_DATA_20
    Use   [check_data_20.f, 374]       CHECK_DATA_20
    Use   [check_data_20.f, 393]       CHECK_DATA_20

J    (Local Variable)  Declared as: INTEGER
    Define   [usr_dqmom.f, 33]         USR_DQMOM

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

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

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

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

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

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

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

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

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

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [cfassign.f, 212]         compute_volume_of_nodes
    Set   [cfassign.f, 255]            compute_volume_of_nodes
    Use   [cfassign.f, 264]            compute_volume_of_nodes
    Use   [cfassign.f, 270]            compute_volume_of_nodes
    Use   [cfassign.f, 271]            compute_volume_of_nodes
    Use   [cfassign.f, 305]            compute_volume_of_nodes
    Use   [cfassign.f, 306]            compute_volume_of_nodes
    Use   [cfassign.f, 310]            compute_volume_of_nodes
    Use   [cfassign.f, 311]            compute_volume_of_nodes

J    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 42]      DRAG_GS_DES0
    Set   [drag_gs_des0.f, 101]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 109]        DRAG_GS_DES0
    Set   [drag_gs_des0.f, 119]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 122]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 129]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 130]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 131]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 132]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 133]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 140]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 140]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 141]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 141]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 142]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 145]        DRAG_GS_DES0

J    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 245]     DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 312]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 320]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 330]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 333]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 339]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 340]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 341]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 342]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 343]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 350]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 350]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 353]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 353]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 356]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 359]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 393]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 397]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 410]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 415]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 447]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 450]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 450]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 452]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 453]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 454]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 461]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 462]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 463]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 464]        DRAG_GS_GAS0

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [set_geometry.f, 78]      SET_GEOMETRY
    Set   [set_geometry.f, 375]        SET_GEOMETRY
    Use   [set_geometry.f, 376]        SET_GEOMETRY
    Use   [set_geometry.f, 376]        SET_GEOMETRY
    Use   [set_geometry.f, 377]        SET_GEOMETRY
    Use   [set_geometry.f, 378]        SET_GEOMETRY
    Use   [set_geometry.f, 378]        SET_GEOMETRY
    Use   [set_geometry.f, 378]        SET_GEOMETRY
    Use   [set_geometry.f, 378]        SET_GEOMETRY
    Use   [set_geometry.f, 379]        SET_GEOMETRY
    Use   [set_geometry.f, 379]        SET_GEOMETRY

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 690]        leq_check
    Set   [leq_gmres.f, 711]           leq_check
    Use   [leq_gmres.f, 714]           leq_check
    Use   [leq_gmres.f, 714]           leq_check
    Use   [leq_gmres.f, 720]           leq_check

J    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 36]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 80]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 84]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 87]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 89]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 215]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 404]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 412]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 481]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 495]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 509]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 608]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 679]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 764]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 917]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 978]   GET_CUT_CELL_VOLUME_AND_AREAS

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 812]   CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 865]     CHECK_IF_PARCEL_OVELAPS_STL
    Use Argument   [pic_bc_routines.f, 867]   CHECK_IF_PARCEL_OVELAPS_STL

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 720]   PIC_FIND_NEW_CELL
    Set   [pic_bc_routines.f, 724]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 740]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 740]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 741]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 742]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 743]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 745]     PIC_FIND_NEW_CELL
    Set   [pic_bc_routines.f, 761]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 768]     PIC_FIND_NEW_CELL

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

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 158]     STORE_A_V_G0
    Set   [conv_dif_v_g.f, 210]        STORE_A_V_G0
    Use   [conv_dif_v_g.f, 218]        STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 232]   STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 236]   STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 285]   STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 289]   STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 318]   STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 322]   STORE_A_V_G0
    Use   [conv_dif_v_g.f, 337]        STORE_A_V_G0
    Use   [conv_dif_v_g.f, 349]        STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 377]   STORE_A_V_G0
    Use Argument   [conv_dif_v_g.f, 381]   STORE_A_V_G0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 930]     STORE_A_V_G1
    Set   [conv_dif_v_g.f, 970]        STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 994]   STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 996]   STORE_A_V_G1
    Set   [conv_dif_v_g.f, 1039]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1049]       STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1062]   STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1066]   STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1111]   STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1115]   STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1142]   STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1146]   STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1158]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1171]       STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1197]   STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 1201]   STORE_A_V_G1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 474]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 527]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 529]        STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 537]        STORE_A_V_GDC
    Use Argument   [conv_dif_v_g.f, 551]   STORE_A_V_GDC
    Use Argument   [conv_dif_v_g.f, 573]   STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 627]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 635]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 775]        STORE_A_V_GDC

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 73]           CALC_TAU_V_S
    Set   [tau_v_s.f, 115]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 121]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 125]    CALC_TAU_V_S
    Use   [tau_v_s.f, 129]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 160]    CALC_TAU_V_S
    Use   [tau_v_s.f, 161]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 163]    CALC_TAU_V_S
    Use   [tau_v_s.f, 164]             CALC_TAU_V_S
    Use   [tau_v_s.f, 166]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 169]    CALC_TAU_V_S
    Use   [tau_v_s.f, 170]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 172]    CALC_TAU_V_S
    Use   [tau_v_s.f, 173]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 192]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 195]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 203]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 206]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 311]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 314]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 373]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 376]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 391]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 393]    CALC_TAU_V_S

j    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m_var.f, 63]    WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 95]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 97]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 99]       WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 116]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 118]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 121]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 123]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 123]      WRITE_AB_M_VAR

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 257]     CALC_PG_GRAD_CG
    Set   [calc_pg_grad.f, 272]        CALC_PG_GRAD_CG
    Use   [calc_pg_grad.f, 276]        CALC_PG_GRAD_CG
    Use   [calc_pg_grad.f, 307]        CALC_PG_GRAD_CG
    Use   [calc_pg_grad.f, 313]        CALC_PG_GRAD_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 136]     CALC_PG_GRAD_STD
    Set   [calc_pg_grad.f, 156]        CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 183]        CALC_PG_GRAD_STD
    Use Argument   [calc_pg_grad.f, 184]   CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 186]        CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 187]        CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 188]        CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 190]        CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 191]        CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 191]        CALC_PG_GRAD_STD
    Use Argument   [calc_pg_grad.f, 192]   CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 193]        CALC_PG_GRAD_STD
    Use   [calc_pg_grad.f, 194]        CALC_PG_GRAD_STD

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 41]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 126]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 129]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 130]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 132]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 167]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 170]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 171]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 173]       SET_BC_DEM_MO

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 707]        gt_pde_ahmadi
    Set   [calc_mu_s.f, 719]           gt_pde_ahmadi

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 1013]       gt_pde_gd
    Set   [calc_mu_s.f, 1029]          gt_pde_gd

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 1208]       gt_pde_gtsh
    Set   [calc_mu_s.f, 1233]          gt_pde_gtsh

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 1446]       gt_pde_ia
    Set   [calc_mu_s.f, 1468]          gt_pde_ia

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 550]        gt_pde_lun
    Set   [calc_mu_s.f, 561]           gt_pde_lun

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 841]        gt_pde_simonin
    Set   [calc_mu_s.f, 854]           gt_pde_simonin

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2626]       init_mu_s
    Set   [calc_mu_s.f, 2683]          init_mu_s
    Use   [calc_mu_s.f, 2686]          init_mu_s
    Use Argument   [calc_mu_s.f, 2712]   init_mu_s
    Use Argument   [calc_mu_s.f, 2753]   init_mu_s
    Use   [calc_mu_s.f, 2803]          init_mu_s
    Use   [calc_mu_s.f, 2808]          init_mu_s
    Use   [calc_mu_s.f, 2810]          init_mu_s
    Use Argument   [calc_mu_s.f, 2910]   init_mu_s
    Use Argument   [calc_mu_s.f, 2951]   init_mu_s
    Use   [calc_mu_s.f, 3001]          init_mu_s
    Use   [calc_mu_s.f, 3006]          init_mu_s
    Use   [calc_mu_s.f, 3008]          init_mu_s
    Use   [calc_mu_s.f, 3046]          init_mu_s
    Use   [calc_mu_s.f, 3047]          init_mu_s
    Use   [calc_mu_s.f, 3049]          init_mu_s

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2011]       subgrid_stress_igci
    Set   [calc_mu_s.f, 2031]          subgrid_stress_igci

J    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2191]       subgrid_stress_MILIOLI
    Set   [calc_mu_s.f, 2209]          subgrid_stress_MILIOLI

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

J    (Dummy Argument)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1326]      LEQ_IJSWEEPt
    Declare   [leq_bicgst.f, 1347]     LEQ_IJSWEEPt
    Use   [leq_bicgst.f, 1377]         LEQ_IJSWEEPt
    Use   [leq_bicgst.f, 1403]         LEQ_IJSWEEPt

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 804]       LEQ_IKSWEEPt
    Set   [leq_bicgst.f, 810]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 813]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 819]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 820]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 821]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 822]          LEQ_IKSWEEPt
    Set   [leq_bicgst.f, 840]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 842]          LEQ_IKSWEEPt
    Use   [leq_bicgst.f, 843]          LEQ_IKSWEEPt

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 698]       LEQ_ISWEEPt
    Set   [leq_bicgst.f, 704]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 706]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 710]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 711]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 712]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 713]          LEQ_ISWEEPt
    Set   [leq_bicgst.f, 729]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 730]          LEQ_ISWEEPt
    Use   [leq_bicgst.f, 731]          LEQ_ISWEEPt

J    (Dummy Argument)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1224]      LEQ_JKSWEEPt
    Declare   [leq_bicgst.f, 1245]     LEQ_JKSWEEPt
    Use   [leq_bicgst.f, 1275]         LEQ_JKSWEEPt
    Use   [leq_bicgst.f, 1301]         LEQ_JKSWEEPt

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 913]       LEQ_MATVECt
    Set   [leq_bicgst.f, 930]          LEQ_MATVECt
    Use   [leq_bicgst.f, 932]          LEQ_MATVECt
    Set   [leq_bicgst.f, 961]          LEQ_MATVECt
    Use   [leq_bicgst.f, 964]          LEQ_MATVECt

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1504]      LEQ_msolve1t
    Set   [leq_bicgst.f, 1524]         LEQ_msolve1t
    Use   [leq_bicgst.f, 1526]         LEQ_msolve1t

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgst.f, 1046]      LEQ_MSOLVEt
    Set   [leq_bicgst.f, 1072]         LEQ_MSOLVEt
    Use   [leq_bicgst.f, 1074]         LEQ_MSOLVEt

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

J    (Local Variable)  Declared as: INTEGER
    Define   [utilities.f, 75]         MAX_VEL_INLET
    Set   [utilities.f, 86]            MAX_VEL_INLET
    Use   [utilities.f, 88]            MAX_VEL_INLET
    Use   [utilities.f, 89]            MAX_VEL_INLET
    Use   [utilities.f, 90]            MAX_VEL_INLET

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_g.f, 73]           CALC_TAU_U_G
    Set   [tau_u_g.f, 122]             CALC_TAU_U_G
    Use   [tau_u_g.f, 123]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 154]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 155]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 177]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 178]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 310]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 311]    CALC_TAU_U_G

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

J    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 25]           NSQUARE
    Set   [nsquare.f, 99]              NSQUARE
    Use   [nsquare.f, 101]             NSQUARE

J    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 353]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 357]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 361]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 365]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 368]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 370]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 373]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 395]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 395]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 396]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 410]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 410]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 411]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 425]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 425]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 426]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 440]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 440]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 441]    GET_CELL_NODE_COORDINATES

J    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 35]   GET_CONNECTIVITY
    Set   [get_connectivity.f, 55]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 59]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 62]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 64]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 67]     GET_CONNECTIVITY

J    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 543]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 547]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 551]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 555]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 558]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 560]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 563]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 582]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 582]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 583]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 597]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 597]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 598]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 612]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 612]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 613]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 627]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 627]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 628]    GET_GLOBAL_CELL_NODE_COORDINATES

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1057]      JJ_BC_W_S
    Set   [source_w_s.f, 1063]         JJ_BC_W_S
    Use   [source_w_s.f, 1065]         JJ_BC_W_S
    Use   [source_w_s.f, 1066]         JJ_BC_W_S
    Use   [source_w_s.f, 1067]         JJ_BC_W_S
    Use   [source_w_s.f, 1070]         JJ_BC_W_S
    Use   [source_w_s.f, 1154]         JJ_BC_W_S
    Use   [source_w_s.f, 1155]         JJ_BC_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1226]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1247]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1250]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1251]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1253]         POINT_SOURCE_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 79]        SOURCE_W_S
    Set   [source_w_s.f, 133]          SOURCE_W_S
    Use   [source_w_s.f, 342]          SOURCE_W_S
    Use Argument   [source_w_s.f, 343]   SOURCE_W_S
    Use   [source_w_s.f, 450]          SOURCE_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 574]       SOURCE_W_S_BC
    Set   [source_w_s.f, 709]          SOURCE_W_S_BC
    Use   [source_w_s.f, 711]          SOURCE_W_S_BC
    Use   [source_w_s.f, 712]          SOURCE_W_S_BC
    Use   [source_w_s.f, 713]          SOURCE_W_S_BC
    Set   [source_w_s.f, 748]          SOURCE_W_S_BC
    Use   [source_w_s.f, 750]          SOURCE_W_S_BC
    Use   [source_w_s.f, 751]          SOURCE_W_S_BC
    Use   [source_w_s.f, 752]          SOURCE_W_S_BC
    Set   [source_w_s.f, 787]          SOURCE_W_S_BC
    Use   [source_w_s.f, 789]          SOURCE_W_S_BC
    Use   [source_w_s.f, 790]          SOURCE_W_S_BC
    Use   [source_w_s.f, 791]          SOURCE_W_S_BC
    Use   [source_w_s.f, 794]          SOURCE_W_S_BC
    Use   [source_w_s.f, 845]          SOURCE_W_S_BC
    Use   [source_w_s.f, 846]          SOURCE_W_S_BC
    Set   [source_w_s.f, 877]          SOURCE_W_S_BC
    Use   [source_w_s.f, 879]          SOURCE_W_S_BC
    Use   [source_w_s.f, 880]          SOURCE_W_S_BC
    Use   [source_w_s.f, 881]          SOURCE_W_S_BC
    Set   [source_w_s.f, 904]          SOURCE_W_S_BC
    Use   [source_w_s.f, 906]          SOURCE_W_S_BC
    Use   [source_w_s.f, 907]          SOURCE_W_S_BC
    Use   [source_w_s.f, 908]          SOURCE_W_S_BC
    Set   [source_w_s.f, 937]          SOURCE_W_S_BC
    Use   [source_w_s.f, 939]          SOURCE_W_S_BC
    Use   [source_w_s.f, 940]          SOURCE_W_S_BC
    Use   [source_w_s.f, 941]          SOURCE_W_S_BC
    Set   [source_w_s.f, 965]          SOURCE_W_S_BC
    Use   [source_w_s.f, 967]          SOURCE_W_S_BC
    Use   [source_w_s.f, 968]          SOURCE_W_S_BC
    Use   [source_w_s.f, 969]          SOURCE_W_S_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2094]   BUBBLE_SORT_1D_INT_ARRAY
    Set   [set_increments.f, 2109]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2110]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2110]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2111]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2112]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2112]     BUBBLE_SORT_1D_INT_ARRAY
    Use   [set_increments.f, 2113]     BUBBLE_SORT_1D_INT_ARRAY

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 353]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 474]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 494]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 494]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 502]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 504]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 505]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 507]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 508]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 510]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 511]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 560]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 562]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 563]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 564]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 574]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 577]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 579]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 580]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 582]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 592]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 595]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 597]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 598]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 600]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 610]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 612]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 613]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 614]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 637]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 640]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 641]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 642]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 651]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 655]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 657]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 658]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 660]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 669]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 673]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 675]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 676]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 678]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 687]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 690]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 691]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 692]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 715]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 717]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 718]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 719]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 729]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 732]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 734]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 735]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 737]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 747]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 750]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 752]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 753]   RE_INDEX_ARRAYS
    Use   [set_increments.f, 755]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 765]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 767]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 768]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 769]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 813]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 818]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 818]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 825]      RE_INDEX_ARRAYS
    Use Argument   [set_increments.f, 826]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 1798]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1800]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1802]     RE_INDEX_ARRAYS

J    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2002]   RECORD_NEW_IJK_CELL
    Declare   [set_increments.f, 2034]   RECORD_NEW_IJK_CELL
    Use   [set_increments.f, 2044]     RECORD_NEW_IJK_CELL
    Use   [set_increments.f, 2047]     RECORD_NEW_IJK_CELL

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 38]    SET_INCREMENTS
    Set   [set_increments.f, 89]       SET_INCREMENTS
    Use   [set_increments.f, 91]       SET_INCREMENTS
    Use   [set_increments.f, 91]       SET_INCREMENTS
    Use   [set_increments.f, 92]       SET_INCREMENTS
    Use   [set_increments.f, 92]       SET_INCREMENTS
    Use   [set_increments.f, 95]       SET_INCREMENTS
    Use   [set_increments.f, 95]       SET_INCREMENTS
    Use   [set_increments.f, 96]       SET_INCREMENTS
    Use   [set_increments.f, 96]       SET_INCREMENTS
    Use   [set_increments.f, 98]       SET_INCREMENTS
    Use   [set_increments.f, 98]       SET_INCREMENTS
    Use   [set_increments.f, 99]       SET_INCREMENTS
    Use   [set_increments.f, 99]       SET_INCREMENTS
    Set   [set_increments.f, 120]      SET_INCREMENTS
    Use   [set_increments.f, 123]      SET_INCREMENTS
    Use   [set_increments.f, 126]      SET_INCREMENTS
    Set   [set_increments.f, 139]      SET_INCREMENTS
    Use   [set_increments.f, 142]      SET_INCREMENTS
    Use Argument   [set_increments.f, 145]   SET_INCREMENTS

J    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2627]   WRITE_IJK_VALUES
    Set   [set_increments.f, 2740]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2742]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2744]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2744]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2747]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2747]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2749]     WRITE_IJK_VALUES
    Use   [set_increments.f, 2749]     WRITE_IJK_VALUES

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

J    (Local Variable)  Declared as: INTEGER
    Define   [set_constprop.f, 40]     SET_CONSTPROP
    Set   [set_constprop.f, 221]       SET_CONSTPROP
    Use   [set_constprop.f, 222]       SET_CONSTPROP
    Use   [set_constprop.f, 224]       SET_CONSTPROP
    Use   [set_constprop.f, 225]       SET_CONSTPROP
    Set   [set_constprop.f, 231]       SET_CONSTPROP
    Use   [set_constprop.f, 232]       SET_CONSTPROP
    Use   [set_constprop.f, 232]       SET_CONSTPROP
    Use   [set_constprop.f, 233]       SET_CONSTPROP

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_energy_dissipation_ss.f, 230]   CALC_GD_99_ENERGY_DISSIPATION_SS
    Set   [kintheory_energy_dissipation_ss.f, 240]   CALC_GD_99_ENERGY_DISSIPATION_SS

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_energy_dissipation_ss.f, 340]   CALC_GTSH_ENERGY_DISSIPATION_SS
    Set   [kintheory_energy_dissipation_ss.f, 358]   CALC_GTSH_ENERGY_DISSIPATION_SS

J    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_energy_dissipation_ss.f, 40]   CALC_IA_ENERGY_DISSIPATION_SS
    Set   [kintheory_energy_dissipation_ss.f, 60]   CALC_IA_ENERGY_DISSIPATION_SS

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 940]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 965]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 968]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 969]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 971]          POINT_SOURCE_V_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 72]        SOURCE_V_G
    Set   [source_v_g.f, 118]          SOURCE_V_G
    Use Argument   [source_v_g.f, 130]   SOURCE_V_G
    Use Argument   [source_v_g.f, 199]   SOURCE_V_G
    Use Argument   [source_v_g.f, 200]   SOURCE_V_G
    Use Argument   [source_v_g.f, 202]   SOURCE_V_G
    Use Argument   [source_v_g.f, 206]   SOURCE_V_G
    Use Argument   [source_v_g.f, 237]   SOURCE_V_G
    Use Argument   [source_v_g.f, 238]   SOURCE_V_G
    Use Argument   [source_v_g.f, 242]   SOURCE_V_G
    Use Argument   [source_v_g.f, 243]   SOURCE_V_G
    Use Argument   [source_v_g.f, 258]   SOURCE_V_G
    Use Argument   [source_v_g.f, 268]   SOURCE_V_G
    Use Argument   [source_v_g.f, 285]   SOURCE_V_G
    Use Argument   [source_v_g.f, 287]   SOURCE_V_G
    Use Argument   [source_v_g.f, 298]   SOURCE_V_G

J    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 405]       SOURCE_V_G_BC
    Set   [source_v_g.f, 565]          SOURCE_V_G_BC
    Use   [source_v_g.f, 567]          SOURCE_V_G_BC
    Use   [source_v_g.f, 568]          SOURCE_V_G_BC
    Use   [source_v_g.f, 569]          SOURCE_V_G_BC
    Set   [source_v_g.f, 600]          SOURCE_V_G_BC
    Use   [source_v_g.f, 602]          SOURCE_V_G_BC
    Use   [source_v_g.f, 603]          SOURCE_V_G_BC
    Use   [source_v_g.f, 604]          SOURCE_V_G_BC
    Set   [source_v_g.f, 635]          SOURCE_V_G_BC
    Use   [source_v_g.f, 637]          SOURCE_V_G_BC
    Use   [source_v_g.f, 638]          SOURCE_V_G_BC
    Use   [source_v_g.f, 639]          SOURCE_V_G_BC
    Set   [source_v_g.f, 708]          SOURCE_V_G_BC
    Use   [source_v_g.f, 710]          SOURCE_V_G_BC
    Use   [source_v_g.f, 711]          SOURCE_V_G_BC
    Use   [source_v_g.f, 712]          SOURCE_V_G_BC
    Set   [source_v_g.f, 765]          SOURCE_V_G_BC
    Use   [source_v_g.f, 767]          SOURCE_V_G_BC
    Use   [source_v_g.f, 768]          SOURCE_V_G_BC
    Use   [source_v_g.f, 769]          SOURCE_V_G_BC
    Set   [source_v_g.f, 796]          SOURCE_V_G_BC
    Use   [source_v_g.f, 798]          SOURCE_V_G_BC
    Use   [source_v_g.f, 799]          SOURCE_V_G_BC
    Use   [source_v_g.f, 800]          SOURCE_V_G_BC
    Set   [source_v_g.f, 829]          SOURCE_V_G_BC
    Use   [source_v_g.f, 831]          SOURCE_V_G_BC
    Use   [source_v_g.f, 832]          SOURCE_V_G_BC
    Use   [source_v_g.f, 833]          SOURCE_V_G_BC
    Set   [source_v_g.f, 862]          SOURCE_V_G_BC
    Use   [source_v_g.f, 864]          SOURCE_V_G_BC
    Use   [source_v_g.f, 865]          SOURCE_V_G_BC
    Use   [source_v_g.f, 866]          SOURCE_V_G_BC

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_des.f, 44]       DIF_PHI_DES
    Set   [dif_phi_des.f, 57]          DIF_PHI_DES
    Use   [dif_phi_des.f, 72]          DIF_PHI_DES
    Use   [dif_phi_des.f, 87]          DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 95]   DIF_PHI_DES
    Use   [dif_phi_des.f, 95]          DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 98]   DIF_PHI_DES
    Use   [dif_phi_des.f, 98]          DIF_PHI_DES
    Use   [dif_phi_des.f, 107]         DIF_PHI_DES
    Use   [dif_phi_des.f, 126]         DIF_PHI_DES
    Use   [dif_phi_des.f, 141]         DIF_PHI_DES

J    (Local Variable)  Declared as: INTEGER
    Define   [set_ic.f, 44]            SET_IC
    Set   [set_ic.f, 100]              SET_IC
    Use   [set_ic.f, 102]              SET_IC
    Use   [set_ic.f, 103]              SET_IC
    Use   [set_ic.f, 104]              SET_IC

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 142]     STORE_A_V_S0
    Set   [conv_dif_v_s.f, 168]        STORE_A_V_S0
    Use   [conv_dif_v_s.f, 178]        STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 190]   STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 195]   STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 238]   STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 243]   STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 269]   STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 274]   STORE_A_V_S0
    Use   [conv_dif_v_s.f, 287]        STORE_A_V_S0
    Use   [conv_dif_v_s.f, 298]        STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 322]   STORE_A_V_S0
    Use Argument   [conv_dif_v_s.f, 327]   STORE_A_V_S0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 810]     STORE_A_V_S1
    Set   [conv_dif_v_s.f, 844]        STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 856]   STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 880]   STORE_A_V_S1
    Set   [conv_dif_v_s.f, 914]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 924]        STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 937]   STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 942]   STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 977]   STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 982]   STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 1004]   STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 1009]   STORE_A_V_S1
    Use   [conv_dif_v_s.f, 1019]       STORE_A_V_S1
    Use   [conv_dif_v_s.f, 1030]       STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 1051]   STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 1056]   STORE_A_V_S1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 406]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 456]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 458]        STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 466]        STORE_A_V_SDC
    Use Argument   [conv_dif_v_s.f, 478]   STORE_A_V_SDC
    Use Argument   [conv_dif_v_s.f, 502]   STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 533]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 541]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 677]        STORE_A_V_SDC

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

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 59]          DIF_W_IS
    Set   [dif_w_is.f, 94]             DIF_W_IS
    Use   [dif_w_is.f, 96]             DIF_W_IS
    Use   [dif_w_is.f, 97]             DIF_W_IS
    Use   [dif_w_is.f, 98]             DIF_W_IS
    Use Argument   [dif_w_is.f, 104]   DIF_W_IS
    Use Argument   [dif_w_is.f, 105]   DIF_W_IS
    Use   [dif_w_is.f, 105]            DIF_W_IS
    Set   [dif_w_is.f, 114]            DIF_W_IS
    Use   [dif_w_is.f, 116]            DIF_W_IS
    Use   [dif_w_is.f, 117]            DIF_W_IS
    Use   [dif_w_is.f, 118]            DIF_W_IS

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 156]     STORE_A_U_G0
    Set   [conv_dif_u_g.f, 202]        STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 250]   STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 251]   STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 254]   STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 255]   STORE_A_U_G0
    Use   [conv_dif_u_g.f, 255]        STORE_A_U_G0
    Use   [conv_dif_u_g.f, 330]        STORE_A_U_G0

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 943]     STORE_A_U_G1
    Set   [conv_dif_u_g.f, 986]        STORE_A_U_G1
    Set   [conv_dif_u_g.f, 1052]       STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1096]   STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1097]   STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1100]   STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1101]   STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1101]       STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1169]       STORE_A_U_G1

J    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 474]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 527]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 529]        STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 603]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 777]        STORE_A_U_GDC

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1695]       DOT_PRODUCT_PAR
    Set   [leq_bicgs.f, 1718]          DOT_PRODUCT_PAR
    Use   [leq_bicgs.f, 1719]          DOT_PRODUCT_PAR
    Set   [leq_bicgs.f, 1746]          DOT_PRODUCT_PAR
    Use   [leq_bicgs.f, 1747]          DOT_PRODUCT_PAR

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1797]       DOT_PRODUCT_PAR2
    Set   [leq_bicgs.f, 1807]          DOT_PRODUCT_PAR2
    Use   [leq_bicgs.f, 1809]          DOT_PRODUCT_PAR2
    Use   [leq_bicgs.f, 1811]          DOT_PRODUCT_PAR2
    Set   [leq_bicgs.f, 1839]          DOT_PRODUCT_PAR2
    Use   [leq_bicgs.f, 1840]          DOT_PRODUCT_PAR2
    Use   [leq_bicgs.f, 1841]          DOT_PRODUCT_PAR2

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 191]        LEQ_BICGS0
    Set   [leq_bicgs.f, 293]           LEQ_BICGS0
    Use   [leq_bicgs.f, 294]           LEQ_BICGS0

J    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leq_bicgs.f, 970]        LEQ_IJSWEEP
    Declare   [leq_bicgs.f, 988]       LEQ_IJSWEEP
    Use   [leq_bicgs.f, 1008]          LEQ_IJSWEEP
    Use   [leq_bicgs.f, 1031]          LEQ_IJSWEEP

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 827]        LEQ_IKSWEEP
    Set   [leq_bicgs.f, 834]           LEQ_IKSWEEP
    Use   [leq_bicgs.f, 836]           LEQ_IKSWEEP
    Use   [leq_bicgs.f, 841]           LEQ_IKSWEEP
    Use   [leq_bicgs.f, 842]           LEQ_IKSWEEP
    Use   [leq_bicgs.f, 843]           LEQ_IKSWEEP
    Use   [leq_bicgs.f, 844]           LEQ_IKSWEEP
    Set   [leq_bicgs.f, 862]           LEQ_IKSWEEP
    Use   [leq_bicgs.f, 863]           LEQ_IKSWEEP
    Use   [leq_bicgs.f, 864]           LEQ_IKSWEEP

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 742]        LEQ_ISWEEP
    Set   [leq_bicgs.f, 749]           LEQ_ISWEEP
    Use   [leq_bicgs.f, 750]           LEQ_ISWEEP
    Use   [leq_bicgs.f, 753]           LEQ_ISWEEP
    Use   [leq_bicgs.f, 754]           LEQ_ISWEEP
    Use   [leq_bicgs.f, 755]           LEQ_ISWEEP
    Use   [leq_bicgs.f, 756]           LEQ_ISWEEP
    Set   [leq_bicgs.f, 770]           LEQ_ISWEEP
    Use   [leq_bicgs.f, 771]           LEQ_ISWEEP
    Use   [leq_bicgs.f, 772]           LEQ_ISWEEP

J    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leq_bicgs.f, 886]        LEQ_JKSWEEP
    Declare   [leq_bicgs.f, 904]       LEQ_JKSWEEP
    Use   [leq_bicgs.f, 924]           LEQ_JKSWEEP
    Use   [leq_bicgs.f, 947]           LEQ_JKSWEEP

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1089]       LEQ_MATVEC
    Set   [leq_bicgs.f, 1133]          LEQ_MATVEC
    Use   [leq_bicgs.f, 1134]          LEQ_MATVEC
    Set   [leq_bicgs.f, 1156]          LEQ_MATVEC
    Use   [leq_bicgs.f, 1157]          LEQ_MATVEC

J    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1238]       LEQ_MSOLVE
    Set   [leq_bicgs.f, 1258]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1259]          LEQ_MSOLVE
    Set   [leq_bicgs.f, 1324]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1325]          LEQ_MSOLVE
    Set   [leq_bicgs.f, 1325]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1325]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1326]          LEQ_MSOLVE
    Set   [leq_bicgs.f, 1344]          LEQ_MSOLVE
    Set   [leq_bicgs.f, 1346]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1348]          LEQ_MSOLVE
    Use Argument   [leq_bicgs.f, 1348]   LEQ_MSOLVE
    Use   [leq_bicgs.f, 1350]          LEQ_MSOLVE

j    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1627]       LEQ_MSOLVE1
    Set   [leq_bicgs.f, 1644]          LEQ_MSOLVE1
    Use   [leq_bicgs.f, 1645]          LEQ_MSOLVE1

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 427]     MPPIC_APPLY_PS_GRAD_PART

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1041]    MPPIC_BC_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1120]    MPPIC_BC_V_S

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1197]    MPPIC_BC_W_S

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 331]     MPPIC_COMP_EULERIAN_VELS_CG
    Set   [pic_routines.f, 339]        MPPIC_COMP_EULERIAN_VELS_CG
    Use   [pic_routines.f, 348]        MPPIC_COMP_EULERIAN_VELS_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 248]     MPPIC_COMP_EULERIAN_VELS_NON_CG
    Set   [pic_routines.f, 256]        MPPIC_COMP_EULERIAN_VELS_NON_CG
    Use   [pic_routines.f, 264]        MPPIC_COMP_EULERIAN_VELS_NON_CG
    Use   [pic_routines.f, 275]        MPPIC_COMP_EULERIAN_VELS_NON_CG
    Use   [pic_routines.f, 275]        MPPIC_COMP_EULERIAN_VELS_NON_CG

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 656]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 715]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 733]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 736]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 765]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 785]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 793]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 809]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 842]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 845]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 852]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 855]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 891]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 892]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 893]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 906]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 908]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 912]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 915]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 917]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 919]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 920]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 925]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 925]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 928]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 928]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 930]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 930]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 932]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 936]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 936]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 938]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 938]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 939]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 943]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 943]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 945]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 945]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 947]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 951]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 952]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 953]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 958]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 958]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 960]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 960]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 962]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 962]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 976]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 976]        MPPIC_COMPUTE_PS_GRAD

J    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 34]      PIC_TIME_MARCH

j    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1305]    WRITE_MPPIC_VEL_S
    Set   [pic_routines.f, 1323]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1325]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1333]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1333]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1338]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1338]       WRITE_MPPIC_VEL_S

j    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1266]    WRITE_NODEDATA
    Set   [pic_routines.f, 1273]       WRITE_NODEDATA
    Use   [pic_routines.f, 1275]       WRITE_NODEDATA
    Use   [pic_routines.f, 1278]       WRITE_NODEDATA

J    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 76]           CALC_TAU_U_S
    Set   [tau_u_s.f, 146]             CALC_TAU_U_S
    Use   [tau_u_s.f, 147]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 177]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 178]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 209]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 210]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 330]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 331]    CALC_TAU_U_S

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc1.f, 262]          SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 376]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 378]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 379]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 380]             SET_BC1_ADJUST_OUTFLOW

J    (Local Variable)  Declared as: INTEGER
    Define   [set_bc1.f, 90]           SET_BC1_JET
    Set   [set_bc1.f, 112]             SET_BC1_JET
    Use   [set_bc1.f, 114]             SET_BC1_JET
    Use   [set_bc1.f, 115]             SET_BC1_JET
    Use   [set_bc1.f, 116]             SET_BC1_JET

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

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

J    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 421]   DES_NEW_PARTICLE_TEST
    Set   [mass_inflow_dem.f, 456]     DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 461]     DES_NEW_PARTICLE_TEST

J1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 2536]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2856]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2861]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2869]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2871]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2876]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2881]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2888]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2893]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2900]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2900]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2901]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2902]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2908]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2915]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2922]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2922]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2925]   GET_DXYZ_FROM_CONTROL_POINTS

J1    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1919]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1995]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 2010]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 2038]   GET_POTENTIAL_CUT_CELLS

J1    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 64]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 533]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 557]   SET_3D_CUT_CELL_FLAGS

J1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_v_s.f, 961]       JJ_BC_V_S
    Declare   [source_v_s.f, 993]      JJ_BC_V_S
    Use   [source_v_s.f, 1010]         JJ_BC_V_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 531]       SOURCE_V_S_BC
    Set   [source_v_s.f, 538]          SOURCE_V_S_BC
    Use   [source_v_s.f, 540]          SOURCE_V_S_BC
    Use   [source_v_s.f, 541]          SOURCE_V_S_BC
    Use   [source_v_s.f, 542]          SOURCE_V_S_BC
    Set   [source_v_s.f, 568]          SOURCE_V_S_BC
    Use   [source_v_s.f, 570]          SOURCE_V_S_BC
    Use   [source_v_s.f, 571]          SOURCE_V_S_BC
    Use   [source_v_s.f, 572]          SOURCE_V_S_BC
    Set   [source_v_s.f, 598]          SOURCE_V_S_BC
    Use   [source_v_s.f, 599]          SOURCE_V_S_BC
    Use   [source_v_s.f, 600]          SOURCE_V_S_BC
    Use   [source_v_s.f, 601]          SOURCE_V_S_BC
    Set   [source_v_s.f, 626]          SOURCE_V_S_BC
    Use   [source_v_s.f, 627]          SOURCE_V_S_BC
    Use   [source_v_s.f, 628]          SOURCE_V_S_BC
    Use   [source_v_s.f, 629]          SOURCE_V_S_BC
    Set   [source_v_s.f, 661]          SOURCE_V_S_BC
    Use   [source_v_s.f, 667]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 695]   SOURCE_V_S_BC
    Set   [source_v_s.f, 701]          SOURCE_V_S_BC
    Use   [source_v_s.f, 707]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 734]   SOURCE_V_S_BC
    Set   [source_v_s.f, 740]          SOURCE_V_S_BC
    Use   [source_v_s.f, 746]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 811]   SOURCE_V_S_BC
    Set   [source_v_s.f, 819]          SOURCE_V_S_BC
    Use   [source_v_s.f, 824]          SOURCE_V_S_BC
    Set   [source_v_s.f, 846]          SOURCE_V_S_BC
    Use   [source_v_s.f, 851]          SOURCE_V_S_BC
    Set   [source_v_s.f, 879]          SOURCE_V_S_BC
    Use   [source_v_s.f, 884]          SOURCE_V_S_BC
    Set   [source_v_s.f, 907]          SOURCE_V_S_BC
    Use   [source_v_s.f, 912]          SOURCE_V_S_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 35]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 62]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 69]      MAKE_ARRAYS_DES

J1    (Local Variable)  Declared as: INTEGER
    Define   [k_epsilon_prop.f, 80]    K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 311]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 313]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 313]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 314]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 314]      K_Epsilon_PROP

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 413]       SOURCE_U_G_BC
    Set   [source_u_g.f, 437]          SOURCE_U_G_BC
    Use   [source_u_g.f, 439]          SOURCE_U_G_BC
    Use   [source_u_g.f, 440]          SOURCE_U_G_BC
    Use   [source_u_g.f, 441]          SOURCE_U_G_BC
    Set   [source_u_g.f, 470]          SOURCE_U_G_BC
    Use   [source_u_g.f, 472]          SOURCE_U_G_BC
    Use   [source_u_g.f, 473]          SOURCE_U_G_BC
    Use   [source_u_g.f, 474]          SOURCE_U_G_BC
    Set   [source_u_g.f, 499]          SOURCE_U_G_BC
    Use   [source_u_g.f, 502]          SOURCE_U_G_BC
    Use   [source_u_g.f, 503]          SOURCE_U_G_BC
    Use   [source_u_g.f, 504]          SOURCE_U_G_BC
    Set   [source_u_g.f, 528]          SOURCE_U_G_BC
    Use   [source_u_g.f, 531]          SOURCE_U_G_BC
    Use   [source_u_g.f, 532]          SOURCE_U_G_BC
    Use   [source_u_g.f, 533]          SOURCE_U_G_BC
    Set   [source_u_g.f, 568]          SOURCE_U_G_BC
    Use   [source_u_g.f, 573]          SOURCE_U_G_BC
    Set   [source_u_g.f, 603]          SOURCE_U_G_BC
    Use   [source_u_g.f, 608]          SOURCE_U_G_BC
    Set   [source_u_g.f, 638]          SOURCE_U_G_BC
    Use   [source_u_g.f, 643]          SOURCE_U_G_BC
    Set   [source_u_g.f, 713]          SOURCE_U_G_BC
    Use   [source_u_g.f, 718]          SOURCE_U_G_BC
    Set   [source_u_g.f, 770]          SOURCE_U_G_BC
    Use   [source_u_g.f, 775]          SOURCE_U_G_BC
    Set   [source_u_g.f, 801]          SOURCE_U_G_BC
    Use   [source_u_g.f, 806]          SOURCE_U_G_BC
    Set   [source_u_g.f, 835]          SOURCE_U_G_BC
    Use   [source_u_g.f, 840]          SOURCE_U_G_BC
    Set   [source_u_g.f, 869]          SOURCE_U_G_BC
    Use   [source_u_g.f, 874]          SOURCE_U_G_BC

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 462]   Calc_mass_flux
    Declare   [check_mass_balance.f, 469]   Calc_mass_flux
    Use Argument   [check_mass_balance.f, 491]   Calc_mass_flux

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 512]   Calc_mass_flux_sp
    Declare   [check_mass_balance.f, 525]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 555]   Calc_mass_flux_sp

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 689]   Calc_mass_flux_spHR
    Declare   [check_mass_balance.f, 704]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 744]   Calc_mass_flux_spHR

J1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 642]   Calc_mass_fluxHR
    Declare   [check_mass_balance.f, 649]   Calc_mass_fluxHR
    Use Argument   [check_mass_balance.f, 668]   Calc_mass_fluxHR

J1    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 70]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 143]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 150]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 152]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 160]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 162]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 178]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 184]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 187]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 208]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 215]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 219]   CHECK_Mass_balance

J1    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 1093]    DIF_PHI_IS
    Set   [conv_dif_phi.f, 1118]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1127]       DIF_PHI_IS
    Set   [conv_dif_phi.f, 1127]       DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 1127]   DIF_PHI_IS
    Use   [conv_dif_phi.f, 1139]       DIF_PHI_IS

J1    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 44]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 232]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 240]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 264]   COMP_MEAN_FIELDS0

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

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 44]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 58]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 59]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 60]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 61]       DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 77]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 78]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 79]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 80]       DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 94]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 97]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 98]       DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 99]       DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 113]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 116]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 117]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 118]      DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 134]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 136]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 137]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 138]      DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 155]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 157]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 158]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 159]      DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 182]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 188]      DIF_PHI_BC_DES

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 59]          DIF_U_IS
    Set   [dif_u_is.f, 84]             DIF_U_IS
    Use   [dif_u_is.f, 90]             DIF_U_IS
    Set   [dif_u_is.f, 90]             DIF_U_IS
    Use Argument   [dif_u_is.f, 90]    DIF_U_IS
    Use   [dif_u_is.f, 99]             DIF_U_IS
    Use   [dif_u_is.f, 120]            DIF_U_IS

J1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_u_s.f, 969]       JJ_BC_U_S
    Declare   [source_u_s.f, 1001]     JJ_BC_U_S
    Use   [source_u_s.f, 1018]         JJ_BC_U_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 536]       SOURCE_U_S_BC
    Set   [source_u_s.f, 543]          SOURCE_U_S_BC
    Use   [source_u_s.f, 545]          SOURCE_U_S_BC
    Use   [source_u_s.f, 546]          SOURCE_U_S_BC
    Use   [source_u_s.f, 547]          SOURCE_U_S_BC
    Set   [source_u_s.f, 573]          SOURCE_U_S_BC
    Use   [source_u_s.f, 575]          SOURCE_U_S_BC
    Use   [source_u_s.f, 576]          SOURCE_U_S_BC
    Use   [source_u_s.f, 577]          SOURCE_U_S_BC
    Set   [source_u_s.f, 601]          SOURCE_U_S_BC
    Use   [source_u_s.f, 604]          SOURCE_U_S_BC
    Use   [source_u_s.f, 605]          SOURCE_U_S_BC
    Use   [source_u_s.f, 606]          SOURCE_U_S_BC
    Set   [source_u_s.f, 629]          SOURCE_U_S_BC
    Use   [source_u_s.f, 632]          SOURCE_U_S_BC
    Use   [source_u_s.f, 633]          SOURCE_U_S_BC
    Use   [source_u_s.f, 634]          SOURCE_U_S_BC
    Set   [source_u_s.f, 667]          SOURCE_U_S_BC
    Use   [source_u_s.f, 673]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 700]   SOURCE_U_S_BC
    Set   [source_u_s.f, 706]          SOURCE_U_S_BC
    Use   [source_u_s.f, 712]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 739]   SOURCE_U_S_BC
    Set   [source_u_s.f, 745]          SOURCE_U_S_BC
    Use   [source_u_s.f, 751]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 816]   SOURCE_U_S_BC
    Set   [source_u_s.f, 824]          SOURCE_U_S_BC
    Use   [source_u_s.f, 829]          SOURCE_U_S_BC
    Set   [source_u_s.f, 851]          SOURCE_U_S_BC
    Use   [source_u_s.f, 856]          SOURCE_U_S_BC
    Set   [source_u_s.f, 885]          SOURCE_U_S_BC
    Use   [source_u_s.f, 890]          SOURCE_U_S_BC
    Set   [source_u_s.f, 914]          SOURCE_U_S_BC
    Use   [source_u_s.f, 919]          SOURCE_U_S_BC

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

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

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

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

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

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 63]          DIF_V_IS
    Set   [dif_v_is.f, 90]             DIF_V_IS
    Use   [dif_v_is.f, 98]             DIF_V_IS
    Use   [dif_v_is.f, 119]            DIF_V_IS

J1    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 61]            BC_PHI
    Set   [bc_phi.f, 75]               BC_PHI
    Use   [bc_phi.f, 77]               BC_PHI
    Use   [bc_phi.f, 78]               BC_PHI
    Use   [bc_phi.f, 79]               BC_PHI
    Set   [bc_phi.f, 101]              BC_PHI
    Use   [bc_phi.f, 103]              BC_PHI
    Use   [bc_phi.f, 104]              BC_PHI
    Use   [bc_phi.f, 105]              BC_PHI
    Set   [bc_phi.f, 124]              BC_PHI
    Use   [bc_phi.f, 128]              BC_PHI
    Use   [bc_phi.f, 129]              BC_PHI
    Use   [bc_phi.f, 130]              BC_PHI
    Set   [bc_phi.f, 148]              BC_PHI
    Use   [bc_phi.f, 152]              BC_PHI
    Use   [bc_phi.f, 153]              BC_PHI
    Use   [bc_phi.f, 154]              BC_PHI
    Set   [bc_phi.f, 175]              BC_PHI
    Use   [bc_phi.f, 176]              BC_PHI
    Use   [bc_phi.f, 177]              BC_PHI
    Use   [bc_phi.f, 178]              BC_PHI
    Set   [bc_phi.f, 199]              BC_PHI
    Use   [bc_phi.f, 200]              BC_PHI
    Use   [bc_phi.f, 201]              BC_PHI
    Use   [bc_phi.f, 202]              BC_PHI
    Set   [bc_phi.f, 234]              BC_PHI
    Use   [bc_phi.f, 240]              BC_PHI
    Set   [bc_phi.f, 353]              BC_PHI
    Use   [bc_phi.f, 359]              BC_PHI
    Set   [bc_phi.f, 407]              BC_PHI
    Use   [bc_phi.f, 413]              BC_PHI

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 467]       SOURCE_W_G_BC
    Set   [source_w_g.f, 491]          SOURCE_W_G_BC
    Use   [source_w_g.f, 494]          SOURCE_W_G_BC
    Use   [source_w_g.f, 495]          SOURCE_W_G_BC
    Use   [source_w_g.f, 496]          SOURCE_W_G_BC
    Set   [source_w_g.f, 520]          SOURCE_W_G_BC
    Use   [source_w_g.f, 523]          SOURCE_W_G_BC
    Use   [source_w_g.f, 524]          SOURCE_W_G_BC
    Use   [source_w_g.f, 525]          SOURCE_W_G_BC
    Set   [source_w_g.f, 555]          SOURCE_W_G_BC
    Use   [source_w_g.f, 556]          SOURCE_W_G_BC
    Use   [source_w_g.f, 557]          SOURCE_W_G_BC
    Use   [source_w_g.f, 558]          SOURCE_W_G_BC
    Set   [source_w_g.f, 584]          SOURCE_W_G_BC
    Use   [source_w_g.f, 585]          SOURCE_W_G_BC
    Use   [source_w_g.f, 586]          SOURCE_W_G_BC
    Use   [source_w_g.f, 587]          SOURCE_W_G_BC
    Set   [source_w_g.f, 622]          SOURCE_W_G_BC
    Use   [source_w_g.f, 627]          SOURCE_W_G_BC
    Set   [source_w_g.f, 657]          SOURCE_W_G_BC
    Use   [source_w_g.f, 662]          SOURCE_W_G_BC
    Set   [source_w_g.f, 692]          SOURCE_W_G_BC
    Use   [source_w_g.f, 697]          SOURCE_W_G_BC
    Set   [source_w_g.f, 782]          SOURCE_W_G_BC
    Use   [source_w_g.f, 787]          SOURCE_W_G_BC
    Set   [source_w_g.f, 868]          SOURCE_W_G_BC
    Use   [source_w_g.f, 873]          SOURCE_W_G_BC
    Set   [source_w_g.f, 899]          SOURCE_W_G_BC
    Use   [source_w_g.f, 904]          SOURCE_W_G_BC
    Set   [source_w_g.f, 932]          SOURCE_W_G_BC
    Use   [source_w_g.f, 937]          SOURCE_W_G_BC
    Set   [source_w_g.f, 965]          SOURCE_W_G_BC
    Use   [source_w_g.f, 970]          SOURCE_W_G_BC

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

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

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

J1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_w_s.f, 1013]      JJ_BC_W_S
    Declare   [source_w_s.f, 1046]     JJ_BC_W_S
    Use   [source_w_s.f, 1063]         JJ_BC_W_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 574]       SOURCE_W_S_BC
    Set   [source_w_s.f, 579]          SOURCE_W_S_BC
    Use   [source_w_s.f, 582]          SOURCE_W_S_BC
    Use   [source_w_s.f, 583]          SOURCE_W_S_BC
    Use   [source_w_s.f, 584]          SOURCE_W_S_BC
    Set   [source_w_s.f, 609]          SOURCE_W_S_BC
    Use   [source_w_s.f, 612]          SOURCE_W_S_BC
    Use   [source_w_s.f, 613]          SOURCE_W_S_BC
    Use   [source_w_s.f, 614]          SOURCE_W_S_BC
    Set   [source_w_s.f, 639]          SOURCE_W_S_BC
    Use   [source_w_s.f, 640]          SOURCE_W_S_BC
    Use   [source_w_s.f, 641]          SOURCE_W_S_BC
    Use   [source_w_s.f, 642]          SOURCE_W_S_BC
    Set   [source_w_s.f, 667]          SOURCE_W_S_BC
    Use   [source_w_s.f, 668]          SOURCE_W_S_BC
    Use   [source_w_s.f, 669]          SOURCE_W_S_BC
    Use   [source_w_s.f, 670]          SOURCE_W_S_BC
    Set   [source_w_s.f, 703]          SOURCE_W_S_BC
    Use   [source_w_s.f, 709]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 736]   SOURCE_W_S_BC
    Set   [source_w_s.f, 742]          SOURCE_W_S_BC
    Use   [source_w_s.f, 748]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 775]   SOURCE_W_S_BC
    Set   [source_w_s.f, 781]          SOURCE_W_S_BC
    Use   [source_w_s.f, 787]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 864]   SOURCE_W_S_BC
    Set   [source_w_s.f, 872]          SOURCE_W_S_BC
    Use   [source_w_s.f, 877]          SOURCE_W_S_BC
    Set   [source_w_s.f, 899]          SOURCE_W_S_BC
    Use   [source_w_s.f, 904]          SOURCE_W_S_BC
    Set   [source_w_s.f, 932]          SOURCE_W_S_BC
    Use   [source_w_s.f, 937]          SOURCE_W_S_BC
    Set   [source_w_s.f, 960]          SOURCE_W_S_BC
    Use   [source_w_s.f, 965]          SOURCE_W_S_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 382]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 626]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 704]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 781]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 796]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 818]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 1359]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1361]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1365]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1429]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1431]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1435]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1508]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1510]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1514]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1575]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1577]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1581]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1637]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1639]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1642]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1648]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1672]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1674]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1678]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1684]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1709]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1711]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1715]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1721]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1742]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1744]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1748]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1754]     RE_INDEX_ARRAYS

J1    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2656]   WRITE_IJK_VALUES

J1    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 405]       SOURCE_V_G_BC
    Set   [source_v_g.f, 429]          SOURCE_V_G_BC
    Use   [source_v_g.f, 431]          SOURCE_V_G_BC
    Use   [source_v_g.f, 432]          SOURCE_V_G_BC
    Use   [source_v_g.f, 433]          SOURCE_V_G_BC
    Set   [source_v_g.f, 462]          SOURCE_V_G_BC
    Use   [source_v_g.f, 464]          SOURCE_V_G_BC
    Use   [source_v_g.f, 465]          SOURCE_V_G_BC
    Use   [source_v_g.f, 466]          SOURCE_V_G_BC
    Set   [source_v_g.f, 494]          SOURCE_V_G_BC
    Use   [source_v_g.f, 495]          SOURCE_V_G_BC
    Use   [source_v_g.f, 496]          SOURCE_V_G_BC
    Use   [source_v_g.f, 497]          SOURCE_V_G_BC
    Set   [source_v_g.f, 523]          SOURCE_V_G_BC
    Use   [source_v_g.f, 524]          SOURCE_V_G_BC
    Use   [source_v_g.f, 525]          SOURCE_V_G_BC
    Use   [source_v_g.f, 526]          SOURCE_V_G_BC
    Set   [source_v_g.f, 560]          SOURCE_V_G_BC
    Use   [source_v_g.f, 565]          SOURCE_V_G_BC
    Set   [source_v_g.f, 595]          SOURCE_V_G_BC
    Use   [source_v_g.f, 600]          SOURCE_V_G_BC
    Set   [source_v_g.f, 630]          SOURCE_V_G_BC
    Use   [source_v_g.f, 635]          SOURCE_V_G_BC
    Set   [source_v_g.f, 703]          SOURCE_V_G_BC
    Use   [source_v_g.f, 708]          SOURCE_V_G_BC
    Set   [source_v_g.f, 760]          SOURCE_V_G_BC
    Use   [source_v_g.f, 765]          SOURCE_V_G_BC
    Set   [source_v_g.f, 791]          SOURCE_V_G_BC
    Use   [source_v_g.f, 796]          SOURCE_V_G_BC
    Set   [source_v_g.f, 824]          SOURCE_V_G_BC
    Use   [source_v_g.f, 829]          SOURCE_V_G_BC
    Set   [source_v_g.f, 857]          SOURCE_V_G_BC
    Use   [source_v_g.f, 862]          SOURCE_V_G_BC

J1    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 59]          DIF_W_IS
    Set   [dif_w_is.f, 86]             DIF_W_IS
    Use   [dif_w_is.f, 94]             DIF_W_IS
    Use   [dif_w_is.f, 114]            DIF_W_IS

J1    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1239]       LEQ_MSOLVE
    Set   [leq_bicgs.f, 1310]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1314]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1324]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1325]          LEQ_MSOLVE
    Set   [leq_bicgs.f, 1335]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1339]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1344]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1346]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1348]          LEQ_MSOLVE

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1041]    MPPIC_BC_U_S
    Set   [pic_routines.f, 1048]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1050]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1051]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1052]       MPPIC_BC_U_S
    Set   [pic_routines.f, 1058]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1060]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1061]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1062]       MPPIC_BC_U_S
    Set   [pic_routines.f, 1068]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1071]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1072]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1073]       MPPIC_BC_U_S
    Set   [pic_routines.f, 1077]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1080]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1081]       MPPIC_BC_U_S
    Use   [pic_routines.f, 1082]       MPPIC_BC_U_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1120]    MPPIC_BC_V_S
    Set   [pic_routines.f, 1127]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1129]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1130]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1131]       MPPIC_BC_V_S
    Set   [pic_routines.f, 1136]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1138]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1139]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1140]       MPPIC_BC_V_S
    Set   [pic_routines.f, 1148]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1149]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1150]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1151]       MPPIC_BC_V_S
    Set   [pic_routines.f, 1158]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1159]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1160]       MPPIC_BC_V_S
    Use   [pic_routines.f, 1161]       MPPIC_BC_V_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1197]    MPPIC_BC_W_S
    Set   [pic_routines.f, 1202]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1205]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1206]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1207]       MPPIC_BC_W_S
    Set   [pic_routines.f, 1211]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1214]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1215]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1216]       MPPIC_BC_W_S
    Set   [pic_routines.f, 1222]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1223]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1224]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1225]       MPPIC_BC_W_S
    Set   [pic_routines.f, 1231]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1232]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1233]       MPPIC_BC_W_S
    Use   [pic_routines.f, 1234]       MPPIC_BC_W_S

J1    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 663]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 759]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 762]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 763]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 777]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 781]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 782]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 783]        MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 803]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 806]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 807]        MPPIC_COMPUTE_PS_GRAD

J2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 2536]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2857]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2861]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2871]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2876]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2881]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2889]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2893]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2902]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2906]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2906]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2907]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2908]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2915]   GET_DXYZ_FROM_CONTROL_POINTS

J2    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1919]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1996]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 2010]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 2038]   GET_POTENTIAL_CUT_CELLS

J2    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 64]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 534]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 557]   SET_3D_CUT_CELL_FLAGS

J2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_v_s.f, 961]       JJ_BC_V_S
    Declare   [source_v_s.f, 993]      JJ_BC_V_S
    Use   [source_v_s.f, 1010]         JJ_BC_V_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 531]       SOURCE_V_S_BC
    Set   [source_v_s.f, 662]          SOURCE_V_S_BC
    Use   [source_v_s.f, 667]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 695]   SOURCE_V_S_BC
    Set   [source_v_s.f, 702]          SOURCE_V_S_BC
    Use   [source_v_s.f, 707]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 734]   SOURCE_V_S_BC
    Set   [source_v_s.f, 741]          SOURCE_V_S_BC
    Use   [source_v_s.f, 746]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 811]   SOURCE_V_S_BC
    Set   [source_v_s.f, 820]          SOURCE_V_S_BC
    Use   [source_v_s.f, 824]          SOURCE_V_S_BC
    Set   [source_v_s.f, 847]          SOURCE_V_S_BC
    Use   [source_v_s.f, 851]          SOURCE_V_S_BC
    Set   [source_v_s.f, 880]          SOURCE_V_S_BC
    Use   [source_v_s.f, 884]          SOURCE_V_S_BC
    Set   [source_v_s.f, 908]          SOURCE_V_S_BC
    Use   [source_v_s.f, 912]          SOURCE_V_S_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 35]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 63]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 69]      MAKE_ARRAYS_DES

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 413]       SOURCE_U_G_BC
    Set   [source_u_g.f, 569]          SOURCE_U_G_BC
    Use   [source_u_g.f, 573]          SOURCE_U_G_BC
    Set   [source_u_g.f, 604]          SOURCE_U_G_BC
    Use   [source_u_g.f, 608]          SOURCE_U_G_BC
    Set   [source_u_g.f, 639]          SOURCE_U_G_BC
    Use   [source_u_g.f, 643]          SOURCE_U_G_BC
    Set   [source_u_g.f, 714]          SOURCE_U_G_BC
    Use   [source_u_g.f, 718]          SOURCE_U_G_BC
    Set   [source_u_g.f, 771]          SOURCE_U_G_BC
    Use   [source_u_g.f, 775]          SOURCE_U_G_BC
    Set   [source_u_g.f, 802]          SOURCE_U_G_BC
    Use   [source_u_g.f, 806]          SOURCE_U_G_BC
    Set   [source_u_g.f, 836]          SOURCE_U_G_BC
    Use   [source_u_g.f, 840]          SOURCE_U_G_BC
    Set   [source_u_g.f, 870]          SOURCE_U_G_BC
    Use   [source_u_g.f, 874]          SOURCE_U_G_BC

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 462]   Calc_mass_flux
    Declare   [check_mass_balance.f, 469]   Calc_mass_flux
    Use Argument   [check_mass_balance.f, 491]   Calc_mass_flux

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 512]   Calc_mass_flux_sp
    Declare   [check_mass_balance.f, 525]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 555]   Calc_mass_flux_sp

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 689]   Calc_mass_flux_spHR
    Declare   [check_mass_balance.f, 704]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 744]   Calc_mass_flux_spHR

J2    (Dummy Argument)  Declared as: INTEGER
    Define   [check_mass_balance.f, 642]   Calc_mass_fluxHR
    Declare   [check_mass_balance.f, 649]   Calc_mass_fluxHR
    Use Argument   [check_mass_balance.f, 668]   Calc_mass_fluxHR

J2    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 70]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 144]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 150]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 152]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 160]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 162]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 179]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 184]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 187]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 209]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 215]   CHECK_Mass_balance
    Use Argument   [check_mass_balance.f, 219]   CHECK_Mass_balance

J2    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 1093]    DIF_PHI_IS
    Set   [conv_dif_phi.f, 1119]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1133]       DIF_PHI_IS
    Set   [conv_dif_phi.f, 1133]       DIF_PHI_IS
    Use Argument   [conv_dif_phi.f, 1133]   DIF_PHI_IS
    Use   [conv_dif_phi.f, 1139]       DIF_PHI_IS

J2    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 44]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 233]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 240]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 264]   COMP_MEAN_FIELDS0

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 44]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 183]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 188]      DIF_PHI_BC_DES

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 59]          DIF_U_IS
    Set   [dif_u_is.f, 85]             DIF_U_IS
    Use   [dif_u_is.f, 93]             DIF_U_IS
    Set   [dif_u_is.f, 93]             DIF_U_IS
    Use Argument   [dif_u_is.f, 93]    DIF_U_IS
    Use   [dif_u_is.f, 99]             DIF_U_IS
    Use   [dif_u_is.f, 120]            DIF_U_IS

J2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_u_s.f, 969]       JJ_BC_U_S
    Declare   [source_u_s.f, 1001]     JJ_BC_U_S
    Use   [source_u_s.f, 1018]         JJ_BC_U_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 536]       SOURCE_U_S_BC
    Set   [source_u_s.f, 668]          SOURCE_U_S_BC
    Use   [source_u_s.f, 673]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 700]   SOURCE_U_S_BC
    Set   [source_u_s.f, 707]          SOURCE_U_S_BC
    Use   [source_u_s.f, 712]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 739]   SOURCE_U_S_BC
    Set   [source_u_s.f, 746]          SOURCE_U_S_BC
    Use   [source_u_s.f, 751]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 816]   SOURCE_U_S_BC
    Set   [source_u_s.f, 825]          SOURCE_U_S_BC
    Use   [source_u_s.f, 829]          SOURCE_U_S_BC
    Set   [source_u_s.f, 852]          SOURCE_U_S_BC
    Use   [source_u_s.f, 856]          SOURCE_U_S_BC
    Set   [source_u_s.f, 886]          SOURCE_U_S_BC
    Use   [source_u_s.f, 890]          SOURCE_U_S_BC
    Set   [source_u_s.f, 915]          SOURCE_U_S_BC
    Use   [source_u_s.f, 919]          SOURCE_U_S_BC

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

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

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

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

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 63]          DIF_V_IS
    Set   [dif_v_is.f, 91]             DIF_V_IS
    Use   [dif_v_is.f, 98]             DIF_V_IS
    Use   [dif_v_is.f, 119]            DIF_V_IS

J2    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 61]            BC_PHI
    Set   [bc_phi.f, 235]              BC_PHI
    Use   [bc_phi.f, 240]              BC_PHI
    Set   [bc_phi.f, 354]              BC_PHI
    Use   [bc_phi.f, 359]              BC_PHI
    Set   [bc_phi.f, 408]              BC_PHI
    Use   [bc_phi.f, 413]              BC_PHI

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 467]       SOURCE_W_G_BC
    Set   [source_w_g.f, 623]          SOURCE_W_G_BC
    Use   [source_w_g.f, 627]          SOURCE_W_G_BC
    Set   [source_w_g.f, 658]          SOURCE_W_G_BC
    Use   [source_w_g.f, 662]          SOURCE_W_G_BC
    Set   [source_w_g.f, 693]          SOURCE_W_G_BC
    Use   [source_w_g.f, 697]          SOURCE_W_G_BC
    Set   [source_w_g.f, 783]          SOURCE_W_G_BC
    Use   [source_w_g.f, 787]          SOURCE_W_G_BC
    Set   [source_w_g.f, 869]          SOURCE_W_G_BC
    Use   [source_w_g.f, 873]          SOURCE_W_G_BC
    Set   [source_w_g.f, 900]          SOURCE_W_G_BC
    Use   [source_w_g.f, 904]          SOURCE_W_G_BC
    Set   [source_w_g.f, 933]          SOURCE_W_G_BC
    Use   [source_w_g.f, 937]          SOURCE_W_G_BC
    Set   [source_w_g.f, 966]          SOURCE_W_G_BC
    Use   [source_w_g.f, 970]          SOURCE_W_G_BC

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

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

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

J2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_w_s.f, 1013]      JJ_BC_W_S
    Declare   [source_w_s.f, 1046]     JJ_BC_W_S
    Use   [source_w_s.f, 1063]         JJ_BC_W_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 574]       SOURCE_W_S_BC
    Set   [source_w_s.f, 704]          SOURCE_W_S_BC
    Use   [source_w_s.f, 709]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 736]   SOURCE_W_S_BC
    Set   [source_w_s.f, 743]          SOURCE_W_S_BC
    Use   [source_w_s.f, 748]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 775]   SOURCE_W_S_BC
    Set   [source_w_s.f, 782]          SOURCE_W_S_BC
    Use   [source_w_s.f, 787]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 864]   SOURCE_W_S_BC
    Set   [source_w_s.f, 873]          SOURCE_W_S_BC
    Use   [source_w_s.f, 877]          SOURCE_W_S_BC
    Set   [source_w_s.f, 900]          SOURCE_W_S_BC
    Use   [source_w_s.f, 904]          SOURCE_W_S_BC
    Set   [source_w_s.f, 933]          SOURCE_W_S_BC
    Use   [source_w_s.f, 937]          SOURCE_W_S_BC
    Set   [source_w_s.f, 961]          SOURCE_W_S_BC
    Use   [source_w_s.f, 965]          SOURCE_W_S_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 382]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 627]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 705]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 782]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 797]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 818]      RE_INDEX_ARRAYS
    Set   [set_increments.f, 1360]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1361]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1365]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1430]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1431]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1435]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1509]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1510]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1514]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1576]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1577]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1581]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1638]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1639]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1642]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1673]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1674]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1678]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1710]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1711]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1715]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1743]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1744]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1748]     RE_INDEX_ARRAYS

J2    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2656]   WRITE_IJK_VALUES

J2    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 405]       SOURCE_V_G_BC
    Set   [source_v_g.f, 561]          SOURCE_V_G_BC
    Use   [source_v_g.f, 565]          SOURCE_V_G_BC
    Set   [source_v_g.f, 596]          SOURCE_V_G_BC
    Use   [source_v_g.f, 600]          SOURCE_V_G_BC
    Set   [source_v_g.f, 631]          SOURCE_V_G_BC
    Use   [source_v_g.f, 635]          SOURCE_V_G_BC
    Set   [source_v_g.f, 704]          SOURCE_V_G_BC
    Use   [source_v_g.f, 708]          SOURCE_V_G_BC
    Set   [source_v_g.f, 761]          SOURCE_V_G_BC
    Use   [source_v_g.f, 765]          SOURCE_V_G_BC
    Set   [source_v_g.f, 792]          SOURCE_V_G_BC
    Use   [source_v_g.f, 796]          SOURCE_V_G_BC
    Set   [source_v_g.f, 825]          SOURCE_V_G_BC
    Use   [source_v_g.f, 829]          SOURCE_V_G_BC
    Set   [source_v_g.f, 858]          SOURCE_V_G_BC
    Use   [source_v_g.f, 862]          SOURCE_V_G_BC

J2    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 59]          DIF_W_IS
    Set   [dif_w_is.f, 87]             DIF_W_IS
    Use   [dif_w_is.f, 94]             DIF_W_IS
    Use   [dif_w_is.f, 114]            DIF_W_IS

J2    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1239]       LEQ_MSOLVE
    Set   [leq_bicgs.f, 1312]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1314]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1325]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1325]          LEQ_MSOLVE
    Set   [leq_bicgs.f, 1337]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1339]          LEQ_MSOLVE

J2    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1041]    MPPIC_BC_U_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1120]    MPPIC_BC_V_S

J2    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1197]    MPPIC_BC_W_S

J23    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1552]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1660]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1665]   SET_GHOST_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 1709]   SET_GHOST_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 1714]   SET_GHOST_CELL_FLAGS

J_CELL    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 37]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 124]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 130]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 131]     MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 136]   MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 144]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 145]     MAKE_ARRAYS_DES

J_CELL    (Local Variable)  Declared as: INTEGER
    Define   [des_time_march.f, 50]    DES_TIME_MARCH

J_CELL    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 816]   CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 836]     CHECK_IF_PARCEL_OVELAPS_STL
    Use Argument   [pic_bc_routines.f, 840]   CHECK_IF_PARCEL_OVELAPS_STL
    Use   [pic_bc_routines.f, 858]     CHECK_IF_PARCEL_OVELAPS_STL
    Use   [pic_bc_routines.f, 859]     CHECK_IF_PARCEL_OVELAPS_STL

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

J_masstr_MAX    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 143]    CHECK_DATA_30
    Set   [check_data_30.f, 594]       CHECK_DATA_30
    Use   [check_data_30.f, 702]       CHECK_DATA_30

J_MAX_g    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 90]     CHECK_DATA_30
    Set   [check_data_30.f, 172]       CHECK_DATA_30
    Set   [check_data_30.f, 392]       CHECK_DATA_30
    Use   [check_data_30.f, 722]       CHECK_DATA_30

J_MAX_s    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 115]    CHECK_DATA_30
    Set   [check_data_30.f, 185]       CHECK_DATA_30
    Set   [check_data_30.f, 501]       CHECK_DATA_30
    Use   [check_data_30.f, 741]       CHECK_DATA_30

J_MIN_g    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 87]     CHECK_DATA_30
    Set   [check_data_30.f, 169]       CHECK_DATA_30
    Set   [check_data_30.f, 387]       CHECK_DATA_30
    Use   [check_data_30.f, 720]       CHECK_DATA_30

J_MIN_s    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 111]    CHECK_DATA_30
    Set   [check_data_30.f, 182]       CHECK_DATA_30
    Set   [check_data_30.f, 496]       CHECK_DATA_30
    Use   [check_data_30.f, 739]       CHECK_DATA_30

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

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

J_n    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 416]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 462]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 468]   CHECK_BC_GEOMETRY_FLOW
    Use   [check_bc_geometry.f, 472]   CHECK_BC_GEOMETRY_FLOW

J_n    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 227]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 271]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 275]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 280]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 283]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 291]   CHECK_BC_GEOMETRY_WALL
    Use   [check_bc_geometry.f, 294]   CHECK_BC_GEOMETRY_WALL

J_n    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 352]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 407]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 413]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 414]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 424]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 430]       SET_DEM_BCMI_IJK

J_N    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3070]         SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3097]   SETUP_VTK_REGION
    Use   [vtk_out.f, 3159]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3218]            SETUP_VTK_REGION

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

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

J_n    (Local Variable)  Declared as: INTEGER
    Define   [check_initial_conditions.f, 130]   CHECK_IC_GEOMETRY
    Set   [check_initial_conditions.f, 266]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 270]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 274]   CHECK_IC_GEOMETRY
    Use   [check_initial_conditions.f, 277]   CHECK_IC_GEOMETRY

J_n    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 42]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 103]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 109]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 110]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 120]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 126]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 142]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 153]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 153]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 161]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 167]       SET_BC_DEM_MO

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

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3386]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3644]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3646]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3648]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3648]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3652]   ADJUST_IJK_SIZE

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4101]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4198]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4200]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4202]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4202]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4206]   REPORT_BEST_IJK_SIZE

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4927]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5060]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5062]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5064]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5064]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5068]   REPORT_BEST_IJK_SIZE0

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 378]   RE_INDEX_ARRAYS

J_OFFSET    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2652]   WRITE_IJK_VALUES

J_RXNSUM_MAX    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 131]    CHECK_DATA_30
    Set   [check_data_30.f, 553]       CHECK_DATA_30
    Use   [check_data_30.f, 690]       CHECK_DATA_30

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

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

J_s    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 416]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 461]   CHECK_BC_GEOMETRY_FLOW
    Set   [check_bc_geometry.f, 465]   CHECK_BC_GEOMETRY_FLOW
    Use   [check_bc_geometry.f, 465]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 467]   CHECK_BC_GEOMETRY_FLOW
    Use   [check_bc_geometry.f, 471]   CHECK_BC_GEOMETRY_FLOW

J_s    (Local Variable)  Declared as: INTEGER
    Define   [check_bc_geometry.f, 227]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 270]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 273]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 274]   CHECK_BC_GEOMETRY_WALL
    Use   [check_bc_geometry.f, 274]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 279]   CHECK_BC_GEOMETRY_WALL
    Set   [check_bc_geometry.f, 282]   CHECK_BC_GEOMETRY_WALL
    Use Argument   [check_bc_geometry.f, 290]   CHECK_BC_GEOMETRY_WALL
    Use   [check_bc_geometry.f, 293]   CHECK_BC_GEOMETRY_WALL

J_s    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 352]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 407]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 413]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 414]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 424]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 430]       SET_DEM_BCMI_IJK

J_S    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3070]         SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3095]   SETUP_VTK_REGION
    Set   [vtk_out.f, 3096]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3096]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3159]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3218]            SETUP_VTK_REGION

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

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

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

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

J_s    (Local Variable)  Declared as: INTEGER
    Define   [check_initial_conditions.f, 130]   CHECK_IC_GEOMETRY
    Set   [check_initial_conditions.f, 265]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 268]   CHECK_IC_GEOMETRY
    Set   [check_initial_conditions.f, 269]   CHECK_IC_GEOMETRY
    Use   [check_initial_conditions.f, 269]   CHECK_IC_GEOMETRY
    Use Argument   [check_initial_conditions.f, 273]   CHECK_IC_GEOMETRY
    Use   [check_initial_conditions.f, 276]   CHECK_IC_GEOMETRY

J_s    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 42]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 103]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 109]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 109]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 109]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 110]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 110]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 110]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 120]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 126]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 142]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 153]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 153]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 161]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 167]       SET_BC_DEM_MO

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

J_SIZE    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 419]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 1944]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1947]     RE_INDEX_ARRAYS

J_SLICE    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3072]         SETUP_VTK_REGION
    Set   [vtk_out.f, 3118]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3162]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3221]            SETUP_VTK_REGION

J_TMP    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 3071]         SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3117]   SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3118]   SETUP_VTK_REGION

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

JC    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 50]   CALC_INTERP_WEIGHTS1
    Set   [calc_interp_weights.f, 101]   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, 105]   CALC_INTERP_WEIGHTS1

JCUR    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 46]   COMP_MEAN_FIELDS0

JDEBUG    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [leq_gmres.f, 166]        LEQ_GMRES0
    Declare   [leq_gmres.f, 167]       LEQ_GMRES0
    Set   [leq_gmres.f, 167]           LEQ_GMRES0
    Use   [leq_gmres.f, 267]           LEQ_GMRES0
    Use   [leq_gmres.f, 396]           LEQ_GMRES0
    Use   [leq_gmres.f, 481]           LEQ_GMRES0
    Use   [leq_gmres.f, 549]           LEQ_GMRES0
    Use   [leq_gmres.f, 570]           LEQ_GMRES0

jendl    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 689]        leq_check
    Set   [leq_gmres.f, 699]           leq_check
    Use   [leq_gmres.f, 711]           leq_check

JFLUID    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 334]   PIC_MI_BC
    Set   [pic_bc_routines.f, 392]     PIC_MI_BC
    Use   [pic_bc_routines.f, 397]     PIC_MI_BC
    Use   [pic_bc_routines.f, 397]     PIC_MI_BC
    Use   [pic_bc_routines.f, 403]     PIC_MI_BC
    Use   [pic_bc_routines.f, 476]     PIC_MI_BC

JJ    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1918]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 2010]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 2012]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 2038]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 2040]   GET_POTENTIAL_CUT_CELLS

JJ    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 64]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 557]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 559]   SET_3D_CUT_CELL_FLAGS

JJ    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 35]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 69]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 71]      MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 72]      MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 154]     MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 156]   MAKE_ARRAYS_DES

JJ    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 43]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 142]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 144]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 147]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 182]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 185]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 240]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 243]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 264]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 266]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 339]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 341]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 343]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 344]   COMP_MEAN_FIELDS0

JJ    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 468]   DRAG_WEIGHTFACTOR
    Set   [comp_mean_fields0.f, 488]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 490]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 490]   DRAG_WEIGHTFACTOR
    Set   [comp_mean_fields0.f, 500]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 502]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 502]   DRAG_WEIGHTFACTOR

jj    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 597]       gatherWriteSpx_netcdf
    Set   [write_spx1.f, 610]          gatherWriteSpx_netcdf
    Use   [write_spx1.f, 613]          gatherWriteSpx_netcdf

jj    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 641]       gatherWriteSpx_netcdf_int
    Set   [write_spx1.f, 654]          gatherWriteSpx_netcdf_int
    Use   [write_spx1.f, 657]          gatherWriteSpx_netcdf_int

JJ    (Local Variable)  Declared as: INTEGER
    Define   [des_time_march.f, 50]    DES_TIME_MARCH

JJ    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 43]      DRAG_GS_DES0
    Set   [drag_gs_des0.f, 122]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 124]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 125]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 126]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 127]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 130]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 136]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 137]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 138]        DRAG_GS_DES0
    Use   [drag_gs_des0.f, 139]        DRAG_GS_DES0

JJ    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 246]     DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 333]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 335]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 336]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 337]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 338]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 340]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 346]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 347]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 348]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 349]        DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 397]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 402]        DRAG_GS_GAS0

JJ    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 502]     DRAG_INTERPOLATION
    Set   [drag_gs_des0.f, 524]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 526]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 526]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 527]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 527]        DRAG_INTERPOLATION
    Set   [drag_gs_des0.f, 537]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 539]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 539]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 540]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 540]        DRAG_INTERPOLATION

jj    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 690]        leq_check
    Set   [leq_gmres.f, 742]           leq_check
    Use   [leq_gmres.f, 745]           leq_check
    Use   [leq_gmres.f, 745]           leq_check

JJ    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 192]        LEQ_GMRES0
    Set   [leq_gmres.f, 249]           LEQ_GMRES0
    Use   [leq_gmres.f, 251]           LEQ_GMRES0
    Set   [leq_gmres.f, 284]           LEQ_GMRES0
    Use   [leq_gmres.f, 286]           LEQ_GMRES0
    Set   [leq_gmres.f, 302]           LEQ_GMRES0
    Use   [leq_gmres.f, 304]           LEQ_GMRES0
    Set   [leq_gmres.f, 329]           LEQ_GMRES0
    Use   [leq_gmres.f, 331]           LEQ_GMRES0
    Set   [leq_gmres.f, 346]           LEQ_GMRES0
    Use   [leq_gmres.f, 348]           LEQ_GMRES0
    Set   [leq_gmres.f, 389]           LEQ_GMRES0
    Use   [leq_gmres.f, 390]           LEQ_GMRES0
    Use   [leq_gmres.f, 390]           LEQ_GMRES0
    Use   [leq_gmres.f, 390]           LEQ_GMRES0
    Set   [leq_gmres.f, 439]           LEQ_GMRES0
    Use   [leq_gmres.f, 441]           LEQ_GMRES0
    Set   [leq_gmres.f, 474]           LEQ_GMRES0
    Use   [leq_gmres.f, 475]           LEQ_GMRES0
    Use   [leq_gmres.f, 475]           LEQ_GMRES0
    Use   [leq_gmres.f, 475]           LEQ_GMRES0
    Set   [leq_gmres.f, 519]           LEQ_GMRES0
    Use   [leq_gmres.f, 521]           LEQ_GMRES0
    Set   [leq_gmres.f, 533]           LEQ_GMRES0
    Use   [leq_gmres.f, 535]           LEQ_GMRES0
    Set   [leq_gmres.f, 576]           LEQ_GMRES0
    Use   [leq_gmres.f, 578]           LEQ_GMRES0

jj    (Local Variable)  Declared as: INTEGER
    Define   [neighbour.f, 29]         NEIGHBOUR
    Set   [neighbour.f, 64]            NEIGHBOUR
    Use   [neighbour.f, 76]            NEIGHBOUR
    Use   [neighbour.f, 82]            NEIGHBOUR

JJ    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 32]           NSQUARE
    Set   [nsquare.f, 61]              NSQUARE
    Set   [nsquare.f, 75]              NSQUARE
    Use   [nsquare.f, 76]              NSQUARE
    Set   [nsquare.f, 78]              NSQUARE
    Use   [nsquare.f, 79]              NSQUARE
    Use   [nsquare.f, 99]              NSQUARE

jj    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 382]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 1365]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1366]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1435]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1436]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1514]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1515]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1581]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1582]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1642]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1643]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1646]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1648]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1678]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1679]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1682]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1684]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1715]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1716]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1719]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1721]     RE_INDEX_ARRAYS
    Set   [set_increments.f, 1748]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1749]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1752]     RE_INDEX_ARRAYS
    Use   [set_increments.f, 1754]     RE_INDEX_ARRAYS

jj    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2656]   WRITE_IJK_VALUES

JJ    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 332]     MPPIC_COMP_EULERIAN_VELS_CG

JJ    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 249]     MPPIC_COMP_EULERIAN_VELS_NON_CG

jj    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 663]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 855]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 857]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 858]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 859]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 860]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 879]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 880]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 881]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 882]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 892]        MPPIC_COMPUTE_PS_GRAD

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

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

jjj    (Local Variable)  Declared as: INTEGER
    Define   [neighbour.f, 29]         NEIGHBOUR
    Set   [neighbour.f, 56]            NEIGHBOUR
    Set   [neighbour.f, 67]            NEIGHBOUR
    Set   [neighbour.f, 72]            NEIGHBOUR
    Use   [neighbour.f, 76]            NEIGHBOUR
    Set   [neighbour.f, 79]            NEIGHBOUR
    Use   [neighbour.f, 82]            NEIGHBOUR

JK    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1239]       LEQ_MSOLVE
    Set   [leq_bicgs.f, 1318]          LEQ_MSOLVE
    Use Argument   [leq_bicgs.f, 1319]   LEQ_MSOLVE
    Use   [leq_bicgs.f, 1320]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1322]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1324]          LEQ_MSOLVE

jlistsize    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4073]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4208]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4210]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4211]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4221]   REPORT_BEST_IJK_SIZE

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1404]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Set   [get_cut_cell_flags.f, 1441]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1445]   SET_3D_CUT_CELL_TREATMENT_FLAGS

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_g.f, 93]     CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 218]       CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 243]   CG_SOURCE_W_G
    Use Argument   [CG_source_w_g.f, 244]   CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 273]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 281]       CG_SOURCE_W_G

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_granular_energy.f, 631]   SOURCE_GRANULAR_ENERGY_GD
    Set   [source_granular_energy.f, 663]   SOURCE_GRANULAR_ENERGY_GD
    Use Argument   [source_granular_energy.f, 754]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 767]   SOURCE_GRANULAR_ENERGY_GD
    Use   [source_granular_energy.f, 768]   SOURCE_GRANULAR_ENERGY_GD

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [k_epsilon_prop.f, 78]    K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 192]      K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 215]   K_Epsilon_PROP
    Use Argument   [k_epsilon_prop.f, 231]   K_Epsilon_PROP

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 414]       SOURCE_U_G_BC
    Set   [source_u_g.f, 649]          SOURCE_U_G_BC
    Use   [source_u_g.f, 675]          SOURCE_U_G_BC
    Use   [source_u_g.f, 676]          SOURCE_U_G_BC
    Set   [source_u_g.f, 724]          SOURCE_U_G_BC
    Use   [source_u_g.f, 740]          SOURCE_U_G_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 197]     CONV_DIF_PHI0
    Set   [conv_dif_phi.f, 332]        CONV_DIF_PHI0
    Use Argument   [conv_dif_phi.f, 335]   CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 335]        CONV_DIF_PHI0
    Use Argument   [conv_dif_phi.f, 341]   CONV_DIF_PHI0
    Use   [conv_dif_phi.f, 341]        CONV_DIF_PHI0

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 817]     CONV_DIF_PHI1
    Set   [conv_dif_phi.f, 969]        CONV_DIF_PHI1
    Use Argument   [conv_dif_phi.f, 972]   CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 972]        CONV_DIF_PHI1
    Use Argument   [conv_dif_phi.f, 978]   CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 978]        CONV_DIF_PHI1

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 145]     STORE_A_U_S0
    Set   [conv_dif_u_s.f, 282]        STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 293]   STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 294]   STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 298]   STORE_A_U_S0
    Use Argument   [conv_dif_u_s.f, 299]   STORE_A_U_S0
    Use   [conv_dif_u_s.f, 300]        STORE_A_U_S0

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 812]     STORE_A_U_S1
    Set   [conv_dif_u_s.f, 1013]       STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 1023]   STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 1024]   STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 1028]   STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 1029]   STORE_A_U_S1
    Use   [conv_dif_u_s.f, 1030]       STORE_A_U_S1

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 411]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 676]        STORE_A_U_SDC

JM    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 45]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 217]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 218]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 219]      DIF_PHI_BC_DES

JM    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 290]   DIF_PHI_BC_DES_CG
    Set   [dif_phi_bc_des.f, 342]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 343]      DIF_PHI_BC_DES_CG
    Use   [dif_phi_bc_des.f, 344]      DIF_PHI_BC_DES_CG

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_g.f, 79]           CALC_TAU_W_G
    Set   [tau_w_g.f, 126]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 164]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 165]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 190]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 191]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 364]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 365]    CALC_TAU_W_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1012]      JJ_BC_U_S
    Set   [source_u_s.f, 1025]         JJ_BC_U_S
    Use   [source_u_s.f, 1083]         JJ_BC_U_S
    Use   [source_u_s.f, 1084]         JJ_BC_U_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 537]       SOURCE_U_S_BC
    Set   [source_u_s.f, 757]          SOURCE_U_S_BC
    Use   [source_u_s.f, 783]          SOURCE_U_S_BC
    Use   [source_u_s.f, 784]          SOURCE_U_S_BC

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

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

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_u_s.f, 113]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 155]       CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 196]   CALC_IA_MOMSOURCE_U_S
    Use Argument   [kintheory_u_s.f, 197]   CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 199]       CALC_IA_MOMSOURCE_U_S

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 156]     STORE_A_W_G0
    Set   [conv_dif_w_g.f, 325]        STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 336]   STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 337]   STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 340]   STORE_A_W_G0
    Use Argument   [conv_dif_w_g.f, 341]   STORE_A_W_G0
    Use   [conv_dif_w_g.f, 341]        STORE_A_W_G0

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 917]     STORE_A_W_G1
    Set   [conv_dif_w_g.f, 1135]       STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1146]   STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1147]   STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1150]   STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 1151]   STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1151]       STORE_A_W_G1

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 462]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 758]        STORE_A_W_GDC

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 75]           CALC_TAU_W_S
    Set   [tau_w_s.f, 136]             CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 173]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 174]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 203]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 204]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 365]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 366]    CALC_TAU_W_S

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

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 453]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 501]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 510]           GET_3D_ALPHA_V_CUT_CELL

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 879]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 925]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 934]           GET_3D_ALPHA_W_CUT_CELL

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 91]     CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 214]       CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 233]   CG_SOURCE_U_G
    Use Argument   [CG_source_u_g.f, 234]   CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 274]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 282]       CG_SOURCE_U_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 414]    CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 472]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 490]       CG_SOURCE_U_G_BC
    Set   [CG_source_u_g.f, 586]       CG_SOURCE_U_G_BC
    Use   [CG_source_u_g.f, 590]       CG_SOURCE_U_G_BC

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 62]            BC_PHI
    Set   [bc_phi.f, 246]              BC_PHI
    Use   [bc_phi.f, 302]              BC_PHI
    Use   [bc_phi.f, 303]              BC_PHI

JM    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 504]           BC_PHI_CG
    Set   [bc_phi.f, 539]              BC_PHI_CG
    Use   [bc_phi.f, 620]              BC_PHI_CG
    Use   [bc_phi.f, 621]              BC_PHI_CG

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 468]       SOURCE_W_G_BC
    Set   [source_w_g.f, 704]          SOURCE_W_G_BC
    Use   [source_w_g.f, 765]          SOURCE_W_G_BC
    Use   [source_w_g.f, 766]          SOURCE_W_G_BC
    Set   [source_w_g.f, 794]          SOURCE_W_G_BC
    Use   [source_w_g.f, 847]          SOURCE_W_G_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 146]     STORE_A_W_S0
    Set   [conv_dif_w_s.f, 285]        STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 295]   STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 296]   STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 300]   STORE_A_W_S0
    Use Argument   [conv_dif_w_s.f, 301]   STORE_A_W_S0
    Use   [conv_dif_w_s.f, 302]        STORE_A_W_S0

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 803]     STORE_A_W_S1
    Set   [conv_dif_w_s.f, 1004]       STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 1014]   STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 1015]   STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 1019]   STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 1020]   STORE_A_W_S1
    Use   [conv_dif_w_s.f, 1021]       STORE_A_W_S1

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 406]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 670]        STORE_A_W_SDC

JM    (Local Variable)  Declared as: INTEGER
    Define   [check_data_20.f, 56]     CHECK_DATA_20
    Use Argument   [check_data_20.f, 102]   CHECK_DATA_20

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

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

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

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 37]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 84]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 88]   GET_CUT_CELL_VOLUME_AND_AREAS

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 163]     STORE_A_V_G0
    Set   [conv_dif_v_g.f, 337]        STORE_A_V_G0

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 933]     STORE_A_V_G1
    Set   [conv_dif_v_g.f, 1158]       STORE_A_V_G1

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 477]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 775]        STORE_A_V_GDC

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

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2628]       init_mu_s
    Set   [calc_mu_s.f, 2686]          init_mu_s
    Use Argument   [calc_mu_s.f, 2715]   init_mu_s
    Use Argument   [calc_mu_s.f, 2756]   init_mu_s
    Use Argument   [calc_mu_s.f, 2913]   init_mu_s
    Use Argument   [calc_mu_s.f, 2954]   init_mu_s
    Use   [calc_mu_s.f, 3047]          init_mu_s
    Use   [calc_mu_s.f, 3048]          init_mu_s
    Use   [calc_mu_s.f, 3049]          init_mu_s

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_g.f, 73]           CALC_TAU_U_G
    Set   [tau_u_g.f, 123]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 156]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 157]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 179]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 180]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 312]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 313]    CALC_TAU_U_G

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 353]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 365]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 369]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 372]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 374]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 376]    GET_CELL_NODE_COORDINATES

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 35]   GET_CONNECTIVITY
    Set   [get_connectivity.f, 59]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 63]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 66]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 68]     GET_CONNECTIVITY
    Use   [get_connectivity.f, 70]     GET_CONNECTIVITY

JM    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 543]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 555]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 559]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 562]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 564]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 566]    GET_GLOBAL_CELL_NODE_COORDINATES

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1057]      JJ_BC_W_S
    Set   [source_w_s.f, 1070]         JJ_BC_W_S
    Use   [source_w_s.f, 1177]         JJ_BC_W_S
    Use   [source_w_s.f, 1178]         JJ_BC_W_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 575]       SOURCE_W_S_BC
    Set   [source_w_s.f, 794]          SOURCE_W_S_BC
    Use   [source_w_s.f, 855]          SOURCE_W_S_BC
    Use   [source_w_s.f, 856]          SOURCE_W_S_BC

JM    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_des.f, 46]       DIF_PHI_DES
    Set   [dif_phi_des.f, 107]         DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 109]   DIF_PHI_DES
    Use   [dif_phi_des.f, 109]         DIF_PHI_DES
    Use Argument   [dif_phi_des.f, 112]   DIF_PHI_DES
    Use   [dif_phi_des.f, 112]         DIF_PHI_DES

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 145]     STORE_A_V_S0
    Set   [conv_dif_v_s.f, 287]        STORE_A_V_S0

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 813]     STORE_A_V_S1
    Set   [conv_dif_v_s.f, 1019]       STORE_A_V_S1

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 409]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 677]        STORE_A_V_SDC

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

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 160]     STORE_A_U_G0
    Set   [conv_dif_u_g.f, 330]        STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 341]   STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 342]   STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 345]   STORE_A_U_G0
    Use Argument   [conv_dif_u_g.f, 346]   STORE_A_U_G0
    Use   [conv_dif_u_g.f, 346]        STORE_A_U_G0

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 946]     STORE_A_U_G1
    Set   [conv_dif_u_g.f, 1169]       STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1181]   STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1182]   STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1185]   STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 1186]   STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1186]       STORE_A_U_G1

JM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 477]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 777]        STORE_A_U_GDC

JM    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1042]    MPPIC_BC_U_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1120]    MPPIC_BC_V_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1198]    MPPIC_BC_W_S

JM    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 76]           CALC_TAU_U_S
    Set   [tau_u_s.f, 147]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 180]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 181]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 212]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 213]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 333]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 334]    CALC_TAU_U_S

JM_COPY    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 364]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 854]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 870]      RE_INDEX_ARRAYS

JM_COPY    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2638]   WRITE_IJK_VALUES

JMINUS1    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 38]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 131]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 154]     MAKE_ARRAYS_DES

JMINUS1    (Local Variable)  Declared as: INTEGER
    Define   [des_time_march.f, 51]    DES_TIME_MARCH

JMINUS1    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 817]   CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 859]     CHECK_IF_PARCEL_OVELAPS_STL
    Use   [pic_bc_routines.f, 865]     CHECK_IF_PARCEL_OVELAPS_STL

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 482]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 569]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 570]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 570]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 570]        CONV_DIF_PHI_DC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 414]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 555]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 556]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 556]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 556]        STORE_A_U_SDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 465]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 616]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 617]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 617]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 617]        STORE_A_W_GDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 409]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 551]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 552]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 552]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 552]        STORE_A_W_SDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 480]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 617]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 618]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 618]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 618]        STORE_A_V_GDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 412]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 552]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 553]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 553]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 553]        STORE_A_V_SDC

JMMM    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 480]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 620]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 621]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 621]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 621]        STORE_A_U_GDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 482]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 570]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 670]        CONV_DIF_PHI_DC

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

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 465]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 617]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 766]        STORE_A_W_GDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 409]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 552]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 677]        STORE_A_W_SDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 480]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 618]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 781]        STORE_A_V_GDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 412]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 553]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 682]        STORE_A_V_SDC

JMMM4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 480]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 621]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 785]        STORE_A_U_GDC

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

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

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

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

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

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

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

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

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

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

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

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

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

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

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_flags.f, 1404]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Set   [get_cut_cell_flags.f, 1437]   SET_3D_CUT_CELL_TREATMENT_FLAGS
    Use   [get_cut_cell_flags.f, 1449]   SET_3D_CUT_CELL_TREATMENT_FLAGS

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_g.f, 93]     CG_SOURCE_W_G
    Set   [CG_source_w_g.f, 277]       CG_SOURCE_W_G
    Use   [CG_source_w_g.f, 283]       CG_SOURCE_W_G

JP    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_v_s.f, 113]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 151]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 196]       CALC_IA_MOMSOURCE_V_S

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

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

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

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

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 34]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 87]            GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 93]            GET_3D_ALPHA_U_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 453]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 505]           GET_3D_ALPHA_V_CUT_CELL
    Use   [get_alpha.f, 511]           GET_3D_ALPHA_V_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_alpha.f, 879]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 929]           GET_3D_ALPHA_W_CUT_CELL
    Use   [get_alpha.f, 935]           GET_3D_ALPHA_W_CUT_CELL

JP    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_g.f, 74]           CALC_TAU_V_G
    Set   [tau_v_g.f, 115]             CALC_TAU_V_G
    Use   [tau_v_g.f, 150]             CALC_TAU_V_G

JP    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_g.f, 91]     CG_SOURCE_U_G
    Set   [CG_source_u_g.f, 278]       CG_SOURCE_U_G
    Use   [CG_source_u_g.f, 284]       CG_SOURCE_U_G

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

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

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

jp    (Local Variable)  Declared as: INTEGER
    Define   [cfassign.f, 212]         compute_volume_of_nodes
    Set   [cfassign.f, 258]            compute_volume_of_nodes
    Use   [cfassign.f, 265]            compute_volume_of_nodes
    Use   [cfassign.f, 266]            compute_volume_of_nodes
    Use   [cfassign.f, 272]            compute_volume_of_nodes
    Use   [cfassign.f, 273]            compute_volume_of_nodes
    Use   [cfassign.f, 307]            compute_volume_of_nodes
    Use   [cfassign.f, 308]            compute_volume_of_nodes
    Use   [cfassign.f, 312]            compute_volume_of_nodes
    Use   [cfassign.f, 313]            compute_volume_of_nodes

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

JP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 158]     STORE_A_V_G0
    Set   [conv_dif_v_g.f, 218]        STORE_A_V_G0
    Use   [conv_dif_v_g.f, 260]        STORE_A_V_G0

JP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 930]     STORE_A_V_G1
    Set   [conv_dif_v_g.f, 1049]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1088]       STORE_A_V_G1

JP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 474]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 635]        STORE_A_V_GDC

JP    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 73]           CALC_TAU_V_S
    Set   [tau_v_s.f, 129]             CALC_TAU_V_S
    Use   [tau_v_s.f, 165]             CALC_TAU_V_S

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

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 353]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 361]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 426]    GET_CELL_NODE_COORDINATES

JP    (Local Variable)  Declared as: INTEGER
    Define   [get_connectivity.f, 543]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 551]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 613]    GET_GLOBAL_CELL_NODE_COORDINATES

JP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 142]     STORE_A_V_S0
    Set   [conv_dif_v_s.f, 178]        STORE_A_V_S0
    Use   [conv_dif_v_s.f, 216]        STORE_A_V_S0

JP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 810]     STORE_A_V_S1
    Set   [conv_dif_v_s.f, 924]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 959]        STORE_A_V_S1

JP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 406]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 541]        STORE_A_V_SDC

JP_COPY    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 364]   RE_INDEX_ARRAYS
    Set   [set_increments.f, 855]      RE_INDEX_ARRAYS
    Use   [set_increments.f, 871]      RE_INDEX_ARRAYS

JP_COPY    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2638]   WRITE_IJK_VALUES

JPLUS1    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 38]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 130]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 154]     MAKE_ARRAYS_DES

JPLUS1    (Local Variable)  Declared as: INTEGER
    Define   [des_time_march.f, 51]    DES_TIME_MARCH

JPLUS1    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 817]   CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 858]     CHECK_IF_PARCEL_OVELAPS_STL
    Use   [pic_bc_routines.f, 865]     CHECK_IF_PARCEL_OVELAPS_STL

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 481]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 567]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 568]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 568]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 568]        CONV_DIF_PHI_DC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 413]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 553]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 554]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 554]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 554]        STORE_A_U_SDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 464]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 614]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 615]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 615]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 615]        STORE_A_W_GDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 408]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 549]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 550]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 550]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 550]        STORE_A_W_SDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 479]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 615]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 616]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 616]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 616]        STORE_A_V_GDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 411]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 550]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 551]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 551]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 551]        STORE_A_V_SDC

JPPP    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 479]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 618]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 619]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 619]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 619]        STORE_A_U_GDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 481]     CONV_DIF_PHI_DC
    Set   [conv_dif_phi.f, 568]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 608]        CONV_DIF_PHI_DC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_s.f, 413]     STORE_A_U_SDC
    Set   [conv_dif_u_s.f, 554]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 597]        STORE_A_U_SDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_g.f, 464]     STORE_A_W_GDC
    Set   [conv_dif_w_g.f, 615]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 668]        STORE_A_W_GDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_w_s.f, 408]     STORE_A_W_SDC
    Set   [conv_dif_w_s.f, 550]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 593]        STORE_A_W_SDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_g.f, 479]     STORE_A_V_GDC
    Set   [conv_dif_v_g.f, 616]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 680]        STORE_A_V_GDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_v_s.f, 411]     STORE_A_V_SDC
    Set   [conv_dif_v_s.f, 551]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 594]        STORE_A_V_SDC

JPPP4    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_u_g.f, 479]     STORE_A_U_GDC
    Set   [conv_dif_u_g.f, 619]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 679]        STORE_A_U_GDC

jproc    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 397]   RE_INDEX_ARRAYS

jproc    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2671]   WRITE_IJK_VALUES

jraw    (Local Variable)  Declared as: INTEGER
    Define   [cfassign.f, 209]         compute_volume_of_nodes
    Set   [cfassign.f, 233]            compute_volume_of_nodes
    Use   [cfassign.f, 247]            compute_volume_of_nodes
    Use   [cfassign.f, 247]            compute_volume_of_nodes
    Use   [cfassign.f, 255]            compute_volume_of_nodes
    Use   [cfassign.f, 258]            compute_volume_of_nodes

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3381]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3752]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3753]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3754]   ADJUST_IJK_SIZE

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4098]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4368]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4369]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4370]   REPORT_BEST_IJK_SIZE

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4922]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5155]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5156]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5157]   REPORT_BEST_IJK_SIZE0

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 374]   RE_INDEX_ARRAYS

JREMAIN    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2648]   WRITE_IJK_VALUES

JS    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields0.f, 49]   COMP_MEAN_FIELDS0
    Set   [comp_mean_fields0.f, 132]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 142]   COMP_MEAN_FIELDS0
    Use   [comp_mean_fields0.f, 182]   COMP_MEAN_FIELDS0

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

JS    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des0.f, 252]     DRAG_GS_GAS0
    Set   [drag_gs_des0.f, 325]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 333]        DRAG_GS_GAS0
    Use   [drag_gs_des0.f, 397]        DRAG_GS_GAS0

js    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 661]     MPPIC_COMPUTE_PS_GRAD
    Set   [pic_routines.f, 847]        MPPIC_COMPUTE_PS_GRAD
    Use   [pic_routines.f, 855]        MPPIC_COMPUTE_PS_GRAD

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3381]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3749]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3750]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3752]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3754]   ADJUST_IJK_SIZE

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4098]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4365]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4366]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4368]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4370]   REPORT_BEST_IJK_SIZE

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4922]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5152]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5153]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5155]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5157]   REPORT_BEST_IJK_SIZE0

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 374]   RE_INDEX_ARRAYS

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2648]   WRITE_IJK_VALUES

JSIZE    (Local Variable)  Declared as: INTEGER
    Define   [leq_bicgs.f, 1240]       LEQ_MSOLVE
    Set   [leq_bicgs.f, 1314]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1318]          LEQ_MSOLVE
    Use Argument   [leq_bicgs.f, 1319]   LEQ_MSOLVE
    Use   [leq_bicgs.f, 1320]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1322]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1324]          LEQ_MSOLVE
    Set   [leq_bicgs.f, 1339]          LEQ_MSOLVE
    Use   [leq_bicgs.f, 1342]          LEQ_MSOLVE

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3379]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3750]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3754]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3765]   ADJUST_IJK_SIZE

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4095]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4366]   REPORT_BEST_IJK_SIZE
    Set   [check_data_cartesian.f, 4370]   REPORT_BEST_IJK_SIZE
    Use   [check_data_cartesian.f, 4373]   REPORT_BEST_IJK_SIZE

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4920]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5153]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5157]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5162]   REPORT_BEST_IJK_SIZE0

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 371]   RE_INDEX_ARRAYS

JSIZE_OLD    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2645]   WRITE_IJK_VALUES

jstartl    (Local Variable)  Declared as: INTEGER
    Define   [leq_gmres.f, 689]        leq_check
    Set   [leq_gmres.f, 698]           leq_check
    Use   [leq_gmres.f, 711]           leq_check

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

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

Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ