Object Cross Reference


Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ

L    (Local Variable)  Declared as: INTEGER
    Define   [read_namelist.f, 277]    BLANK_LINE
    Set   [read_namelist.f, 280]       BLANK_LINE
    Use   [read_namelist.f, 281]       BLANK_LINE
    Use   [read_namelist.f, 281]       BLANK_LINE
    Use   [read_namelist.f, 281]       BLANK_LINE
    Use   [read_namelist.f, 281]       BLANK_LINE

L    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3133]   F
    Declare   [check_data_cartesian.f, 3138]   F
    Use   [check_data_cartesian.f, 3142]   F
    Use   [check_data_cartesian.f, 3148]   F
    Use   [check_data_cartesian.f, 3150]   F

L    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3182]   FIND_CELL_RATIO
    Declare   [check_data_cartesian.f, 3200]   FIND_CELL_RATIO
    Use   [check_data_cartesian.f, 3207]   FIND_CELL_RATIO
    Use Argument   [check_data_cartesian.f, 3239]   FIND_CELL_RATIO
    Use Argument   [check_data_cartesian.f, 3240]   FIND_CELL_RATIO
    Use Argument   [check_data_cartesian.f, 3264]   FIND_CELL_RATIO

L    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 2537]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2616]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2617]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2620]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2623]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2629]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2630]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2633]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2636]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2673]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2677]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2684]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2705]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2709]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2715]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2808]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2809]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2812]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2815]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2821]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2822]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2825]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2828]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2865]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2869]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 2876]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 2897]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2901]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 2907]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3002]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3003]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3006]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3009]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3015]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3016]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3019]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3022]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3059]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3063]   GET_DXYZ_FROM_CONTROL_POINTS
    Use   [check_data_cartesian.f, 3070]   GET_DXYZ_FROM_CONTROL_POINTS
    Set   [check_data_cartesian.f, 3091]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3095]   GET_DXYZ_FROM_CONTROL_POINTS
    Use Argument   [check_data_cartesian.f, 3101]   GET_DXYZ_FROM_CONTROL_POINTS

L    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4614]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4652]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4653]   GET_LIP_WITH_GHOST_LAYERS

L    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5379]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5417]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5418]   GET_LIP_WITH_GHOST_LAYERS0

L    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_z.f, 131]          VF_SS_Z
    Set   [vf_gs_z.f, 138]             VF_SS_Z
    Use Argument   [vf_gs_z.f, 139]    VF_SS_Z
    Use   [vf_gs_z.f, 140]             VF_SS_Z

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

L    (Local Variable)  Declared as: INTEGER
    Define   [set_phase_index.f, 32]   SET_PHASE_INDEX
    Set   [set_phase_index.f, 50]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 51]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 52]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 57]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 58]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 60]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 65]      SET_PHASE_INDEX
    Set   [set_phase_index.f, 84]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 86]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 87]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 90]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 91]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 91]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 91]      SET_PHASE_INDEX

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

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

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_v_s.f, 961]       JJ_BC_V_S
    Declare   [source_v_s.f, 991]      JJ_BC_V_S
    Use   [source_v_s.f, 1034]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1038]   JJ_BC_V_S
    Use   [source_v_s.f, 1039]         JJ_BC_V_S
    Use   [source_v_s.f, 1044]         JJ_BC_V_S
    Use   [source_v_s.f, 1063]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1065]   JJ_BC_V_S
    Use   [source_v_s.f, 1066]         JJ_BC_V_S
    Use   [source_v_s.f, 1069]         JJ_BC_V_S
    Use   [source_v_s.f, 1086]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1088]   JJ_BC_V_S
    Use   [source_v_s.f, 1089]         JJ_BC_V_S
    Use   [source_v_s.f, 1092]         JJ_BC_V_S
    Use   [source_v_s.f, 1109]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1111]   JJ_BC_V_S
    Use   [source_v_s.f, 1112]         JJ_BC_V_S
    Use   [source_v_s.f, 1115]         JJ_BC_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 84]        SOURCE_V_S
    Set   [source_v_s.f, 153]          SOURCE_V_S
    Use Argument   [source_v_s.f, 154]   SOURCE_V_S
    Use Argument   [source_v_s.f, 154]   SOURCE_V_S
    Use Argument   [source_v_s.f, 155]   SOURCE_V_S
    Use Argument   [source_v_s.f, 156]   SOURCE_V_S
    Use   [source_v_s.f, 158]          SOURCE_V_S
    Use   [source_v_s.f, 161]          SOURCE_V_S
    Use   [source_v_s.f, 161]          SOURCE_V_S
    Set   [source_v_s.f, 209]          SOURCE_V_S
    Use Argument   [source_v_s.f, 210]   SOURCE_V_S
    Use Argument   [source_v_s.f, 211]   SOURCE_V_S
    Use Argument   [source_v_s.f, 212]   SOURCE_V_S
    Use Argument   [source_v_s.f, 213]   SOURCE_V_S
    Use Argument   [source_v_s.f, 215]   SOURCE_V_S
    Use Argument   [source_v_s.f, 216]   SOURCE_V_S
    Set   [source_v_s.f, 364]          SOURCE_V_S
    Use   [source_v_s.f, 365]          SOURCE_V_S
    Use   [source_v_s.f, 365]          SOURCE_V_S
    Set   [source_v_s.f, 397]          SOURCE_V_S
    Use   [source_v_s.f, 398]          SOURCE_V_S
    Use   [source_v_s.f, 398]          SOURCE_V_S
    Use   [source_v_s.f, 400]          SOURCE_V_S
    Use   [source_v_s.f, 400]          SOURCE_V_S
    Use   [source_v_s.f, 401]          SOURCE_V_S
    Set   [source_v_s.f, 409]          SOURCE_V_S
    Use   [source_v_s.f, 410]          SOURCE_V_S
    Use   [source_v_s.f, 411]          SOURCE_V_S
    Use   [source_v_s.f, 411]          SOURCE_V_S
    Use   [source_v_s.f, 412]          SOURCE_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 529]       SOURCE_V_S_BC
    Set   [source_v_s.f, 654]          SOURCE_V_S_BC
    Use   [source_v_s.f, 655]          SOURCE_V_S_BC
    Use   [source_v_s.f, 658]          SOURCE_V_S_BC
    Use   [source_v_s.f, 659]          SOURCE_V_S_BC
    Use   [source_v_s.f, 660]          SOURCE_V_S_BC
    Use   [source_v_s.f, 661]          SOURCE_V_S_BC
    Use   [source_v_s.f, 662]          SOURCE_V_S_BC
    Use   [source_v_s.f, 663]          SOURCE_V_S_BC
    Use   [source_v_s.f, 664]          SOURCE_V_S_BC
    Use   [source_v_s.f, 665]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 695]   SOURCE_V_S_BC
    Use   [source_v_s.f, 698]          SOURCE_V_S_BC
    Use   [source_v_s.f, 699]          SOURCE_V_S_BC
    Use   [source_v_s.f, 700]          SOURCE_V_S_BC
    Use   [source_v_s.f, 701]          SOURCE_V_S_BC
    Use   [source_v_s.f, 702]          SOURCE_V_S_BC
    Use   [source_v_s.f, 703]          SOURCE_V_S_BC
    Use   [source_v_s.f, 704]          SOURCE_V_S_BC
    Use   [source_v_s.f, 705]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 734]   SOURCE_V_S_BC
    Use   [source_v_s.f, 737]          SOURCE_V_S_BC
    Use   [source_v_s.f, 738]          SOURCE_V_S_BC
    Use   [source_v_s.f, 739]          SOURCE_V_S_BC
    Use   [source_v_s.f, 740]          SOURCE_V_S_BC
    Use   [source_v_s.f, 741]          SOURCE_V_S_BC
    Use   [source_v_s.f, 742]          SOURCE_V_S_BC
    Use   [source_v_s.f, 743]          SOURCE_V_S_BC
    Use   [source_v_s.f, 744]          SOURCE_V_S_BC
    Use   [source_v_s.f, 763]          SOURCE_V_S_BC
    Use   [source_v_s.f, 766]          SOURCE_V_S_BC
    Use   [source_v_s.f, 768]          SOURCE_V_S_BC
    Use   [source_v_s.f, 769]          SOURCE_V_S_BC
    Use   [source_v_s.f, 770]          SOURCE_V_S_BC
    Use   [source_v_s.f, 770]          SOURCE_V_S_BC
    Use   [source_v_s.f, 773]          SOURCE_V_S_BC
    Use   [source_v_s.f, 776]          SOURCE_V_S_BC
    Use   [source_v_s.f, 778]          SOURCE_V_S_BC
    Use   [source_v_s.f, 779]          SOURCE_V_S_BC
    Use   [source_v_s.f, 780]          SOURCE_V_S_BC
    Use   [source_v_s.f, 780]          SOURCE_V_S_BC
    Use   [source_v_s.f, 783]          SOURCE_V_S_BC
    Use   [source_v_s.f, 786]          SOURCE_V_S_BC
    Use   [source_v_s.f, 788]          SOURCE_V_S_BC
    Use   [source_v_s.f, 790]          SOURCE_V_S_BC
    Use   [source_v_s.f, 792]          SOURCE_V_S_BC
    Use   [source_v_s.f, 792]          SOURCE_V_S_BC
    Use   [source_v_s.f, 795]          SOURCE_V_S_BC
    Use   [source_v_s.f, 798]          SOURCE_V_S_BC
    Use   [source_v_s.f, 800]          SOURCE_V_S_BC
    Use   [source_v_s.f, 802]          SOURCE_V_S_BC
    Use   [source_v_s.f, 804]          SOURCE_V_S_BC
    Use   [source_v_s.f, 804]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 811]   SOURCE_V_S_BC
    Use   [source_v_s.f, 815]          SOURCE_V_S_BC
    Use   [source_v_s.f, 815]          SOURCE_V_S_BC
    Use   [source_v_s.f, 816]          SOURCE_V_S_BC
    Use   [source_v_s.f, 817]          SOURCE_V_S_BC
    Use   [source_v_s.f, 818]          SOURCE_V_S_BC
    Use   [source_v_s.f, 819]          SOURCE_V_S_BC
    Use   [source_v_s.f, 820]          SOURCE_V_S_BC
    Use   [source_v_s.f, 821]          SOURCE_V_S_BC
    Use   [source_v_s.f, 822]          SOURCE_V_S_BC
    Use   [source_v_s.f, 842]          SOURCE_V_S_BC
    Use   [source_v_s.f, 843]          SOURCE_V_S_BC
    Use   [source_v_s.f, 844]          SOURCE_V_S_BC
    Use   [source_v_s.f, 845]          SOURCE_V_S_BC
    Use   [source_v_s.f, 846]          SOURCE_V_S_BC
    Use   [source_v_s.f, 847]          SOURCE_V_S_BC
    Use   [source_v_s.f, 848]          SOURCE_V_S_BC
    Use   [source_v_s.f, 849]          SOURCE_V_S_BC
    Use   [source_v_s.f, 876]          SOURCE_V_S_BC
    Use   [source_v_s.f, 877]          SOURCE_V_S_BC
    Use   [source_v_s.f, 878]          SOURCE_V_S_BC
    Use   [source_v_s.f, 879]          SOURCE_V_S_BC
    Use   [source_v_s.f, 880]          SOURCE_V_S_BC
    Use   [source_v_s.f, 881]          SOURCE_V_S_BC
    Use   [source_v_s.f, 882]          SOURCE_V_S_BC
    Use   [source_v_s.f, 905]          SOURCE_V_S_BC
    Use   [source_v_s.f, 906]          SOURCE_V_S_BC
    Use   [source_v_s.f, 907]          SOURCE_V_S_BC
    Use   [source_v_s.f, 908]          SOURCE_V_S_BC
    Use   [source_v_s.f, 909]          SOURCE_V_S_BC
    Use   [source_v_s.f, 910]          SOURCE_V_S_BC
    Use   [source_v_s.f, 925]          SOURCE_V_S_BC

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

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

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

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [calc_grbdry.f, 1233]     CG_CALC_GRBDRY
    Declare   [calc_grbdry.f, 1266]    CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1376]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1376]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1377]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1443]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1443]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1444]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1511]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1511]        CG_CALC_GRBDRY
    Use   [calc_grbdry.f, 1512]        CG_CALC_GRBDRY

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 34]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 238]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 240]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 241]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 242]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 242]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 243]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 243]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 243]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 244]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 244]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 244]     MAKE_ARRAYS_DES

L    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 131]          VF_SS_Y
    Set   [vf_gs_y.f, 138]             VF_SS_Y
    Use Argument   [vf_gs_y.f, 139]    VF_SS_Y
    Use   [vf_gs_y.f, 140]             VF_SS_Y

L    (Local Variable)  Declared as: INTEGER
    Define   [seek_end.f, 34]          SEEK_END
    Set   [seek_end.f, 43]             SEEK_END
    Use   [seek_end.f, 44]             SEEK_END
    Use   [seek_end.f, 44]             SEEK_END
    Use   [seek_end.f, 44]             SEEK_END

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 74]        SOURCE_U_G
    Set   [source_u_g.f, 290]          SOURCE_U_G
    Use   [source_u_g.f, 291]          SOURCE_U_G
    Use   [source_u_g.f, 291]          SOURCE_U_G
    Use   [source_u_g.f, 293]          SOURCE_U_G
    Use   [source_u_g.f, 293]          SOURCE_U_G
    Use   [source_u_g.f, 293]          SOURCE_U_G
    Set   [source_u_g.f, 302]          SOURCE_U_G
    Use   [source_u_g.f, 303]          SOURCE_U_G
    Use   [source_u_g.f, 304]          SOURCE_U_G
    Use   [source_u_g.f, 304]          SOURCE_U_G
    Use   [source_u_g.f, 305]          SOURCE_U_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 411]       SOURCE_U_G_BC
    Set   [source_u_g.f, 560]          SOURCE_U_G_BC
    Use   [source_u_g.f, 561]          SOURCE_U_G_BC
    Use   [source_u_g.f, 565]          SOURCE_U_G_BC
    Use   [source_u_g.f, 566]          SOURCE_U_G_BC
    Use   [source_u_g.f, 567]          SOURCE_U_G_BC
    Use   [source_u_g.f, 568]          SOURCE_U_G_BC
    Use   [source_u_g.f, 569]          SOURCE_U_G_BC
    Use   [source_u_g.f, 570]          SOURCE_U_G_BC
    Use   [source_u_g.f, 571]          SOURCE_U_G_BC
    Use   [source_u_g.f, 600]          SOURCE_U_G_BC
    Use   [source_u_g.f, 601]          SOURCE_U_G_BC
    Use   [source_u_g.f, 602]          SOURCE_U_G_BC
    Use   [source_u_g.f, 603]          SOURCE_U_G_BC
    Use   [source_u_g.f, 604]          SOURCE_U_G_BC
    Use   [source_u_g.f, 605]          SOURCE_U_G_BC
    Use   [source_u_g.f, 606]          SOURCE_U_G_BC
    Use   [source_u_g.f, 635]          SOURCE_U_G_BC
    Use   [source_u_g.f, 636]          SOURCE_U_G_BC
    Use   [source_u_g.f, 637]          SOURCE_U_G_BC
    Use   [source_u_g.f, 638]          SOURCE_U_G_BC
    Use   [source_u_g.f, 639]          SOURCE_U_G_BC
    Use   [source_u_g.f, 640]          SOURCE_U_G_BC
    Use   [source_u_g.f, 641]          SOURCE_U_G_BC
    Use   [source_u_g.f, 660]          SOURCE_U_G_BC
    Use   [source_u_g.f, 663]          SOURCE_U_G_BC
    Use   [source_u_g.f, 665]          SOURCE_U_G_BC
    Use   [source_u_g.f, 666]          SOURCE_U_G_BC
    Use   [source_u_g.f, 667]          SOURCE_U_G_BC
    Use   [source_u_g.f, 667]          SOURCE_U_G_BC
    Use   [source_u_g.f, 670]          SOURCE_U_G_BC
    Use   [source_u_g.f, 673]          SOURCE_U_G_BC
    Use   [source_u_g.f, 675]          SOURCE_U_G_BC
    Use   [source_u_g.f, 676]          SOURCE_U_G_BC
    Use   [source_u_g.f, 677]          SOURCE_U_G_BC
    Use   [source_u_g.f, 677]          SOURCE_U_G_BC
    Use   [source_u_g.f, 680]          SOURCE_U_G_BC
    Use   [source_u_g.f, 683]          SOURCE_U_G_BC
    Use   [source_u_g.f, 685]          SOURCE_U_G_BC
    Use   [source_u_g.f, 686]          SOURCE_U_G_BC
    Use   [source_u_g.f, 687]          SOURCE_U_G_BC
    Use   [source_u_g.f, 687]          SOURCE_U_G_BC
    Use   [source_u_g.f, 690]          SOURCE_U_G_BC
    Use   [source_u_g.f, 693]          SOURCE_U_G_BC
    Use   [source_u_g.f, 695]          SOURCE_U_G_BC
    Use   [source_u_g.f, 697]          SOURCE_U_G_BC
    Use   [source_u_g.f, 699]          SOURCE_U_G_BC
    Use   [source_u_g.f, 699]          SOURCE_U_G_BC
    Use   [source_u_g.f, 707]          SOURCE_U_G_BC
    Use   [source_u_g.f, 708]          SOURCE_U_G_BC
    Use   [source_u_g.f, 709]          SOURCE_U_G_BC
    Use   [source_u_g.f, 711]          SOURCE_U_G_BC
    Use   [source_u_g.f, 712]          SOURCE_U_G_BC
    Use   [source_u_g.f, 713]          SOURCE_U_G_BC
    Use   [source_u_g.f, 714]          SOURCE_U_G_BC
    Use   [source_u_g.f, 715]          SOURCE_U_G_BC
    Use   [source_u_g.f, 716]          SOURCE_U_G_BC
    Use   [source_u_g.f, 738]          SOURCE_U_G_BC
    Use   [source_u_g.f, 738]          SOURCE_U_G_BC
    Use   [source_u_g.f, 743]          SOURCE_U_G_BC
    Use   [source_u_g.f, 743]          SOURCE_U_G_BC
    Use   [source_u_g.f, 748]          SOURCE_U_G_BC
    Use   [source_u_g.f, 748]          SOURCE_U_G_BC
    Use   [source_u_g.f, 753]          SOURCE_U_G_BC
    Use   [source_u_g.f, 753]          SOURCE_U_G_BC
    Use   [source_u_g.f, 763]          SOURCE_U_G_BC
    Use   [source_u_g.f, 763]          SOURCE_U_G_BC
    Use   [source_u_g.f, 764]          SOURCE_U_G_BC
    Use   [source_u_g.f, 768]          SOURCE_U_G_BC
    Use   [source_u_g.f, 769]          SOURCE_U_G_BC
    Use   [source_u_g.f, 770]          SOURCE_U_G_BC
    Use   [source_u_g.f, 771]          SOURCE_U_G_BC
    Use   [source_u_g.f, 772]          SOURCE_U_G_BC
    Use   [source_u_g.f, 773]          SOURCE_U_G_BC
    Use   [source_u_g.f, 797]          SOURCE_U_G_BC
    Use   [source_u_g.f, 798]          SOURCE_U_G_BC
    Use   [source_u_g.f, 799]          SOURCE_U_G_BC
    Use   [source_u_g.f, 800]          SOURCE_U_G_BC
    Use   [source_u_g.f, 801]          SOURCE_U_G_BC
    Use   [source_u_g.f, 802]          SOURCE_U_G_BC
    Use   [source_u_g.f, 803]          SOURCE_U_G_BC
    Use   [source_u_g.f, 804]          SOURCE_U_G_BC
    Use   [source_u_g.f, 832]          SOURCE_U_G_BC
    Use   [source_u_g.f, 833]          SOURCE_U_G_BC
    Use   [source_u_g.f, 834]          SOURCE_U_G_BC
    Use   [source_u_g.f, 835]          SOURCE_U_G_BC
    Use   [source_u_g.f, 836]          SOURCE_U_G_BC
    Use   [source_u_g.f, 837]          SOURCE_U_G_BC
    Use   [source_u_g.f, 838]          SOURCE_U_G_BC
    Use   [source_u_g.f, 867]          SOURCE_U_G_BC
    Use   [source_u_g.f, 868]          SOURCE_U_G_BC
    Use   [source_u_g.f, 869]          SOURCE_U_G_BC
    Use   [source_u_g.f, 870]          SOURCE_U_G_BC
    Use   [source_u_g.f, 871]          SOURCE_U_G_BC
    Use   [source_u_g.f, 872]          SOURCE_U_G_BC
    Use   [source_u_g.f, 888]          SOURCE_U_G_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [check_mass_balance.f, 67]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 89]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 90]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 91]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 93]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 94]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 98]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 99]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 101]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 102]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 139]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 140]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 141]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 142]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 143]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 144]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 145]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 146]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 150]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 152]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 154]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 154]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 155]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 155]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 160]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 162]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 164]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 164]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 165]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 165]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 174]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 175]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 176]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 177]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 178]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 179]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 180]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 181]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 184]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 187]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 190]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 190]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 191]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 191]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 204]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 205]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 206]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 207]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 208]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 209]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 210]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 211]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 215]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 219]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 222]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 222]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 223]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 223]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 253]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 254]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 254]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 255]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 255]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 255]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 255]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 255]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 257]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 257]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 258]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 259]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 284]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 285]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 285]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 287]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 288]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 288]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 288]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 288]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 291]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 291]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 292]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 293]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 327]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 328]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 328]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 329]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 329]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 329]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 330]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 330]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 332]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 332]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 333]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 334]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 372]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 373]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 373]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 374]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 374]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 374]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 375]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 375]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 377]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 377]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 378]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 379]   CHECK_Mass_balance
    Set   [check_mass_balance.f, 405]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 406]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 407]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 409]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 410]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 414]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 415]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 417]   CHECK_Mass_balance
    Use   [check_mass_balance.f, 418]   CHECK_Mass_balance

L    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 1090]    DIF_PHI_IS
    Set   [conv_dif_phi.f, 1114]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1115]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1116]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1117]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1118]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1119]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1120]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1121]       DIF_PHI_IS
    Use   [conv_dif_phi.f, 1144]       DIF_PHI_IS

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

L    (Local Variable)  Declared as: INTEGER
    Define   [stiff_chem_rrates.f, 87]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 256]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 257]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 257]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 262]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 264]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 265]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 266]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 268]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 268]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 268]   STIFF_CHEM_RRATES

L    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 660]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 723]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 753]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 753]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 757]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 758]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 759]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 760]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 761]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 762]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 763]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 764]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 767]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 768]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 769]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 769]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 770]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 770]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 774]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 774]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 776]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 776]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 779]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 779]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 781]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 781]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 785]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 785]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 787]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 787]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 789]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 789]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 791]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 791]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 793]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 794]    CHECK_SOLIDS_DEM_COLL_HERTZ

L    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 403]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 489]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 505]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 505]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 510]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 511]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 511]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 513]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 515]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 515]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 518]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 518]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 519]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 519]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 523]    CHECK_SOLIDS_DEM_COLL_LSD

L    (Local Variable)  Declared as: INTEGER
    Define   [write_out0.f, 50]        WRITE_OUT0
    Set   [write_out0.f, 165]          WRITE_OUT0
    Use   [write_out0.f, 166]          WRITE_OUT0
    Use   [write_out0.f, 166]          WRITE_OUT0
    Use   [write_out0.f, 189]          WRITE_OUT0
    Use   [write_out0.f, 189]          WRITE_OUT0
    Use   [write_out0.f, 190]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use   [write_out0.f, 192]          WRITE_OUT0
    Set   [write_out0.f, 192]          WRITE_OUT0
    Use   [write_out0.f, 194]          WRITE_OUT0
    Use   [write_out0.f, 194]          WRITE_OUT0
    Use   [write_out0.f, 195]          WRITE_OUT0
    Use   [write_out0.f, 196]          WRITE_OUT0
    Use   [write_out0.f, 196]          WRITE_OUT0
    Use   [write_out0.f, 196]          WRITE_OUT0
    Use   [write_out0.f, 197]          WRITE_OUT0
    Set   [write_out0.f, 197]          WRITE_OUT0
    Set   [write_out0.f, 200]          WRITE_OUT0
    Use   [write_out0.f, 201]          WRITE_OUT0
    Use   [write_out0.f, 201]          WRITE_OUT0
    Use   [write_out0.f, 201]          WRITE_OUT0
    Use   [write_out0.f, 201]          WRITE_OUT0
    Set   [write_out0.f, 374]          WRITE_OUT0
    Use   [write_out0.f, 375]          WRITE_OUT0
    Use   [write_out0.f, 376]          WRITE_OUT0
    Use   [write_out0.f, 377]          WRITE_OUT0
    Use   [write_out0.f, 377]          WRITE_OUT0
    Use   [write_out0.f, 378]          WRITE_OUT0
    Use   [write_out0.f, 378]          WRITE_OUT0
    Use   [write_out0.f, 379]          WRITE_OUT0
    Use   [write_out0.f, 379]          WRITE_OUT0
    Use   [write_out0.f, 380]          WRITE_OUT0
    Use   [write_out0.f, 380]          WRITE_OUT0
    Use   [write_out0.f, 381]          WRITE_OUT0
    Use   [write_out0.f, 381]          WRITE_OUT0
    Use   [write_out0.f, 382]          WRITE_OUT0
    Use   [write_out0.f, 382]          WRITE_OUT0
    Use   [write_out0.f, 383]          WRITE_OUT0
    Use   [write_out0.f, 383]          WRITE_OUT0
    Use   [write_out0.f, 384]          WRITE_OUT0
    Use   [write_out0.f, 384]          WRITE_OUT0
    Use   [write_out0.f, 384]          WRITE_OUT0
    Use   [write_out0.f, 384]          WRITE_OUT0
    Use   [write_out0.f, 386]          WRITE_OUT0
    Use   [write_out0.f, 386]          WRITE_OUT0
    Use   [write_out0.f, 386]          WRITE_OUT0
    Use   [write_out0.f, 386]          WRITE_OUT0
    Use   [write_out0.f, 387]          WRITE_OUT0
    Use   [write_out0.f, 387]          WRITE_OUT0
    Use   [write_out0.f, 388]          WRITE_OUT0
    Use   [write_out0.f, 389]          WRITE_OUT0
    Use   [write_out0.f, 389]          WRITE_OUT0
    Use   [write_out0.f, 390]          WRITE_OUT0
    Use   [write_out0.f, 394]          WRITE_OUT0
    Use   [write_out0.f, 397]          WRITE_OUT0
    Use   [write_out0.f, 397]          WRITE_OUT0
    Use   [write_out0.f, 398]          WRITE_OUT0
    Use   [write_out0.f, 400]          WRITE_OUT0
    Use   [write_out0.f, 400]          WRITE_OUT0
    Use   [write_out0.f, 400]          WRITE_OUT0
    Use   [write_out0.f, 402]          WRITE_OUT0
    Use   [write_out0.f, 403]          WRITE_OUT0
    Use   [write_out0.f, 411]          WRITE_OUT0
    Use   [write_out0.f, 416]          WRITE_OUT0
    Use   [write_out0.f, 417]          WRITE_OUT0
    Use   [write_out0.f, 417]          WRITE_OUT0
    Use   [write_out0.f, 419]          WRITE_OUT0
    Use   [write_out0.f, 419]          WRITE_OUT0
    Use   [write_out0.f, 419]          WRITE_OUT0
    Use   [write_out0.f, 421]          WRITE_OUT0
    Use   [write_out0.f, 421]          WRITE_OUT0
    Use   [write_out0.f, 422]          WRITE_OUT0
    Use   [write_out0.f, 422]          WRITE_OUT0
    Set   [write_out0.f, 439]          WRITE_OUT0
    Use   [write_out0.f, 440]          WRITE_OUT0
    Use   [write_out0.f, 441]          WRITE_OUT0
    Use   [write_out0.f, 442]          WRITE_OUT0
    Use   [write_out0.f, 443]          WRITE_OUT0
    Use   [write_out0.f, 461]          WRITE_OUT0
    Use   [write_out0.f, 462]          WRITE_OUT0
    Use   [write_out0.f, 462]          WRITE_OUT0
    Use   [write_out0.f, 463]          WRITE_OUT0
    Use   [write_out0.f, 463]          WRITE_OUT0
    Use   [write_out0.f, 464]          WRITE_OUT0
    Use   [write_out0.f, 464]          WRITE_OUT0
    Use   [write_out0.f, 465]          WRITE_OUT0
    Use   [write_out0.f, 465]          WRITE_OUT0
    Use   [write_out0.f, 466]          WRITE_OUT0
    Use   [write_out0.f, 466]          WRITE_OUT0
    Use   [write_out0.f, 467]          WRITE_OUT0
    Use   [write_out0.f, 467]          WRITE_OUT0
    Use   [write_out0.f, 468]          WRITE_OUT0
    Use   [write_out0.f, 468]          WRITE_OUT0
    Use   [write_out0.f, 469]          WRITE_OUT0
    Use   [write_out0.f, 469]          WRITE_OUT0
    Use   [write_out0.f, 469]          WRITE_OUT0
    Use   [write_out0.f, 469]          WRITE_OUT0
    Use   [write_out0.f, 471]          WRITE_OUT0
    Use   [write_out0.f, 471]          WRITE_OUT0
    Use   [write_out0.f, 471]          WRITE_OUT0
    Use   [write_out0.f, 471]          WRITE_OUT0
    Use   [write_out0.f, 472]          WRITE_OUT0
    Use   [write_out0.f, 472]          WRITE_OUT0
    Use   [write_out0.f, 474]          WRITE_OUT0
    Use   [write_out0.f, 476]          WRITE_OUT0
    Use   [write_out0.f, 476]          WRITE_OUT0
    Use   [write_out0.f, 477]          WRITE_OUT0
    Use   [write_out0.f, 477]          WRITE_OUT0
    Use   [write_out0.f, 478]          WRITE_OUT0
    Use   [write_out0.f, 478]          WRITE_OUT0
    Use   [write_out0.f, 479]          WRITE_OUT0
    Use   [write_out0.f, 482]          WRITE_OUT0
    Use   [write_out0.f, 485]          WRITE_OUT0
    Use   [write_out0.f, 486]          WRITE_OUT0
    Use   [write_out0.f, 487]          WRITE_OUT0
    Use   [write_out0.f, 488]          WRITE_OUT0
    Use   [write_out0.f, 489]          WRITE_OUT0
    Use   [write_out0.f, 489]          WRITE_OUT0
    Use   [write_out0.f, 490]          WRITE_OUT0
    Use   [write_out0.f, 490]          WRITE_OUT0
    Use   [write_out0.f, 491]          WRITE_OUT0
    Use   [write_out0.f, 491]          WRITE_OUT0
    Use   [write_out0.f, 492]          WRITE_OUT0
    Use   [write_out0.f, 493]          WRITE_OUT0
    Use   [write_out0.f, 494]          WRITE_OUT0
    Use   [write_out0.f, 494]          WRITE_OUT0
    Use   [write_out0.f, 494]          WRITE_OUT0
    Use   [write_out0.f, 495]          WRITE_OUT0
    Use   [write_out0.f, 495]          WRITE_OUT0
    Use   [write_out0.f, 495]          WRITE_OUT0
    Use   [write_out0.f, 497]          WRITE_OUT0
    Use   [write_out0.f, 501]          WRITE_OUT0
    Use   [write_out0.f, 503]          WRITE_OUT0
    Use   [write_out0.f, 504]          WRITE_OUT0
    Use   [write_out0.f, 508]          WRITE_OUT0
    Use   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 518]          WRITE_OUT0
    Use   [write_out0.f, 519]          WRITE_OUT0
    Use   [write_out0.f, 520]          WRITE_OUT0
    Use   [write_out0.f, 521]          WRITE_OUT0
    Use   [write_out0.f, 522]          WRITE_OUT0
    Use   [write_out0.f, 522]          WRITE_OUT0
    Use   [write_out0.f, 523]          WRITE_OUT0
    Use   [write_out0.f, 523]          WRITE_OUT0
    Use   [write_out0.f, 524]          WRITE_OUT0
    Use   [write_out0.f, 524]          WRITE_OUT0
    Use   [write_out0.f, 526]          WRITE_OUT0
    Use   [write_out0.f, 527]          WRITE_OUT0
    Use   [write_out0.f, 527]          WRITE_OUT0
    Use   [write_out0.f, 527]          WRITE_OUT0
    Use   [write_out0.f, 528]          WRITE_OUT0
    Use   [write_out0.f, 530]          WRITE_OUT0
    Use   [write_out0.f, 530]          WRITE_OUT0
    Use   [write_out0.f, 531]          WRITE_OUT0
    Use   [write_out0.f, 531]          WRITE_OUT0
    Set   [write_out0.f, 537]          WRITE_OUT0
    Use   [write_out0.f, 538]          WRITE_OUT0
    Use   [write_out0.f, 539]          WRITE_OUT0
    Use   [write_out0.f, 540]          WRITE_OUT0
    Use   [write_out0.f, 541]          WRITE_OUT0
    Use   [write_out0.f, 542]          WRITE_OUT0
    Use   [write_out0.f, 544]          WRITE_OUT0
    Use   [write_out0.f, 545]          WRITE_OUT0
    Use   [write_out0.f, 548]          WRITE_OUT0
    Use   [write_out0.f, 548]          WRITE_OUT0
    Use   [write_out0.f, 549]          WRITE_OUT0
    Use   [write_out0.f, 549]          WRITE_OUT0
    Use   [write_out0.f, 550]          WRITE_OUT0
    Use   [write_out0.f, 550]          WRITE_OUT0
    Use   [write_out0.f, 551]          WRITE_OUT0
    Use   [write_out0.f, 551]          WRITE_OUT0
    Use   [write_out0.f, 552]          WRITE_OUT0
    Use   [write_out0.f, 552]          WRITE_OUT0
    Use   [write_out0.f, 553]          WRITE_OUT0
    Use   [write_out0.f, 553]          WRITE_OUT0
    Use   [write_out0.f, 554]          WRITE_OUT0
    Use   [write_out0.f, 554]          WRITE_OUT0
    Use   [write_out0.f, 555]          WRITE_OUT0
    Use   [write_out0.f, 555]          WRITE_OUT0
    Use   [write_out0.f, 555]          WRITE_OUT0
    Use   [write_out0.f, 555]          WRITE_OUT0
    Use   [write_out0.f, 557]          WRITE_OUT0
    Use   [write_out0.f, 557]          WRITE_OUT0
    Use   [write_out0.f, 557]          WRITE_OUT0
    Use   [write_out0.f, 557]          WRITE_OUT0
    Use   [write_out0.f, 558]          WRITE_OUT0
    Use   [write_out0.f, 558]          WRITE_OUT0
    Use   [write_out0.f, 559]          WRITE_OUT0
    Use   [write_out0.f, 559]          WRITE_OUT0
    Use   [write_out0.f, 560]          WRITE_OUT0
    Use   [write_out0.f, 560]          WRITE_OUT0
    Use   [write_out0.f, 562]          WRITE_OUT0

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

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 224]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 225]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 226]   CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 297]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 298]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 299]   CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 302]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 303]   CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 310]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 312]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 313]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 313]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 313]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 317]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 318]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 319]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 319]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 320]            CALC_D_N_GAS_AND_SOLIDS

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 547]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 587]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 588]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 589]   CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 600]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 601]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 602]   CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 605]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 606]   CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 611]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 613]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 613]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 614]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 614]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 616]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 616]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 617]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 617]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 618]            CALC_D_N_SOLIDS_ONLY

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

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_v_s.f, 118]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 181]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 182]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 187]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 187]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 188]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 188]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 189]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 189]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 190]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 190]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 191]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 191]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 192]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 192]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 194]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 195]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 196]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 196]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 197]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 197]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 199]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 199]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 200]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 200]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 201]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 201]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 202]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 202]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 203]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 203]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 204]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 204]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 207]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 208]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 211]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 211]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 214]       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, 215]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 217]       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   [kintheory_v_s.f, 218]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 225]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 226]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 232]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 233]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 236]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 236]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 246]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 246]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 251]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 252]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 254]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 254]       CALC_IA_MOMSOURCE_V_S

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

L    (Local Variable)  Declared as: INTEGER
    Define   [write_res0.f, 59]        WRITE_RES0
    Set   [write_res0.f, 110]          WRITE_RES0
    Use   [write_res0.f, 111]          WRITE_RES0
    Use   [write_res0.f, 111]          WRITE_RES0
    Use   [write_res0.f, 112]          WRITE_RES0
    Use   [write_res0.f, 112]          WRITE_RES0
    Use   [write_res0.f, 119]          WRITE_RES0
    Set   [write_res0.f, 119]          WRITE_RES0
    Use   [write_res0.f, 136]          WRITE_RES0
    Set   [write_res0.f, 136]          WRITE_RES0
    Use   [write_res0.f, 136]          WRITE_RES0
    Set   [write_res0.f, 136]          WRITE_RES0

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 723]       write_mesh_netcdf
    Set   [write_spx1.f, 761]          write_mesh_netcdf
    Use   [write_spx1.f, 762]          write_mesh_netcdf
    Use   [write_spx1.f, 762]          write_mesh_netcdf
    Use   [write_spx1.f, 762]          write_mesh_netcdf
    Set   [write_spx1.f, 766]          write_mesh_netcdf
    Use   [write_spx1.f, 767]          write_mesh_netcdf
    Use   [write_spx1.f, 767]          write_mesh_netcdf
    Use   [write_spx1.f, 767]          write_mesh_netcdf
    Set   [write_spx1.f, 771]          write_mesh_netcdf
    Use   [write_spx1.f, 772]          write_mesh_netcdf
    Use   [write_spx1.f, 772]          write_mesh_netcdf
    Use   [write_spx1.f, 772]          write_mesh_netcdf

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

L    (Dummy Argument)  Declared as: INTEGER
    Define   [write_spx1.f, 25]        WRITE_SPX1
    Declare   [write_spx1.f, 60]       WRITE_SPX1
    Use   [write_spx1.f, 107]          WRITE_SPX1
    Use   [write_spx1.f, 110]          WRITE_SPX1
    Use   [write_spx1.f, 112]          WRITE_SPX1
    Use   [write_spx1.f, 118]          WRITE_SPX1
    Use   [write_spx1.f, 120]          WRITE_SPX1
    Use   [write_spx1.f, 124]          WRITE_SPX1
    Use   [write_spx1.f, 128]          WRITE_SPX1
    Use   [write_spx1.f, 129]          WRITE_SPX1
    Use   [write_spx1.f, 152]          WRITE_SPX1
    Use   [write_spx1.f, 154]          WRITE_SPX1
    Use   [write_spx1.f, 160]          WRITE_SPX1
    Use   [write_spx1.f, 162]          WRITE_SPX1
    Use   [write_spx1.f, 164]          WRITE_SPX1
    Use   [write_spx1.f, 165]          WRITE_SPX1
    Use   [write_spx1.f, 170]          WRITE_SPX1
    Use   [write_spx1.f, 171]          WRITE_SPX1
    Use   [write_spx1.f, 175]          WRITE_SPX1
    Use   [write_spx1.f, 176]          WRITE_SPX1
    Use   [write_spx1.f, 184]          WRITE_SPX1
    Use   [write_spx1.f, 186]          WRITE_SPX1
    Use   [write_spx1.f, 192]          WRITE_SPX1
    Use   [write_spx1.f, 194]          WRITE_SPX1
    Use   [write_spx1.f, 196]          WRITE_SPX1
    Use   [write_spx1.f, 198]          WRITE_SPX1
    Use   [write_spx1.f, 199]          WRITE_SPX1
    Use   [write_spx1.f, 200]          WRITE_SPX1
    Use   [write_spx1.f, 206]          WRITE_SPX1
    Use   [write_spx1.f, 207]          WRITE_SPX1
    Use   [write_spx1.f, 208]          WRITE_SPX1
    Use   [write_spx1.f, 212]          WRITE_SPX1
    Use   [write_spx1.f, 213]          WRITE_SPX1
    Use   [write_spx1.f, 221]          WRITE_SPX1
    Use   [write_spx1.f, 223]          WRITE_SPX1
    Use   [write_spx1.f, 230]          WRITE_SPX1
    Use   [write_spx1.f, 232]          WRITE_SPX1
    Use   [write_spx1.f, 234]          WRITE_SPX1
    Use   [write_spx1.f, 236]          WRITE_SPX1
    Use   [write_spx1.f, 237]          WRITE_SPX1
    Use   [write_spx1.f, 238]          WRITE_SPX1
    Use   [write_spx1.f, 248]          WRITE_SPX1
    Use   [write_spx1.f, 249]          WRITE_SPX1
    Use   [write_spx1.f, 250]          WRITE_SPX1
    Use   [write_spx1.f, 255]          WRITE_SPX1
    Use   [write_spx1.f, 256]          WRITE_SPX1
    Use   [write_spx1.f, 264]          WRITE_SPX1
    Use   [write_spx1.f, 266]          WRITE_SPX1
    Use   [write_spx1.f, 273]          WRITE_SPX1
    Use   [write_spx1.f, 275]          WRITE_SPX1
    Use   [write_spx1.f, 283]          WRITE_SPX1
    Use   [write_spx1.f, 288]          WRITE_SPX1
    Use   [write_spx1.f, 289]          WRITE_SPX1
    Use   [write_spx1.f, 297]          WRITE_SPX1
    Use   [write_spx1.f, 299]          WRITE_SPX1
    Use   [write_spx1.f, 305]          WRITE_SPX1
    Use   [write_spx1.f, 308]          WRITE_SPX1
    Use   [write_spx1.f, 311]          WRITE_SPX1
    Use   [write_spx1.f, 313]          WRITE_SPX1
    Use   [write_spx1.f, 321]          WRITE_SPX1
    Use   [write_spx1.f, 323]          WRITE_SPX1
    Use   [write_spx1.f, 328]          WRITE_SPX1
    Use   [write_spx1.f, 329]          WRITE_SPX1
    Use   [write_spx1.f, 336]          WRITE_SPX1
    Use   [write_spx1.f, 338]          WRITE_SPX1
    Use   [write_spx1.f, 345]          WRITE_SPX1
    Use   [write_spx1.f, 350]          WRITE_SPX1
    Use   [write_spx1.f, 355]          WRITE_SPX1
    Use   [write_spx1.f, 359]          WRITE_SPX1
    Use   [write_spx1.f, 375]          WRITE_SPX1
    Use   [write_spx1.f, 379]          WRITE_SPX1
    Use   [write_spx1.f, 385]          WRITE_SPX1
    Use   [write_spx1.f, 386]          WRITE_SPX1
    Use   [write_spx1.f, 394]          WRITE_SPX1
    Use   [write_spx1.f, 396]          WRITE_SPX1
    Use   [write_spx1.f, 403]          WRITE_SPX1
    Use   [write_spx1.f, 407]          WRITE_SPX1
    Use   [write_spx1.f, 415]          WRITE_SPX1
    Use   [write_spx1.f, 420]          WRITE_SPX1
    Use   [write_spx1.f, 421]          WRITE_SPX1
    Use   [write_spx1.f, 429]          WRITE_SPX1
    Use   [write_spx1.f, 431]          WRITE_SPX1
    Use   [write_spx1.f, 438]          WRITE_SPX1
    Use   [write_spx1.f, 442]          WRITE_SPX1
    Use   [write_spx1.f, 450]          WRITE_SPX1
    Use   [write_spx1.f, 455]          WRITE_SPX1
    Use   [write_spx1.f, 456]          WRITE_SPX1
    Use   [write_spx1.f, 463]          WRITE_SPX1
    Use   [write_spx1.f, 465]          WRITE_SPX1
    Use   [write_spx1.f, 472]          WRITE_SPX1
    Use   [write_spx1.f, 476]          WRITE_SPX1
    Use   [write_spx1.f, 484]          WRITE_SPX1
    Use   [write_spx1.f, 489]          WRITE_SPX1
    Use   [write_spx1.f, 490]          WRITE_SPX1
    Use   [write_spx1.f, 497]          WRITE_SPX1
    Use   [write_spx1.f, 499]          WRITE_SPX1
    Use   [write_spx1.f, 506]          WRITE_SPX1
    Use   [write_spx1.f, 508]          WRITE_SPX1
    Use   [write_spx1.f, 510]          WRITE_SPX1
    Use   [write_spx1.f, 511]          WRITE_SPX1
    Use   [write_spx1.f, 517]          WRITE_SPX1
    Use   [write_spx1.f, 518]          WRITE_SPX1
    Use   [write_spx1.f, 524]          WRITE_SPX1
    Use   [write_spx1.f, 525]          WRITE_SPX1

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 42]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 177]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 178]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 180]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 181]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 182]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 183]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 184]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 185]      DIF_PHI_BC_DES

L    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m.f, 50]        WRITE_AB_M
    Set   [write_ab_m.f, 101]          WRITE_AB_M
    Use   [write_ab_m.f, 103]          WRITE_AB_M
    Use   [write_ab_m.f, 114]          WRITE_AB_M
    Use   [write_ab_m.f, 132]          WRITE_AB_M
    Set   [write_ab_m.f, 132]          WRITE_AB_M

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

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [cfrelvel.f, 18]          CFRELVEL
    Declare   [cfrelvel.f, 30]         CFRELVEL
    Use   [cfrelvel.f, 52]             CFRELVEL
    Use   [cfrelvel.f, 57]             CFRELVEL
    Use   [cfrelvel.f, 61]             CFRELVEL

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [cfrelvel.f, 93]          CFRELVEL_WALL
    Declare   [cfrelvel.f, 105]        CFRELVEL_WALL
    Use   [cfrelvel.f, 129]            CFRELVEL_WALL
    Use   [cfrelvel.f, 132]            CFRELVEL_WALL
    Use   [cfrelvel.f, 133]            CFRELVEL_WALL

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 56]          DIF_U_IS
    Set   [dif_u_is.f, 80]             DIF_U_IS
    Use   [dif_u_is.f, 81]             DIF_U_IS
    Use   [dif_u_is.f, 82]             DIF_U_IS
    Use   [dif_u_is.f, 83]             DIF_U_IS
    Use   [dif_u_is.f, 84]             DIF_U_IS
    Use   [dif_u_is.f, 85]             DIF_U_IS
    Use   [dif_u_is.f, 86]             DIF_U_IS
    Use   [dif_u_is.f, 87]             DIF_U_IS
    Use   [dif_u_is.f, 96]             DIF_U_IS
    Use   [dif_u_is.f, 117]            DIF_U_IS

L    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 495]       PARSE_ARITH
    Set   [parse_line.f, 532]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Use   [parse_line.f, 550]          PARSE_ARITH
    Use   [parse_line.f, 550]          PARSE_ARITH
    Use   [parse_line.f, 552]          PARSE_ARITH
    Use   [parse_line.f, 552]          PARSE_ARITH
    Set   [parse_line.f, 558]          PARSE_ARITH
    Use   [parse_line.f, 559]          PARSE_ARITH
    Use   [parse_line.f, 559]          PARSE_ARITH
    Set   [parse_line.f, 568]          PARSE_ARITH
    Use   [parse_line.f, 569]          PARSE_ARITH
    Use   [parse_line.f, 569]          PARSE_ARITH
    Use   [parse_line.f, 569]          PARSE_ARITH
    Use   [parse_line.f, 569]          PARSE_ARITH
    Set   [parse_line.f, 576]          PARSE_ARITH
    Use   [parse_line.f, 578]          PARSE_ARITH
    Use   [parse_line.f, 578]          PARSE_ARITH
    Set   [parse_line.f, 579]          PARSE_ARITH
    Use   [parse_line.f, 579]          PARSE_ARITH

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

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_u_s.f, 969]       JJ_BC_U_S
    Declare   [source_u_s.f, 999]      JJ_BC_U_S
    Use   [source_u_s.f, 1042]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1046]   JJ_BC_U_S
    Use   [source_u_s.f, 1047]         JJ_BC_U_S
    Use   [source_u_s.f, 1052]         JJ_BC_U_S
    Use   [source_u_s.f, 1071]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1073]   JJ_BC_U_S
    Use   [source_u_s.f, 1074]         JJ_BC_U_S
    Use   [source_u_s.f, 1077]         JJ_BC_U_S
    Use   [source_u_s.f, 1094]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1096]   JJ_BC_U_S
    Use   [source_u_s.f, 1097]         JJ_BC_U_S
    Use   [source_u_s.f, 1100]         JJ_BC_U_S
    Use   [source_u_s.f, 1117]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1119]   JJ_BC_U_S
    Use   [source_u_s.f, 1120]         JJ_BC_U_S
    Use   [source_u_s.f, 1123]         JJ_BC_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 80]        SOURCE_U_S
    Set   [source_u_s.f, 148]          SOURCE_U_S
    Use Argument   [source_u_s.f, 149]   SOURCE_U_S
    Use Argument   [source_u_s.f, 149]   SOURCE_U_S
    Use Argument   [source_u_s.f, 150]   SOURCE_U_S
    Use Argument   [source_u_s.f, 151]   SOURCE_U_S
    Use   [source_u_s.f, 153]          SOURCE_U_S
    Use   [source_u_s.f, 156]          SOURCE_U_S
    Use   [source_u_s.f, 156]          SOURCE_U_S
    Set   [source_u_s.f, 204]          SOURCE_U_S
    Use Argument   [source_u_s.f, 205]   SOURCE_U_S
    Use Argument   [source_u_s.f, 206]   SOURCE_U_S
    Use Argument   [source_u_s.f, 207]   SOURCE_U_S
    Use Argument   [source_u_s.f, 208]   SOURCE_U_S
    Use Argument   [source_u_s.f, 210]   SOURCE_U_S
    Use Argument   [source_u_s.f, 211]   SOURCE_U_S
    Set   [source_u_s.f, 366]          SOURCE_U_S
    Use   [source_u_s.f, 367]          SOURCE_U_S
    Use   [source_u_s.f, 368]          SOURCE_U_S
    Set   [source_u_s.f, 401]          SOURCE_U_S
    Use   [source_u_s.f, 402]          SOURCE_U_S
    Use   [source_u_s.f, 402]          SOURCE_U_S
    Use   [source_u_s.f, 404]          SOURCE_U_S
    Use   [source_u_s.f, 404]          SOURCE_U_S
    Use   [source_u_s.f, 405]          SOURCE_U_S
    Set   [source_u_s.f, 413]          SOURCE_U_S
    Use   [source_u_s.f, 414]          SOURCE_U_S
    Use   [source_u_s.f, 415]          SOURCE_U_S
    Use   [source_u_s.f, 415]          SOURCE_U_S
    Use   [source_u_s.f, 417]          SOURCE_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 534]       SOURCE_U_S_BC
    Set   [source_u_s.f, 660]          SOURCE_U_S_BC
    Use   [source_u_s.f, 661]          SOURCE_U_S_BC
    Use   [source_u_s.f, 664]          SOURCE_U_S_BC
    Use   [source_u_s.f, 665]          SOURCE_U_S_BC
    Use   [source_u_s.f, 666]          SOURCE_U_S_BC
    Use   [source_u_s.f, 667]          SOURCE_U_S_BC
    Use   [source_u_s.f, 668]          SOURCE_U_S_BC
    Use   [source_u_s.f, 669]          SOURCE_U_S_BC
    Use   [source_u_s.f, 670]          SOURCE_U_S_BC
    Use   [source_u_s.f, 671]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 700]   SOURCE_U_S_BC
    Use   [source_u_s.f, 703]          SOURCE_U_S_BC
    Use   [source_u_s.f, 704]          SOURCE_U_S_BC
    Use   [source_u_s.f, 705]          SOURCE_U_S_BC
    Use   [source_u_s.f, 706]          SOURCE_U_S_BC
    Use   [source_u_s.f, 707]          SOURCE_U_S_BC
    Use   [source_u_s.f, 708]          SOURCE_U_S_BC
    Use   [source_u_s.f, 709]          SOURCE_U_S_BC
    Use   [source_u_s.f, 710]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 739]   SOURCE_U_S_BC
    Use   [source_u_s.f, 742]          SOURCE_U_S_BC
    Use   [source_u_s.f, 743]          SOURCE_U_S_BC
    Use   [source_u_s.f, 744]          SOURCE_U_S_BC
    Use   [source_u_s.f, 745]          SOURCE_U_S_BC
    Use   [source_u_s.f, 746]          SOURCE_U_S_BC
    Use   [source_u_s.f, 747]          SOURCE_U_S_BC
    Use   [source_u_s.f, 748]          SOURCE_U_S_BC
    Use   [source_u_s.f, 749]          SOURCE_U_S_BC
    Use   [source_u_s.f, 768]          SOURCE_U_S_BC
    Use   [source_u_s.f, 771]          SOURCE_U_S_BC
    Use   [source_u_s.f, 773]          SOURCE_U_S_BC
    Use   [source_u_s.f, 774]          SOURCE_U_S_BC
    Use   [source_u_s.f, 775]          SOURCE_U_S_BC
    Use   [source_u_s.f, 775]          SOURCE_U_S_BC
    Use   [source_u_s.f, 778]          SOURCE_U_S_BC
    Use   [source_u_s.f, 781]          SOURCE_U_S_BC
    Use   [source_u_s.f, 783]          SOURCE_U_S_BC
    Use   [source_u_s.f, 784]          SOURCE_U_S_BC
    Use   [source_u_s.f, 785]          SOURCE_U_S_BC
    Use   [source_u_s.f, 785]          SOURCE_U_S_BC
    Use   [source_u_s.f, 788]          SOURCE_U_S_BC
    Use   [source_u_s.f, 791]          SOURCE_U_S_BC
    Use   [source_u_s.f, 793]          SOURCE_U_S_BC
    Use   [source_u_s.f, 795]          SOURCE_U_S_BC
    Use   [source_u_s.f, 797]          SOURCE_U_S_BC
    Use   [source_u_s.f, 797]          SOURCE_U_S_BC
    Use   [source_u_s.f, 800]          SOURCE_U_S_BC
    Use   [source_u_s.f, 803]          SOURCE_U_S_BC
    Use   [source_u_s.f, 805]          SOURCE_U_S_BC
    Use   [source_u_s.f, 807]          SOURCE_U_S_BC
    Use   [source_u_s.f, 809]          SOURCE_U_S_BC
    Use   [source_u_s.f, 809]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 816]   SOURCE_U_S_BC
    Use   [source_u_s.f, 820]          SOURCE_U_S_BC
    Use   [source_u_s.f, 820]          SOURCE_U_S_BC
    Use   [source_u_s.f, 821]          SOURCE_U_S_BC
    Use   [source_u_s.f, 822]          SOURCE_U_S_BC
    Use   [source_u_s.f, 823]          SOURCE_U_S_BC
    Use   [source_u_s.f, 824]          SOURCE_U_S_BC
    Use   [source_u_s.f, 825]          SOURCE_U_S_BC
    Use   [source_u_s.f, 826]          SOURCE_U_S_BC
    Use   [source_u_s.f, 827]          SOURCE_U_S_BC
    Use   [source_u_s.f, 847]          SOURCE_U_S_BC
    Use   [source_u_s.f, 848]          SOURCE_U_S_BC
    Use   [source_u_s.f, 849]          SOURCE_U_S_BC
    Use   [source_u_s.f, 850]          SOURCE_U_S_BC
    Use   [source_u_s.f, 851]          SOURCE_U_S_BC
    Use   [source_u_s.f, 852]          SOURCE_U_S_BC
    Use   [source_u_s.f, 853]          SOURCE_U_S_BC
    Use   [source_u_s.f, 854]          SOURCE_U_S_BC
    Use   [source_u_s.f, 882]          SOURCE_U_S_BC
    Use   [source_u_s.f, 883]          SOURCE_U_S_BC
    Use   [source_u_s.f, 884]          SOURCE_U_S_BC
    Use   [source_u_s.f, 885]          SOURCE_U_S_BC
    Use   [source_u_s.f, 886]          SOURCE_U_S_BC
    Use   [source_u_s.f, 887]          SOURCE_U_S_BC
    Use   [source_u_s.f, 888]          SOURCE_U_S_BC
    Use   [source_u_s.f, 912]          SOURCE_U_S_BC
    Use   [source_u_s.f, 913]          SOURCE_U_S_BC
    Use   [source_u_s.f, 914]          SOURCE_U_S_BC
    Use   [source_u_s.f, 915]          SOURCE_U_S_BC
    Use   [source_u_s.f, 916]          SOURCE_U_S_BC
    Use   [source_u_s.f, 917]          SOURCE_U_S_BC
    Use   [source_u_s.f, 933]          SOURCE_U_S_BC

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 46]   CALC_INTERP_WEIGHTS1
    Set   [calc_interp_weights.f, 63]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 65]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 66]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 68]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 69]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 70]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 73]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 74]   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, 85]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 86]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 94]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 107]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 108]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 110]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 111]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 114]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 115]   CALC_INTERP_WEIGHTS1

L    (Local Variable)  Declared as: INTEGER
    Define   [source_population_eq.f, 16]   Source_population_eq
    Set   [source_population_eq.f, 83]   Source_population_eq
    Use   [source_population_eq.f, 88]   Source_population_eq
    Use   [source_population_eq.f, 88]   Source_population_eq
    Use   [source_population_eq.f, 90]   Source_population_eq
    Use   [source_population_eq.f, 90]   Source_population_eq
    Use   [source_population_eq.f, 92]   Source_population_eq
    Use   [source_population_eq.f, 96]   Source_population_eq
    Use   [source_population_eq.f, 96]   Source_population_eq
    Use   [source_population_eq.f, 98]   Source_population_eq
    Use   [source_population_eq.f, 99]   Source_population_eq
    Use   [source_population_eq.f, 101]   Source_population_eq
    Use   [source_population_eq.f, 101]   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, 112]   Source_population_eq
    Use   [source_population_eq.f, 112]   Source_population_eq
    Use   [source_population_eq.f, 114]   Source_population_eq
    Use   [source_population_eq.f, 114]   Source_population_eq
    Use   [source_population_eq.f, 115]   Source_population_eq
    Use   [source_population_eq.f, 115]   Source_population_eq
    Use   [source_population_eq.f, 116]   Source_population_eq

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 217]   CALC_DES_BEDHEIGHT
    Set   [des_granular_temperature.f, 259]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 260]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 262]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 262]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 263]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 264]   CALC_DES_BEDHEIGHT

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

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 2817]         CLEAN_GEOMETRY
    Set   [vtk_out.f, 2852]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2853]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 2911]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2912]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2913]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2913]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2915]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2915]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 2950]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2951]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 3009]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3010]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3011]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3011]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3013]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3013]            CLEAN_GEOMETRY

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1709]         GATHER_DATA
    Set   [vtk_out.f, 1793]            GATHER_DATA
    Use   [vtk_out.f, 1794]            GATHER_DATA
    Use   [vtk_out.f, 1795]            GATHER_DATA
    Use   [vtk_out.f, 1796]            GATHER_DATA
    Use   [vtk_out.f, 1797]            GATHER_DATA
    Use   [vtk_out.f, 1798]            GATHER_DATA

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 369]          OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 381]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 382]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 384]             OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 390]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 391]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 391]             OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 394]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 395]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 395]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 395]             OPEN_VTU_FILE_BIN

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1896]         SETUP_VTK_NO_CUTCELL
    Set   [vtk_out.f, 2001]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2002]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2003]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2004]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2005]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2006]            SETUP_VTK_NO_CUTCELL

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1482]         WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1535]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1536]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1537]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1538]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1539]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1544]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1636]            WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1637]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1648]            WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1649]            WRITE_CUT_SURFACE_VTK

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 560]          WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 683]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 683]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 690]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 690]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 816]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 816]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 823]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 823]             WRITE_GEOMETRY_IN_VTU_BIN

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 48]           WRITE_VTU_FILE
    Set   [vtk_out.f, 317]             WRITE_VTU_FILE
    Use   [vtk_out.f, 318]             WRITE_VTU_FILE
    Use   [vtk_out.f, 318]             WRITE_VTU_FILE
    Use   [vtk_out.f, 318]             WRITE_VTU_FILE

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

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

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

l    (Local Variable)  Declared as: INTEGER
    Define   [dufour_coeff.f, 32]      dufour_coeff
    Set   [dufour_coeff.f, 60]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 63]         dufour_coeff
    Use   [dufour_coeff.f, 64]         dufour_coeff
    Use   [dufour_coeff.f, 64]         dufour_coeff
    Use   [dufour_coeff.f, 64]         dufour_coeff
    Use   [dufour_coeff.f, 65]         dufour_coeff
    Use   [dufour_coeff.f, 65]         dufour_coeff
    Use   [dufour_coeff.f, 65]         dufour_coeff
    Use   [dufour_coeff.f, 66]         dufour_coeff
    Use   [dufour_coeff.f, 67]         dufour_coeff
    Use   [dufour_coeff.f, 67]         dufour_coeff
    Use   [dufour_coeff.f, 67]         dufour_coeff
    Use   [dufour_coeff.f, 68]         dufour_coeff
    Use   [dufour_coeff.f, 68]         dufour_coeff
    Use   [dufour_coeff.f, 68]         dufour_coeff
    Use   [dufour_coeff.f, 69]         dufour_coeff
    Use   [dufour_coeff.f, 70]         dufour_coeff
    Use   [dufour_coeff.f, 70]         dufour_coeff
    Use   [dufour_coeff.f, 70]         dufour_coeff
    Use   [dufour_coeff.f, 71]         dufour_coeff
    Use   [dufour_coeff.f, 71]         dufour_coeff
    Use   [dufour_coeff.f, 71]         dufour_coeff
    Use   [dufour_coeff.f, 72]         dufour_coeff
    Use   [dufour_coeff.f, 72]         dufour_coeff
    Use   [dufour_coeff.f, 72]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 73]         dufour_coeff
    Use   [dufour_coeff.f, 74]         dufour_coeff
    Use   [dufour_coeff.f, 74]         dufour_coeff
    Use   [dufour_coeff.f, 76]         dufour_coeff
    Use   [dufour_coeff.f, 76]         dufour_coeff
    Use   [dufour_coeff.f, 76]         dufour_coeff
    Use   [dufour_coeff.f, 77]         dufour_coeff
    Use   [dufour_coeff.f, 77]         dufour_coeff
    Use   [dufour_coeff.f, 77]         dufour_coeff
    Use   [dufour_coeff.f, 77]         dufour_coeff
    Use   [dufour_coeff.f, 78]         dufour_coeff
    Use   [dufour_coeff.f, 78]         dufour_coeff
    Use   [dufour_coeff.f, 79]         dufour_coeff
    Use   [dufour_coeff.f, 80]         dufour_coeff
    Use   [dufour_coeff.f, 80]         dufour_coeff
    Use   [dufour_coeff.f, 80]         dufour_coeff
    Use   [dufour_coeff.f, 81]         dufour_coeff
    Use   [dufour_coeff.f, 81]         dufour_coeff
    Use   [dufour_coeff.f, 82]         dufour_coeff
    Use   [dufour_coeff.f, 83]         dufour_coeff
    Use   [dufour_coeff.f, 83]         dufour_coeff
    Use   [dufour_coeff.f, 83]         dufour_coeff
    Use   [dufour_coeff.f, 83]         dufour_coeff
    Use   [dufour_coeff.f, 85]         dufour_coeff
    Use   [dufour_coeff.f, 85]         dufour_coeff
    Use   [dufour_coeff.f, 85]         dufour_coeff
    Set   [dufour_coeff.f, 94]         dufour_coeff
    Use   [dufour_coeff.f, 95]         dufour_coeff
    Use   [dufour_coeff.f, 95]         dufour_coeff
    Use   [dufour_coeff.f, 95]         dufour_coeff
    Use   [dufour_coeff.f, 96]         dufour_coeff
    Use   [dufour_coeff.f, 96]         dufour_coeff
    Use   [dufour_coeff.f, 96]         dufour_coeff
    Use   [dufour_coeff.f, 96]         dufour_coeff
    Use   [dufour_coeff.f, 97]         dufour_coeff
    Set   [dufour_coeff.f, 109]        dufour_coeff
    Use   [dufour_coeff.f, 110]        dufour_coeff
    Use   [dufour_coeff.f, 110]        dufour_coeff
    Use   [dufour_coeff.f, 110]        dufour_coeff
    Use   [dufour_coeff.f, 111]        dufour_coeff
    Use   [dufour_coeff.f, 111]        dufour_coeff
    Set   [dufour_coeff.f, 137]        dufour_coeff
    Use   [dufour_coeff.f, 139]        dufour_coeff
    Use   [dufour_coeff.f, 139]        dufour_coeff
    Use   [dufour_coeff.f, 140]        dufour_coeff
    Use   [dufour_coeff.f, 140]        dufour_coeff

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_u_s.f, 118]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 183]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 184]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 189]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 190]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 191]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 191]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 192]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 192]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 194]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 194]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 195]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 195]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 196]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 196]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 197]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 197]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 198]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 198]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 199]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 199]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 201]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 201]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 202]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 202]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 203]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 203]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 204]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 204]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 205]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 205]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 206]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 206]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 209]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 210]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 213]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 213]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 217]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 217]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 218]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 218]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 219]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 219]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 220]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 220]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 228]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 228]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 229]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 229]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 234]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 234]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 236]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 236]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 237]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 237]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 243]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 253]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 254]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 260]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 261]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 264]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 264]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 274]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 274]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 279]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 280]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 282]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 282]       CALC_IA_MOMSOURCE_U_S

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_set_bc0.f, 65]        CG_SET_BC0
    Set   [CG_set_bc0.f, 108]          CG_SET_BC0
    Use   [CG_set_bc0.f, 110]          CG_SET_BC0
    Use   [CG_set_bc0.f, 111]          CG_SET_BC0
    Use   [CG_set_bc0.f, 114]          CG_SET_BC0
    Use   [CG_set_bc0.f, 116]          CG_SET_BC0
    Use   [CG_set_bc0.f, 116]          CG_SET_BC0
    Use   [CG_set_bc0.f, 117]          CG_SET_BC0
    Use   [CG_set_bc0.f, 118]          CG_SET_BC0
    Use   [CG_set_bc0.f, 125]          CG_SET_BC0
    Use   [CG_set_bc0.f, 126]          CG_SET_BC0
    Use   [CG_set_bc0.f, 131]          CG_SET_BC0
    Use   [CG_set_bc0.f, 132]          CG_SET_BC0
    Use   [CG_set_bc0.f, 136]          CG_SET_BC0
    Use   [CG_set_bc0.f, 136]          CG_SET_BC0
    Use   [CG_set_bc0.f, 137]          CG_SET_BC0
    Use   [CG_set_bc0.f, 137]          CG_SET_BC0
    Use   [CG_set_bc0.f, 141]          CG_SET_BC0
    Use   [CG_set_bc0.f, 141]          CG_SET_BC0
    Use   [CG_set_bc0.f, 142]          CG_SET_BC0
    Use   [CG_set_bc0.f, 142]          CG_SET_BC0
    Use   [CG_set_bc0.f, 143]          CG_SET_BC0
    Use   [CG_set_bc0.f, 143]          CG_SET_BC0
    Use   [CG_set_bc0.f, 146]          CG_SET_BC0
    Use   [CG_set_bc0.f, 147]          CG_SET_BC0
    Use   [CG_set_bc0.f, 152]          CG_SET_BC0
    Use   [CG_set_bc0.f, 156]          CG_SET_BC0
    Use   [CG_set_bc0.f, 157]          CG_SET_BC0
    Use   [CG_set_bc0.f, 158]          CG_SET_BC0
    Use   [CG_set_bc0.f, 161]          CG_SET_BC0
    Use   [CG_set_bc0.f, 165]          CG_SET_BC0
    Use   [CG_set_bc0.f, 169]          CG_SET_BC0
    Use   [CG_set_bc0.f, 170]          CG_SET_BC0
    Use   [CG_set_bc0.f, 174]          CG_SET_BC0
    Use   [CG_set_bc0.f, 175]          CG_SET_BC0
    Use   [CG_set_bc0.f, 176]          CG_SET_BC0
    Use   [CG_set_bc0.f, 179]          CG_SET_BC0
    Use   [CG_set_bc0.f, 184]          CG_SET_BC0
    Use   [CG_set_bc0.f, 185]          CG_SET_BC0
    Use   [CG_set_bc0.f, 187]          CG_SET_BC0
    Use   [CG_set_bc0.f, 191]          CG_SET_BC0
    Use   [CG_set_bc0.f, 192]          CG_SET_BC0
    Use   [CG_set_bc0.f, 194]          CG_SET_BC0
    Use   [CG_set_bc0.f, 197]          CG_SET_BC0
    Use   [CG_set_bc0.f, 198]          CG_SET_BC0
    Use   [CG_set_bc0.f, 200]          CG_SET_BC0
    Use   [CG_set_bc0.f, 208]          CG_SET_BC0
    Use   [CG_set_bc0.f, 209]          CG_SET_BC0
    Use   [CG_set_bc0.f, 211]          CG_SET_BC0
    Use   [CG_set_bc0.f, 216]          CG_SET_BC0
    Use   [CG_set_bc0.f, 217]          CG_SET_BC0
    Use   [CG_set_bc0.f, 219]          CG_SET_BC0
    Use   [CG_set_bc0.f, 224]          CG_SET_BC0
    Use   [CG_set_bc0.f, 225]          CG_SET_BC0
    Use   [CG_set_bc0.f, 227]          CG_SET_BC0
    Use   [CG_set_bc0.f, 236]          CG_SET_BC0
    Use   [CG_set_bc0.f, 237]          CG_SET_BC0
    Use   [CG_set_bc0.f, 239]          CG_SET_BC0
    Use   [CG_set_bc0.f, 242]          CG_SET_BC0
    Use   [CG_set_bc0.f, 243]          CG_SET_BC0
    Use   [CG_set_bc0.f, 245]          CG_SET_BC0
    Use   [CG_set_bc0.f, 248]          CG_SET_BC0
    Use   [CG_set_bc0.f, 249]          CG_SET_BC0
    Use   [CG_set_bc0.f, 251]          CG_SET_BC0
    Use   [CG_set_bc0.f, 259]          CG_SET_BC0
    Use   [CG_set_bc0.f, 260]          CG_SET_BC0
    Use   [CG_set_bc0.f, 262]          CG_SET_BC0
    Use   [CG_set_bc0.f, 267]          CG_SET_BC0
    Use   [CG_set_bc0.f, 268]          CG_SET_BC0
    Use   [CG_set_bc0.f, 270]          CG_SET_BC0
    Use   [CG_set_bc0.f, 275]          CG_SET_BC0
    Use   [CG_set_bc0.f, 276]          CG_SET_BC0
    Use   [CG_set_bc0.f, 278]          CG_SET_BC0

L    (Local Variable)  Declared as: INTEGER
    Define   [set_fluidbed_p.f, 63]    SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 78]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 79]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 80]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 81]       SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 149]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 150]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 150]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 150]      SET_FLUIDBED_P

L    (Local Variable)  Declared as: INTEGER
    Define   [tau_w_s.f, 77]           CALC_TAU_W_S
    Set   [tau_w_s.f, 124]             CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 125]    CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 125]    CALC_TAU_W_S

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

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 118]          RRATES0
    Set   [rrates0.f, 314]             RRATES0
    Use   [rrates0.f, 315]             RRATES0
    Use   [rrates0.f, 315]             RRATES0
    Set   [rrates0.f, 320]             RRATES0
    Use   [rrates0.f, 322]             RRATES0
    Use   [rrates0.f, 323]             RRATES0
    Use   [rrates0.f, 324]             RRATES0
    Use   [rrates0.f, 326]             RRATES0
    Use   [rrates0.f, 326]             RRATES0
    Use   [rrates0.f, 326]             RRATES0
    Set   [rrates0.f, 377]             RRATES0
    Use   [rrates0.f, 378]             RRATES0
    Set   [rrates0.f, 382]             RRATES0
    Use   [rrates0.f, 383]             RRATES0
    Use   [rrates0.f, 383]             RRATES0

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [des_time_march.f, 50]    DES_TIME_MARCH
    Set   [des_time_march.f, 203]      DES_TIME_MARCH
    Use   [des_time_march.f, 204]      DES_TIME_MARCH
    Use   [des_time_march.f, 204]      DES_TIME_MARCH
    Use   [des_time_march.f, 205]      DES_TIME_MARCH
    Use   [des_time_march.f, 205]      DES_TIME_MARCH
    Use   [des_time_march.f, 205]      DES_TIME_MARCH
    Use Argument   [des_time_march.f, 206]   DES_TIME_MARCH

L    (Local Variable)  Declared as: INTEGER
    Define   [mfix.f, 106]             MFIX
    Set   [mfix.f, 208]                MFIX
    Use   [mfix.f, 209]                MFIX
    Set   [mfix.f, 233]                MFIX
    Use Argument   [mfix.f, 234]       MFIX
    Set   [mfix.f, 266]                MFIX
    Use Argument   [mfix.f, 267]       MFIX
    Use Argument   [mfix.f, 268]       MFIX
    Set   [mfix.f, 382]                MFIX
    Use Argument   [mfix.f, 383]       MFIX
    Use Argument   [mfix.f, 384]       MFIX

L    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 122]    CHECK_DATA_30
    Set   [check_data_30.f, 177]       CHECK_DATA_30
    Set   [check_data_30.f, 190]       CHECK_DATA_30
    Set   [check_data_30.f, 573]       CHECK_DATA_30
    Use   [check_data_30.f, 574]       CHECK_DATA_30
    Use   [check_data_30.f, 577]       CHECK_DATA_30
    Use   [check_data_30.f, 580]       CHECK_DATA_30
    Use   [check_data_30.f, 581]       CHECK_DATA_30
    Use   [check_data_30.f, 583]       CHECK_DATA_30
    Use   [check_data_30.f, 584]       CHECK_DATA_30
    Use   [check_data_30.f, 584]       CHECK_DATA_30
    Use   [check_data_30.f, 590]       CHECK_DATA_30
    Use   [check_data_30.f, 591]       CHECK_DATA_30
    Use   [check_data_30.f, 592]       CHECK_DATA_30
    Use   [check_data_30.f, 593]       CHECK_DATA_30
    Use   [check_data_30.f, 594]       CHECK_DATA_30
    Use   [check_data_30.f, 595]       CHECK_DATA_30
    Use   [check_data_30.f, 604]       CHECK_DATA_30
    Use   [check_data_30.f, 604]       CHECK_DATA_30
    Use   [check_data_30.f, 609]       CHECK_DATA_30
    Use   [check_data_30.f, 609]       CHECK_DATA_30
    Set   [check_data_30.f, 695]       CHECK_DATA_30
    Use   [check_data_30.f, 696]       CHECK_DATA_30
    Use   [check_data_30.f, 697]       CHECK_DATA_30
    Use   [check_data_30.f, 698]       CHECK_DATA_30
    Use   [check_data_30.f, 699]       CHECK_DATA_30
    Use   [check_data_30.f, 700]       CHECK_DATA_30
    Use   [check_data_30.f, 700]       CHECK_DATA_30
    Use   [check_data_30.f, 701]       CHECK_DATA_30
    Use   [check_data_30.f, 701]       CHECK_DATA_30
    Use   [check_data_30.f, 701]       CHECK_DATA_30
    Use   [check_data_30.f, 702]       CHECK_DATA_30
    Use   [check_data_30.f, 702]       CHECK_DATA_30
    Set   [check_data_30.f, 712]       CHECK_DATA_30
    Use   [check_data_30.f, 713]       CHECK_DATA_30
    Set   [check_data_30.f, 717]       CHECK_DATA_30
    Use   [check_data_30.f, 718]       CHECK_DATA_30
    Use   [check_data_30.f, 718]       CHECK_DATA_30
    Set   [check_data_30.f, 718]       CHECK_DATA_30
    Set   [check_data_30.f, 729]       CHECK_DATA_30
    Use   [check_data_30.f, 730]       CHECK_DATA_30
    Set   [check_data_30.f, 732]       CHECK_DATA_30
    Set   [check_data_30.f, 735]       CHECK_DATA_30
    Use   [check_data_30.f, 737]       CHECK_DATA_30
    Use   [check_data_30.f, 737]       CHECK_DATA_30
    Set   [check_data_30.f, 737]       CHECK_DATA_30

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 246]   INIT_PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 270]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 272]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 277]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 279]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 281]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 283]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 287]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 289]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 291]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 296]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 299]   INIT_PARTICLES_IN_CELL

L    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 53]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 73]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 75]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 77]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 79]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 82]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 83]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 85]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 86]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 88]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 89]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 92]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 98]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 100]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 103]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 104]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 106]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 107]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 109]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 110]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 113]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 122]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 124]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 127]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 128]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 130]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 131]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 133]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 134]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 137]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 147]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 148]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 149]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 150]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 153]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 186]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 190]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 194]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 195]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 197]   PARTICLES_IN_CELL

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 60]          DIF_V_IS
    Set   [dif_v_is.f, 86]             DIF_V_IS
    Use   [dif_v_is.f, 87]             DIF_V_IS
    Use   [dif_v_is.f, 88]             DIF_V_IS
    Use   [dif_v_is.f, 89]             DIF_V_IS
    Use   [dif_v_is.f, 90]             DIF_V_IS
    Use   [dif_v_is.f, 91]             DIF_V_IS
    Use   [dif_v_is.f, 92]             DIF_V_IS
    Use   [dif_v_is.f, 93]             DIF_V_IS
    Use   [dif_v_is.f, 95]             DIF_V_IS
    Use   [dif_v_is.f, 116]            DIF_V_IS

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 59]            BC_PHI
    Set   [bc_phi.f, 227]              BC_PHI
    Use   [bc_phi.f, 228]              BC_PHI
    Use   [bc_phi.f, 229]              BC_PHI
    Use   [bc_phi.f, 230]              BC_PHI
    Use   [bc_phi.f, 231]              BC_PHI
    Use   [bc_phi.f, 232]              BC_PHI
    Use   [bc_phi.f, 233]              BC_PHI
    Use   [bc_phi.f, 234]              BC_PHI
    Use   [bc_phi.f, 235]              BC_PHI
    Use   [bc_phi.f, 236]              BC_PHI
    Use   [bc_phi.f, 237]              BC_PHI
    Use   [bc_phi.f, 261]              BC_PHI
    Use   [bc_phi.f, 265]              BC_PHI
    Use   [bc_phi.f, 269]              BC_PHI
    Use   [bc_phi.f, 270]              BC_PHI
    Use   [bc_phi.f, 271]              BC_PHI
    Use   [bc_phi.f, 271]              BC_PHI
    Use   [bc_phi.f, 272]              BC_PHI
    Use   [bc_phi.f, 275]              BC_PHI
    Use   [bc_phi.f, 278]              BC_PHI
    Use   [bc_phi.f, 280]              BC_PHI
    Use   [bc_phi.f, 281]              BC_PHI
    Use   [bc_phi.f, 282]              BC_PHI
    Use   [bc_phi.f, 282]              BC_PHI
    Use   [bc_phi.f, 283]              BC_PHI
    Use   [bc_phi.f, 286]              BC_PHI
    Use   [bc_phi.f, 289]              BC_PHI
    Use   [bc_phi.f, 291]              BC_PHI
    Use   [bc_phi.f, 292]              BC_PHI
    Use   [bc_phi.f, 293]              BC_PHI
    Use   [bc_phi.f, 293]              BC_PHI
    Use   [bc_phi.f, 294]              BC_PHI
    Use   [bc_phi.f, 297]              BC_PHI
    Use   [bc_phi.f, 300]              BC_PHI
    Use   [bc_phi.f, 302]              BC_PHI
    Use   [bc_phi.f, 303]              BC_PHI
    Use   [bc_phi.f, 304]              BC_PHI
    Use   [bc_phi.f, 304]              BC_PHI
    Use   [bc_phi.f, 305]              BC_PHI
    Use   [bc_phi.f, 308]              BC_PHI
    Use   [bc_phi.f, 311]              BC_PHI
    Use   [bc_phi.f, 313]              BC_PHI
    Use   [bc_phi.f, 314]              BC_PHI
    Use   [bc_phi.f, 315]              BC_PHI
    Use   [bc_phi.f, 315]              BC_PHI
    Use   [bc_phi.f, 316]              BC_PHI
    Use   [bc_phi.f, 319]              BC_PHI
    Use   [bc_phi.f, 322]              BC_PHI
    Use   [bc_phi.f, 324]              BC_PHI
    Use   [bc_phi.f, 326]              BC_PHI
    Use   [bc_phi.f, 328]              BC_PHI
    Use   [bc_phi.f, 328]              BC_PHI
    Use   [bc_phi.f, 329]              BC_PHI
    Set   [bc_phi.f, 346]              BC_PHI
    Use   [bc_phi.f, 347]              BC_PHI
    Use   [bc_phi.f, 348]              BC_PHI
    Use   [bc_phi.f, 349]              BC_PHI
    Use   [bc_phi.f, 350]              BC_PHI
    Use   [bc_phi.f, 351]              BC_PHI
    Use   [bc_phi.f, 352]              BC_PHI
    Use   [bc_phi.f, 353]              BC_PHI
    Use   [bc_phi.f, 354]              BC_PHI
    Use   [bc_phi.f, 355]              BC_PHI
    Use   [bc_phi.f, 356]              BC_PHI
    Use   [bc_phi.f, 375]              BC_PHI
    Use   [bc_phi.f, 398]              BC_PHI
    Use   [bc_phi.f, 399]              BC_PHI
    Use   [bc_phi.f, 405]              BC_PHI
    Use   [bc_phi.f, 406]              BC_PHI
    Use   [bc_phi.f, 407]              BC_PHI
    Use   [bc_phi.f, 408]              BC_PHI
    Use   [bc_phi.f, 409]              BC_PHI
    Use   [bc_phi.f, 410]              BC_PHI

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 506]           BC_PHI_CG
    Set   [bc_phi.f, 551]              BC_PHI_CG
    Use   [bc_phi.f, 552]              BC_PHI_CG
    Use   [bc_phi.f, 555]              BC_PHI_CG
    Use   [bc_phi.f, 557]              BC_PHI_CG
    Use   [bc_phi.f, 558]              BC_PHI_CG
    Use   [bc_phi.f, 559]              BC_PHI_CG
    Use   [bc_phi.f, 559]              BC_PHI_CG
    Use   [bc_phi.f, 559]              BC_PHI_CG
    Set   [bc_phi.f, 572]              BC_PHI_CG
    Use   [bc_phi.f, 573]              BC_PHI_CG
    Use   [bc_phi.f, 576]              BC_PHI_CG
    Use   [bc_phi.f, 578]              BC_PHI_CG
    Use   [bc_phi.f, 579]              BC_PHI_CG
    Use   [bc_phi.f, 580]              BC_PHI_CG
    Use   [bc_phi.f, 580]              BC_PHI_CG
    Use   [bc_phi.f, 580]              BC_PHI_CG
    Set   [bc_phi.f, 593]              BC_PHI_CG
    Use   [bc_phi.f, 594]              BC_PHI_CG
    Use   [bc_phi.f, 597]              BC_PHI_CG
    Use   [bc_phi.f, 599]              BC_PHI_CG
    Use   [bc_phi.f, 600]              BC_PHI_CG
    Use   [bc_phi.f, 601]              BC_PHI_CG
    Use   [bc_phi.f, 601]              BC_PHI_CG
    Use   [bc_phi.f, 601]              BC_PHI_CG
    Set   [bc_phi.f, 614]              BC_PHI_CG
    Use   [bc_phi.f, 615]              BC_PHI_CG
    Use   [bc_phi.f, 618]              BC_PHI_CG
    Use   [bc_phi.f, 620]              BC_PHI_CG
    Use   [bc_phi.f, 621]              BC_PHI_CG
    Use   [bc_phi.f, 622]              BC_PHI_CG
    Use   [bc_phi.f, 622]              BC_PHI_CG
    Use   [bc_phi.f, 622]              BC_PHI_CG
    Set   [bc_phi.f, 635]              BC_PHI_CG
    Use   [bc_phi.f, 636]              BC_PHI_CG
    Use   [bc_phi.f, 639]              BC_PHI_CG
    Use   [bc_phi.f, 641]              BC_PHI_CG
    Use   [bc_phi.f, 642]              BC_PHI_CG
    Use   [bc_phi.f, 643]              BC_PHI_CG
    Use   [bc_phi.f, 643]              BC_PHI_CG
    Use   [bc_phi.f, 643]              BC_PHI_CG
    Set   [bc_phi.f, 656]              BC_PHI_CG
    Use   [bc_phi.f, 657]              BC_PHI_CG
    Use   [bc_phi.f, 660]              BC_PHI_CG
    Use   [bc_phi.f, 662]              BC_PHI_CG
    Use   [bc_phi.f, 663]              BC_PHI_CG
    Use   [bc_phi.f, 664]              BC_PHI_CG
    Use   [bc_phi.f, 664]              BC_PHI_CG
    Use   [bc_phi.f, 664]              BC_PHI_CG
    Set   [bc_phi.f, 681]              BC_PHI_CG
    Use   [bc_phi.f, 689]              BC_PHI_CG

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 75]        SOURCE_W_G
    Set   [source_w_g.f, 296]          SOURCE_W_G
    Use   [source_w_g.f, 297]          SOURCE_W_G
    Use   [source_w_g.f, 297]          SOURCE_W_G
    Use   [source_w_g.f, 299]          SOURCE_W_G
    Use   [source_w_g.f, 299]          SOURCE_W_G
    Use   [source_w_g.f, 299]          SOURCE_W_G
    Set   [source_w_g.f, 308]          SOURCE_W_G
    Use   [source_w_g.f, 309]          SOURCE_W_G
    Use   [source_w_g.f, 310]          SOURCE_W_G
    Use   [source_w_g.f, 310]          SOURCE_W_G
    Use   [source_w_g.f, 311]          SOURCE_W_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 465]       SOURCE_W_G_BC
    Set   [source_w_g.f, 614]          SOURCE_W_G_BC
    Use   [source_w_g.f, 615]          SOURCE_W_G_BC
    Use   [source_w_g.f, 619]          SOURCE_W_G_BC
    Use   [source_w_g.f, 620]          SOURCE_W_G_BC
    Use   [source_w_g.f, 621]          SOURCE_W_G_BC
    Use   [source_w_g.f, 622]          SOURCE_W_G_BC
    Use   [source_w_g.f, 623]          SOURCE_W_G_BC
    Use   [source_w_g.f, 624]          SOURCE_W_G_BC
    Use   [source_w_g.f, 625]          SOURCE_W_G_BC
    Use   [source_w_g.f, 654]          SOURCE_W_G_BC
    Use   [source_w_g.f, 655]          SOURCE_W_G_BC
    Use   [source_w_g.f, 656]          SOURCE_W_G_BC
    Use   [source_w_g.f, 657]          SOURCE_W_G_BC
    Use   [source_w_g.f, 658]          SOURCE_W_G_BC
    Use   [source_w_g.f, 659]          SOURCE_W_G_BC
    Use   [source_w_g.f, 660]          SOURCE_W_G_BC
    Use   [source_w_g.f, 689]          SOURCE_W_G_BC
    Use   [source_w_g.f, 690]          SOURCE_W_G_BC
    Use   [source_w_g.f, 691]          SOURCE_W_G_BC
    Use   [source_w_g.f, 692]          SOURCE_W_G_BC
    Use   [source_w_g.f, 693]          SOURCE_W_G_BC
    Use   [source_w_g.f, 694]          SOURCE_W_G_BC
    Use   [source_w_g.f, 695]          SOURCE_W_G_BC
    Use   [source_w_g.f, 714]          SOURCE_W_G_BC
    Use   [source_w_g.f, 717]          SOURCE_W_G_BC
    Use   [source_w_g.f, 720]          SOURCE_W_G_BC
    Use   [source_w_g.f, 722]          SOURCE_W_G_BC
    Use   [source_w_g.f, 724]          SOURCE_W_G_BC
    Use   [source_w_g.f, 724]          SOURCE_W_G_BC
    Use   [source_w_g.f, 726]          SOURCE_W_G_BC
    Use   [source_w_g.f, 727]          SOURCE_W_G_BC
    Use   [source_w_g.f, 728]          SOURCE_W_G_BC
    Use   [source_w_g.f, 728]          SOURCE_W_G_BC
    Use   [source_w_g.f, 732]          SOURCE_W_G_BC
    Use   [source_w_g.f, 735]          SOURCE_W_G_BC
    Use   [source_w_g.f, 738]          SOURCE_W_G_BC
    Use   [source_w_g.f, 740]          SOURCE_W_G_BC
    Use   [source_w_g.f, 742]          SOURCE_W_G_BC
    Use   [source_w_g.f, 742]          SOURCE_W_G_BC
    Use   [source_w_g.f, 744]          SOURCE_W_G_BC
    Use   [source_w_g.f, 745]          SOURCE_W_G_BC
    Use   [source_w_g.f, 746]          SOURCE_W_G_BC
    Use   [source_w_g.f, 746]          SOURCE_W_G_BC
    Use   [source_w_g.f, 750]          SOURCE_W_G_BC
    Use   [source_w_g.f, 753]          SOURCE_W_G_BC
    Use   [source_w_g.f, 755]          SOURCE_W_G_BC
    Use   [source_w_g.f, 756]          SOURCE_W_G_BC
    Use   [source_w_g.f, 757]          SOURCE_W_G_BC
    Use   [source_w_g.f, 757]          SOURCE_W_G_BC
    Use   [source_w_g.f, 760]          SOURCE_W_G_BC
    Use   [source_w_g.f, 763]          SOURCE_W_G_BC
    Use   [source_w_g.f, 765]          SOURCE_W_G_BC
    Use   [source_w_g.f, 766]          SOURCE_W_G_BC
    Use   [source_w_g.f, 767]          SOURCE_W_G_BC
    Use   [source_w_g.f, 767]          SOURCE_W_G_BC
    Use   [source_w_g.f, 776]          SOURCE_W_G_BC
    Use   [source_w_g.f, 777]          SOURCE_W_G_BC
    Use   [source_w_g.f, 778]          SOURCE_W_G_BC
    Use   [source_w_g.f, 780]          SOURCE_W_G_BC
    Use   [source_w_g.f, 781]          SOURCE_W_G_BC
    Use   [source_w_g.f, 782]          SOURCE_W_G_BC
    Use   [source_w_g.f, 783]          SOURCE_W_G_BC
    Use   [source_w_g.f, 784]          SOURCE_W_G_BC
    Use   [source_w_g.f, 785]          SOURCE_W_G_BC
    Use   [source_w_g.f, 821]          SOURCE_W_G_BC
    Use   [source_w_g.f, 821]          SOURCE_W_G_BC
    Use   [source_w_g.f, 840]          SOURCE_W_G_BC
    Use   [source_w_g.f, 840]          SOURCE_W_G_BC
    Use   [source_w_g.f, 845]          SOURCE_W_G_BC
    Use   [source_w_g.f, 845]          SOURCE_W_G_BC
    Use   [source_w_g.f, 850]          SOURCE_W_G_BC
    Use   [source_w_g.f, 850]          SOURCE_W_G_BC
    Use   [source_w_g.f, 861]          SOURCE_W_G_BC
    Use   [source_w_g.f, 861]          SOURCE_W_G_BC
    Use   [source_w_g.f, 862]          SOURCE_W_G_BC
    Use   [source_w_g.f, 866]          SOURCE_W_G_BC
    Use   [source_w_g.f, 867]          SOURCE_W_G_BC
    Use   [source_w_g.f, 868]          SOURCE_W_G_BC
    Use   [source_w_g.f, 869]          SOURCE_W_G_BC
    Use   [source_w_g.f, 870]          SOURCE_W_G_BC
    Use   [source_w_g.f, 871]          SOURCE_W_G_BC
    Use   [source_w_g.f, 895]          SOURCE_W_G_BC
    Use   [source_w_g.f, 896]          SOURCE_W_G_BC
    Use   [source_w_g.f, 897]          SOURCE_W_G_BC
    Use   [source_w_g.f, 898]          SOURCE_W_G_BC
    Use   [source_w_g.f, 899]          SOURCE_W_G_BC
    Use   [source_w_g.f, 900]          SOURCE_W_G_BC
    Use   [source_w_g.f, 901]          SOURCE_W_G_BC
    Use   [source_w_g.f, 902]          SOURCE_W_G_BC
    Use   [source_w_g.f, 929]          SOURCE_W_G_BC
    Use   [source_w_g.f, 930]          SOURCE_W_G_BC
    Use   [source_w_g.f, 931]          SOURCE_W_G_BC
    Use   [source_w_g.f, 932]          SOURCE_W_G_BC
    Use   [source_w_g.f, 933]          SOURCE_W_G_BC
    Use   [source_w_g.f, 934]          SOURCE_W_G_BC
    Use   [source_w_g.f, 935]          SOURCE_W_G_BC
    Use   [source_w_g.f, 963]          SOURCE_W_G_BC
    Use   [source_w_g.f, 964]          SOURCE_W_G_BC
    Use   [source_w_g.f, 965]          SOURCE_W_G_BC
    Use   [source_w_g.f, 966]          SOURCE_W_G_BC
    Use   [source_w_g.f, 967]          SOURCE_W_G_BC
    Use   [source_w_g.f, 968]          SOURCE_W_G_BC
    Use   [source_w_g.f, 984]          SOURCE_W_G_BC

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 32]   CHECK_CELL_MOVEMENT
    Set   [check_cell_movement.f, 45]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 47]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 47]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 50]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 51]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 52]   CHECK_CELL_MOVEMENT

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 100]   CHECK_CELL_MOVEMENT_DEM
    Set   [check_cell_movement.f, 113]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 115]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 115]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 118]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 119]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 120]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 123]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 124]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 124]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 129]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 130]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 130]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 135]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 136]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 136]   CHECK_CELL_MOVEMENT_DEM

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 210]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 233]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 235]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 235]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 240]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 241]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 242]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 245]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 251]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 256]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 259]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 260]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 260]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 266]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 270]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 271]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 271]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 280]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 285]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 288]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 289]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 289]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 296]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 300]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 301]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 301]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 310]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 315]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 318]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 319]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 319]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 325]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 329]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 330]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 330]   CHECK_CELL_MOVEMENT_PIC

L    (Local Variable)  Declared as: INTEGER
    Define   [location.f, 47]          LOCATION
    Set   [location.f, 51]             LOCATION
    Set   [location.f, 59]             LOCATION

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_resid.f, 579]       CALC_RESID_MB
    Set   [calc_resid.f, 631]          CALC_RESID_MB
    Use   [calc_resid.f, 632]          CALC_RESID_MB
    Use   [calc_resid.f, 637]          CALC_RESID_MB
    Use   [calc_resid.f, 637]          CALC_RESID_MB
    Use   [calc_resid.f, 637]          CALC_RESID_MB
    Use   [calc_resid.f, 638]          CALC_RESID_MB
    Use   [calc_resid.f, 638]          CALC_RESID_MB
    Use   [calc_resid.f, 638]          CALC_RESID_MB
    Use   [calc_resid.f, 638]          CALC_RESID_MB
    Use   [calc_resid.f, 641]          CALC_RESID_MB
    Use   [calc_resid.f, 641]          CALC_RESID_MB
    Use   [calc_resid.f, 641]          CALC_RESID_MB
    Use   [calc_resid.f, 642]          CALC_RESID_MB
    Use   [calc_resid.f, 642]          CALC_RESID_MB
    Use   [calc_resid.f, 642]          CALC_RESID_MB
    Use   [calc_resid.f, 642]          CALC_RESID_MB
    Set   [calc_resid.f, 667]          CALC_RESID_MB
    Use   [calc_resid.f, 668]          CALC_RESID_MB
    Use   [calc_resid.f, 673]          CALC_RESID_MB
    Use   [calc_resid.f, 673]          CALC_RESID_MB
    Use   [calc_resid.f, 673]          CALC_RESID_MB
    Use   [calc_resid.f, 674]          CALC_RESID_MB
    Use   [calc_resid.f, 674]          CALC_RESID_MB
    Use   [calc_resid.f, 674]          CALC_RESID_MB
    Use   [calc_resid.f, 674]          CALC_RESID_MB
    Use   [calc_resid.f, 677]          CALC_RESID_MB
    Use   [calc_resid.f, 677]          CALC_RESID_MB
    Use   [calc_resid.f, 677]          CALC_RESID_MB
    Use   [calc_resid.f, 678]          CALC_RESID_MB
    Use   [calc_resid.f, 678]          CALC_RESID_MB
    Use   [calc_resid.f, 678]          CALC_RESID_MB
    Use   [calc_resid.f, 678]          CALC_RESID_MB

L    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 252]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 306]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 308]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 310]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 313]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 313]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 314]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 314]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 317]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 317]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 318]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 318]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 318]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 360]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 361]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 361]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 364]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 365]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 365]      WRITE_DES_TECPLOT

L    (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, 116]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 117]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 118]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 119]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 120]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 126]   GET_CUT_CELL_VOLUME_AND_AREAS

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [tau_v_s.f, 77]           CALC_TAU_V_S
    Set   [tau_v_s.f, 120]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 121]    CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 121]    CALC_TAU_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m_var.f, 44]    WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 89]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 91]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 102]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 124]      WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 124]      WRITE_AB_M_VAR

L    (Dummy Argument)  Declared as: INTEGER
    Define   [calc_mw.f, 23]           CALC_MW
    Declare   [calc_mw.f, 53]          CALC_MW
    Use   [calc_mw.f, 66]              CALC_MW

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

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

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [bc_theta.f, 292]         CALC_THETA_BC
    Declare   [bc_theta.f, 326]        CALC_THETA_BC
    Use   [bc_theta.f, 449]            CALC_THETA_BC
    Use   [bc_theta.f, 449]            CALC_THETA_BC
    Use   [bc_theta.f, 494]            CALC_THETA_BC
    Use   [bc_theta.f, 494]            CALC_THETA_BC
    Use   [bc_theta.f, 539]            CALC_THETA_BC
    Use   [bc_theta.f, 539]            CALC_THETA_BC
    Use   [bc_theta.f, 584]            CALC_THETA_BC
    Use   [bc_theta.f, 584]            CALC_THETA_BC
    Use   [bc_theta.f, 629]            CALC_THETA_BC
    Use   [bc_theta.f, 629]            CALC_THETA_BC
    Use   [bc_theta.f, 674]            CALC_THETA_BC
    Use   [bc_theta.f, 674]            CALC_THETA_BC
    Use Argument   [bc_theta.f, 688]   CALC_THETA_BC

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

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 1448]       gt_pde_ia
    Set   [calc_mu_s.f, 1477]          gt_pde_ia
    Use Argument   [calc_mu_s.f, 1478]   gt_pde_ia
    Use   [calc_mu_s.f, 1478]          gt_pde_ia
    Set   [calc_mu_s.f, 1514]          gt_pde_ia
    Use   [calc_mu_s.f, 1515]          gt_pde_ia
    Use   [calc_mu_s.f, 1516]          gt_pde_ia
    Use   [calc_mu_s.f, 1519]          gt_pde_ia
    Use   [calc_mu_s.f, 1521]          gt_pde_ia
    Use   [calc_mu_s.f, 1527]          gt_pde_ia
    Use   [calc_mu_s.f, 1532]          gt_pde_ia
    Use   [calc_mu_s.f, 1537]          gt_pde_ia
    Use   [calc_mu_s.f, 1540]          gt_pde_ia
    Use   [calc_mu_s.f, 1544]          gt_pde_ia
    Use   [calc_mu_s.f, 1548]          gt_pde_ia
    Use   [calc_mu_s.f, 1551]          gt_pde_ia
    Use   [calc_mu_s.f, 1553]          gt_pde_ia
    Use   [calc_mu_s.f, 1556]          gt_pde_ia
    Use   [calc_mu_s.f, 1568]          gt_pde_ia
    Use   [calc_mu_s.f, 1571]          gt_pde_ia
    Use   [calc_mu_s.f, 1574]          gt_pde_ia
    Use   [calc_mu_s.f, 1578]          gt_pde_ia
    Use   [calc_mu_s.f, 1579]          gt_pde_ia
    Use   [calc_mu_s.f, 1584]          gt_pde_ia
    Use   [calc_mu_s.f, 1588]          gt_pde_ia
    Use   [calc_mu_s.f, 1592]          gt_pde_ia
    Use   [calc_mu_s.f, 1596]          gt_pde_ia
    Use   [calc_mu_s.f, 1600]          gt_pde_ia
    Use   [calc_mu_s.f, 1601]          gt_pde_ia
    Set   [calc_mu_s.f, 1642]          gt_pde_ia
    Use   [calc_mu_s.f, 1643]          gt_pde_ia
    Use   [calc_mu_s.f, 1644]          gt_pde_ia
    Use   [calc_mu_s.f, 1647]          gt_pde_ia
    Use   [calc_mu_s.f, 1649]          gt_pde_ia
    Use   [calc_mu_s.f, 1655]          gt_pde_ia
    Use   [calc_mu_s.f, 1663]          gt_pde_ia
    Use   [calc_mu_s.f, 1667]          gt_pde_ia
    Use   [calc_mu_s.f, 1674]          gt_pde_ia
    Use   [calc_mu_s.f, 1675]          gt_pde_ia
    Use   [calc_mu_s.f, 1678]          gt_pde_ia
    Use   [calc_mu_s.f, 1709]          gt_pde_ia
    Use   [calc_mu_s.f, 1727]          gt_pde_ia
    Use   [calc_mu_s.f, 1728]          gt_pde_ia
    Use   [calc_mu_s.f, 1748]          gt_pde_ia
    Use   [calc_mu_s.f, 1750]          gt_pde_ia
    Use   [calc_mu_s.f, 1750]          gt_pde_ia
    Use   [calc_mu_s.f, 1755]          gt_pde_ia
    Use   [calc_mu_s.f, 1757]          gt_pde_ia
    Use   [calc_mu_s.f, 1761]          gt_pde_ia
    Use   [calc_mu_s.f, 1764]          gt_pde_ia
    Use   [calc_mu_s.f, 1767]          gt_pde_ia
    Use   [calc_mu_s.f, 1767]          gt_pde_ia
    Use   [calc_mu_s.f, 1768]          gt_pde_ia
    Use   [calc_mu_s.f, 1768]          gt_pde_ia

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2632]       init_mu_s
    Set   [calc_mu_s.f, 2905]          init_mu_s
    Use   [calc_mu_s.f, 2906]          init_mu_s
    Use   [calc_mu_s.f, 2907]          init_mu_s
    Use   [calc_mu_s.f, 2909]          init_mu_s
    Use   [calc_mu_s.f, 2909]          init_mu_s
    Use   [calc_mu_s.f, 2910]          init_mu_s
    Use   [calc_mu_s.f, 2910]          init_mu_s
    Use   [calc_mu_s.f, 2912]          init_mu_s
    Use   [calc_mu_s.f, 2912]          init_mu_s
    Use   [calc_mu_s.f, 2913]          init_mu_s
    Use   [calc_mu_s.f, 2913]          init_mu_s
    Use   [calc_mu_s.f, 2915]          init_mu_s
    Use   [calc_mu_s.f, 2915]          init_mu_s
    Use   [calc_mu_s.f, 2916]          init_mu_s
    Use   [calc_mu_s.f, 2916]          init_mu_s
    Use   [calc_mu_s.f, 2918]          init_mu_s
    Use   [calc_mu_s.f, 2918]          init_mu_s
    Use   [calc_mu_s.f, 2919]          init_mu_s
    Use   [calc_mu_s.f, 2919]          init_mu_s
    Use   [calc_mu_s.f, 2923]          init_mu_s
    Use   [calc_mu_s.f, 2923]          init_mu_s
    Use   [calc_mu_s.f, 2924]          init_mu_s
    Use   [calc_mu_s.f, 2926]          init_mu_s
    Use   [calc_mu_s.f, 2929]          init_mu_s
    Use   [calc_mu_s.f, 2931]          init_mu_s
    Use   [calc_mu_s.f, 2933]          init_mu_s
    Use   [calc_mu_s.f, 2933]          init_mu_s
    Use   [calc_mu_s.f, 2936]          init_mu_s
    Use   [calc_mu_s.f, 2936]          init_mu_s
    Use   [calc_mu_s.f, 2937]          init_mu_s
    Use   [calc_mu_s.f, 2937]          init_mu_s
    Use   [calc_mu_s.f, 2939]          init_mu_s
    Use   [calc_mu_s.f, 2939]          init_mu_s
    Use   [calc_mu_s.f, 2940]          init_mu_s
    Use   [calc_mu_s.f, 2940]          init_mu_s
    Use   [calc_mu_s.f, 2944]          init_mu_s
    Use   [calc_mu_s.f, 2944]          init_mu_s
    Use   [calc_mu_s.f, 2945]          init_mu_s
    Use   [calc_mu_s.f, 2945]          init_mu_s
    Use   [calc_mu_s.f, 2947]          init_mu_s
    Use   [calc_mu_s.f, 2947]          init_mu_s
    Use   [calc_mu_s.f, 2948]          init_mu_s
    Use   [calc_mu_s.f, 2948]          init_mu_s
    Use   [calc_mu_s.f, 2950]          init_mu_s
    Use   [calc_mu_s.f, 2950]          init_mu_s
    Use   [calc_mu_s.f, 2951]          init_mu_s
    Use   [calc_mu_s.f, 2951]          init_mu_s
    Use   [calc_mu_s.f, 2953]          init_mu_s
    Use   [calc_mu_s.f, 2953]          init_mu_s
    Use   [calc_mu_s.f, 2954]          init_mu_s
    Use   [calc_mu_s.f, 2954]          init_mu_s
    Use   [calc_mu_s.f, 2956]          init_mu_s
    Use   [calc_mu_s.f, 2956]          init_mu_s
    Use   [calc_mu_s.f, 2957]          init_mu_s
    Use   [calc_mu_s.f, 2957]          init_mu_s
    Use   [calc_mu_s.f, 2959]          init_mu_s
    Use   [calc_mu_s.f, 2959]          init_mu_s
    Use   [calc_mu_s.f, 2960]          init_mu_s
    Use   [calc_mu_s.f, 2960]          init_mu_s
    Use   [calc_mu_s.f, 2963]          init_mu_s
    Use   [calc_mu_s.f, 2963]          init_mu_s
    Use   [calc_mu_s.f, 2964]          init_mu_s
    Use   [calc_mu_s.f, 2964]          init_mu_s
    Use   [calc_mu_s.f, 2973]          init_mu_s
    Use   [calc_mu_s.f, 2973]          init_mu_s
    Use   [calc_mu_s.f, 2975]          init_mu_s
    Use   [calc_mu_s.f, 2975]          init_mu_s
    Use   [calc_mu_s.f, 2977]          init_mu_s
    Use   [calc_mu_s.f, 2977]          init_mu_s
    Use   [calc_mu_s.f, 2979]          init_mu_s
    Use   [calc_mu_s.f, 2979]          init_mu_s
    Use   [calc_mu_s.f, 2981]          init_mu_s
    Use   [calc_mu_s.f, 2981]          init_mu_s
    Use   [calc_mu_s.f, 2983]          init_mu_s
    Use   [calc_mu_s.f, 2983]          init_mu_s
    Use   [calc_mu_s.f, 2985]          init_mu_s
    Use   [calc_mu_s.f, 2985]          init_mu_s
    Use   [calc_mu_s.f, 2987]          init_mu_s
    Use   [calc_mu_s.f, 2987]          init_mu_s
    Use   [calc_mu_s.f, 2989]          init_mu_s
    Use   [calc_mu_s.f, 2989]          init_mu_s
    Use   [calc_mu_s.f, 2991]          init_mu_s
    Use   [calc_mu_s.f, 2991]          init_mu_s
    Use   [calc_mu_s.f, 2993]          init_mu_s
    Use   [calc_mu_s.f, 2993]          init_mu_s
    Use   [calc_mu_s.f, 2995]          init_mu_s
    Use   [calc_mu_s.f, 2995]          init_mu_s
    Use   [calc_mu_s.f, 3000]          init_mu_s
    Use   [calc_mu_s.f, 3000]          init_mu_s
    Use   [calc_mu_s.f, 3006]          init_mu_s
    Use   [calc_mu_s.f, 3006]          init_mu_s
    Use   [calc_mu_s.f, 3011]          init_mu_s
    Use   [calc_mu_s.f, 3011]          init_mu_s
    Use   [calc_mu_s.f, 3016]          init_mu_s
    Use   [calc_mu_s.f, 3019]          init_mu_s
    Use   [calc_mu_s.f, 3019]          init_mu_s
    Use   [calc_mu_s.f, 3025]          init_mu_s
    Use   [calc_mu_s.f, 3025]          init_mu_s

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 227]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 228]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 229]   CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 299]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 300]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 301]   CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 304]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 305]   CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 312]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 314]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 314]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 315]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 315]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 318]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 319]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 320]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 320]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 320]            CALC_D_T_GAS_AND_SOLIDS

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

L    (Local Variable)  Declared as: INTEGER
    Define   [check_convergence.f, 59]   CHECK_CONVERGENCE
    Set   [check_convergence.f, 138]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 140]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 141]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 142]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 144]   CHECK_CONVERGENCE
    Use   [check_convergence.f, 145]   CHECK_CONVERGENCE

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

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 231]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 232]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 233]   CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 304]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 305]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 306]   CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 309]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 310]   CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 317]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 319]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 320]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 320]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 320]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 324]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 325]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 326]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 326]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 326]            CALC_D_E_GAS_AND_SOLIDS

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 559]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 601]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 602]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 603]   CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 614]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 615]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 616]   CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 619]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 620]   CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 626]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 628]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 629]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 629]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 629]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 633]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 633]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 634]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 634]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 635]            CALC_D_E_SOLIDS_ONLY

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [check_output_control.f, 48]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 125]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 126]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 127]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 127]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 128]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 128]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 129]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 129]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 130]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 130]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 131]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 131]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 132]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 132]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 134]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 155]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 156]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 156]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 156]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 160]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 162]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 166]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 169]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 172]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 173]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 176]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 180]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 185]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 189]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 191]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 196]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 201]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 208]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 213]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 218]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 223]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 224]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 228]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 229]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 232]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 235]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 238]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 242]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 247]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 251]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 254]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 257]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 260]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 263]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 266]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 269]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 272]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 275]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 278]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 281]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 284]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 287]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 290]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 293]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 296]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 299]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 308]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 308]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 332]   CHECK_OUTPUT_CONTROL

L    (Local Variable)  Declared as: INTEGER
    Define   [utilities.f, 75]         MAX_VEL_INLET
    Set   [utilities.f, 81]            MAX_VEL_INLET
    Use   [utilities.f, 82]            MAX_VEL_INLET
    Use   [utilities.f, 83]            MAX_VEL_INLET
    Use   [utilities.f, 83]            MAX_VEL_INLET
    Use   [utilities.f, 85]            MAX_VEL_INLET
    Use   [utilities.f, 85]            MAX_VEL_INLET
    Use   [utilities.f, 86]            MAX_VEL_INLET
    Use   [utilities.f, 86]            MAX_VEL_INLET
    Use   [utilities.f, 87]            MAX_VEL_INLET
    Use   [utilities.f, 87]            MAX_VEL_INLET
    Use   [utilities.f, 92]            MAX_VEL_INLET
    Use   [utilities.f, 111]           MAX_VEL_INLET

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

L    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 26]           NSQUARE
    Set   [nsquare.f, 40]              NSQUARE
    Use   [nsquare.f, 43]              NSQUARE
    Use   [nsquare.f, 46]              NSQUARE
    Use   [nsquare.f, 51]              NSQUARE
    Use   [nsquare.f, 65]              NSQUARE
    Use   [nsquare.f, 68]              NSQUARE
    Use   [nsquare.f, 74]              NSQUARE
    Use   [nsquare.f, 77]              NSQUARE
    Use   [nsquare.f, 85]              NSQUARE
    Use   [nsquare.f, 88]              NSQUARE
    Use   [nsquare.f, 105]             NSQUARE
    Use   [nsquare.f, 110]             NSQUARE
    Use   [nsquare.f, 118]             NSQUARE
    Use   [nsquare.f, 124]             NSQUARE

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_dtpic.f, 32]        CALC_DTPIC
    Set   [calc_dtpic.f, 44]           CALC_DTPIC
    Use   [calc_dtpic.f, 46]           CALC_DTPIC
    Use   [calc_dtpic.f, 48]           CALC_DTPIC
    Use   [calc_dtpic.f, 50]           CALC_DTPIC
    Use   [calc_dtpic.f, 51]           CALC_DTPIC
    Use   [calc_dtpic.f, 52]           CALC_DTPIC
    Use   [calc_dtpic.f, 53]           CALC_DTPIC
    Use   [calc_dtpic.f, 55]           CALC_DTPIC
    Use   [calc_dtpic.f, 56]           CALC_DTPIC

L    (Local Variable)  Declared as: INTEGER
    Define   [check_numerics.f, 53]    CHECK_NUMERICS
    Set   [check_numerics.f, 65]       CHECK_NUMERICS
    Use   [check_numerics.f, 66]       CHECK_NUMERICS

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_w_s.f, 1013]      JJ_BC_W_S
    Declare   [source_w_s.f, 1044]     JJ_BC_W_S
    Use   [source_w_s.f, 1086]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1088]   JJ_BC_W_S
    Use   [source_w_s.f, 1089]         JJ_BC_W_S
    Use   [source_w_s.f, 1092]         JJ_BC_W_S
    Use   [source_w_s.f, 1114]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1116]   JJ_BC_W_S
    Use   [source_w_s.f, 1117]         JJ_BC_W_S
    Use   [source_w_s.f, 1120]         JJ_BC_W_S
    Use   [source_w_s.f, 1142]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1144]   JJ_BC_W_S
    Use   [source_w_s.f, 1145]         JJ_BC_W_S
    Use   [source_w_s.f, 1148]         JJ_BC_W_S
    Use   [source_w_s.f, 1165]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1167]   JJ_BC_W_S
    Use   [source_w_s.f, 1168]         JJ_BC_W_S
    Use   [source_w_s.f, 1171]         JJ_BC_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 82]        SOURCE_W_S
    Set   [source_w_s.f, 150]          SOURCE_W_S
    Use Argument   [source_w_s.f, 151]   SOURCE_W_S
    Use Argument   [source_w_s.f, 151]   SOURCE_W_S
    Use Argument   [source_w_s.f, 152]   SOURCE_W_S
    Use Argument   [source_w_s.f, 153]   SOURCE_W_S
    Use   [source_w_s.f, 155]          SOURCE_W_S
    Use   [source_w_s.f, 158]          SOURCE_W_S
    Use   [source_w_s.f, 158]          SOURCE_W_S
    Set   [source_w_s.f, 206]          SOURCE_W_S
    Use Argument   [source_w_s.f, 207]   SOURCE_W_S
    Use Argument   [source_w_s.f, 208]   SOURCE_W_S
    Use Argument   [source_w_s.f, 209]   SOURCE_W_S
    Use Argument   [source_w_s.f, 210]   SOURCE_W_S
    Use Argument   [source_w_s.f, 211]   SOURCE_W_S
    Use Argument   [source_w_s.f, 212]   SOURCE_W_S
    Set   [source_w_s.f, 359]          SOURCE_W_S
    Use   [source_w_s.f, 360]          SOURCE_W_S
    Use   [source_w_s.f, 360]          SOURCE_W_S
    Set   [source_w_s.f, 392]          SOURCE_W_S
    Use   [source_w_s.f, 393]          SOURCE_W_S
    Use   [source_w_s.f, 393]          SOURCE_W_S
    Use   [source_w_s.f, 395]          SOURCE_W_S
    Use   [source_w_s.f, 395]          SOURCE_W_S
    Use   [source_w_s.f, 395]          SOURCE_W_S
    Set   [source_w_s.f, 403]          SOURCE_W_S
    Use   [source_w_s.f, 404]          SOURCE_W_S
    Use   [source_w_s.f, 405]          SOURCE_W_S
    Use   [source_w_s.f, 405]          SOURCE_W_S
    Use   [source_w_s.f, 406]          SOURCE_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 572]       SOURCE_W_S_BC
    Set   [source_w_s.f, 696]          SOURCE_W_S_BC
    Use   [source_w_s.f, 697]          SOURCE_W_S_BC
    Use   [source_w_s.f, 700]          SOURCE_W_S_BC
    Use   [source_w_s.f, 701]          SOURCE_W_S_BC
    Use   [source_w_s.f, 702]          SOURCE_W_S_BC
    Use   [source_w_s.f, 703]          SOURCE_W_S_BC
    Use   [source_w_s.f, 704]          SOURCE_W_S_BC
    Use   [source_w_s.f, 705]          SOURCE_W_S_BC
    Use   [source_w_s.f, 706]          SOURCE_W_S_BC
    Use   [source_w_s.f, 707]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 736]   SOURCE_W_S_BC
    Use   [source_w_s.f, 739]          SOURCE_W_S_BC
    Use   [source_w_s.f, 740]          SOURCE_W_S_BC
    Use   [source_w_s.f, 741]          SOURCE_W_S_BC
    Use   [source_w_s.f, 742]          SOURCE_W_S_BC
    Use   [source_w_s.f, 743]          SOURCE_W_S_BC
    Use   [source_w_s.f, 744]          SOURCE_W_S_BC
    Use   [source_w_s.f, 745]          SOURCE_W_S_BC
    Use   [source_w_s.f, 746]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 775]   SOURCE_W_S_BC
    Use   [source_w_s.f, 778]          SOURCE_W_S_BC
    Use   [source_w_s.f, 779]          SOURCE_W_S_BC
    Use   [source_w_s.f, 780]          SOURCE_W_S_BC
    Use   [source_w_s.f, 781]          SOURCE_W_S_BC
    Use   [source_w_s.f, 782]          SOURCE_W_S_BC
    Use   [source_w_s.f, 783]          SOURCE_W_S_BC
    Use   [source_w_s.f, 784]          SOURCE_W_S_BC
    Use   [source_w_s.f, 785]          SOURCE_W_S_BC
    Use   [source_w_s.f, 804]          SOURCE_W_S_BC
    Use   [source_w_s.f, 807]          SOURCE_W_S_BC
    Use   [source_w_s.f, 810]          SOURCE_W_S_BC
    Use   [source_w_s.f, 812]          SOURCE_W_S_BC
    Use   [source_w_s.f, 815]          SOURCE_W_S_BC
    Use   [source_w_s.f, 816]          SOURCE_W_S_BC
    Use   [source_w_s.f, 818]          SOURCE_W_S_BC
    Use   [source_w_s.f, 818]          SOURCE_W_S_BC
    Use   [source_w_s.f, 821]          SOURCE_W_S_BC
    Use   [source_w_s.f, 824]          SOURCE_W_S_BC
    Use   [source_w_s.f, 827]          SOURCE_W_S_BC
    Use   [source_w_s.f, 829]          SOURCE_W_S_BC
    Use   [source_w_s.f, 832]          SOURCE_W_S_BC
    Use   [source_w_s.f, 834]          SOURCE_W_S_BC
    Use   [source_w_s.f, 837]          SOURCE_W_S_BC
    Use   [source_w_s.f, 837]          SOURCE_W_S_BC
    Use   [source_w_s.f, 840]          SOURCE_W_S_BC
    Use   [source_w_s.f, 843]          SOURCE_W_S_BC
    Use   [source_w_s.f, 845]          SOURCE_W_S_BC
    Use   [source_w_s.f, 846]          SOURCE_W_S_BC
    Use   [source_w_s.f, 847]          SOURCE_W_S_BC
    Use   [source_w_s.f, 847]          SOURCE_W_S_BC
    Use   [source_w_s.f, 850]          SOURCE_W_S_BC
    Use   [source_w_s.f, 853]          SOURCE_W_S_BC
    Use   [source_w_s.f, 855]          SOURCE_W_S_BC
    Use   [source_w_s.f, 856]          SOURCE_W_S_BC
    Use   [source_w_s.f, 857]          SOURCE_W_S_BC
    Use   [source_w_s.f, 857]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 864]   SOURCE_W_S_BC
    Use   [source_w_s.f, 868]          SOURCE_W_S_BC
    Use   [source_w_s.f, 868]          SOURCE_W_S_BC
    Use   [source_w_s.f, 869]          SOURCE_W_S_BC
    Use   [source_w_s.f, 870]          SOURCE_W_S_BC
    Use   [source_w_s.f, 871]          SOURCE_W_S_BC
    Use   [source_w_s.f, 872]          SOURCE_W_S_BC
    Use   [source_w_s.f, 873]          SOURCE_W_S_BC
    Use   [source_w_s.f, 874]          SOURCE_W_S_BC
    Use   [source_w_s.f, 875]          SOURCE_W_S_BC
    Use   [source_w_s.f, 895]          SOURCE_W_S_BC
    Use   [source_w_s.f, 896]          SOURCE_W_S_BC
    Use   [source_w_s.f, 897]          SOURCE_W_S_BC
    Use   [source_w_s.f, 898]          SOURCE_W_S_BC
    Use   [source_w_s.f, 899]          SOURCE_W_S_BC
    Use   [source_w_s.f, 900]          SOURCE_W_S_BC
    Use   [source_w_s.f, 901]          SOURCE_W_S_BC
    Use   [source_w_s.f, 902]          SOURCE_W_S_BC
    Use   [source_w_s.f, 929]          SOURCE_W_S_BC
    Use   [source_w_s.f, 930]          SOURCE_W_S_BC
    Use   [source_w_s.f, 931]          SOURCE_W_S_BC
    Use   [source_w_s.f, 932]          SOURCE_W_S_BC
    Use   [source_w_s.f, 933]          SOURCE_W_S_BC
    Use   [source_w_s.f, 934]          SOURCE_W_S_BC
    Use   [source_w_s.f, 935]          SOURCE_W_S_BC
    Use   [source_w_s.f, 958]          SOURCE_W_S_BC
    Use   [source_w_s.f, 959]          SOURCE_W_S_BC
    Use   [source_w_s.f, 960]          SOURCE_W_S_BC
    Use   [source_w_s.f, 961]          SOURCE_W_S_BC
    Use   [source_w_s.f, 962]          SOURCE_W_S_BC
    Use   [source_w_s.f, 963]          SOURCE_W_S_BC
    Use   [source_w_s.f, 978]          SOURCE_W_S_BC

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

L    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 47]    SET_INCREMENTS
    Set   [set_increments.f, 225]      SET_INCREMENTS
    Use   [set_increments.f, 226]      SET_INCREMENTS
    Use   [set_increments.f, 227]      SET_INCREMENTS
    Use   [set_increments.f, 229]      SET_INCREMENTS
    Use   [set_increments.f, 229]      SET_INCREMENTS
    Use   [set_increments.f, 229]      SET_INCREMENTS
    Use   [set_increments.f, 230]      SET_INCREMENTS
    Use   [set_increments.f, 230]      SET_INCREMENTS
    Use   [set_increments.f, 230]      SET_INCREMENTS

L    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2379]   SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Set   [set_increments.f, 2403]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2406]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2409]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2411]     SHIFT_CONNECTIVITY_FOR_BDIST_IO

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_energy_dissipation_ss.f, 43]   CALC_IA_ENERGY_DISSIPATION_SS
    Set   [kintheory_energy_dissipation_ss.f, 69]   CALC_IA_ENERGY_DISSIPATION_SS
    Use Argument   [kintheory_energy_dissipation_ss.f, 70]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 71]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 72]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 76]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 79]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 82]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 95]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 104]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 104]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 114]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 114]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 118]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 120]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 123]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 148]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 151]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 152]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 162]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 163]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 173]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 174]   CALC_IA_ENERGY_DISSIPATION_SS

L    (Local Variable)  Declared as: INTEGER
    Define   [read_res0.f, 51]         READ_RES0
    Use   [read_res0.f, 282]           READ_RES0
    Set   [read_res0.f, 282]           READ_RES0
    Set   [read_res0.f, 347]           READ_RES0
    Use   [read_res0.f, 348]           READ_RES0
    Use   [read_res0.f, 348]           READ_RES0
    Set   [read_res0.f, 350]           READ_RES0
    Use   [read_res0.f, 351]           READ_RES0
    Use   [read_res0.f, 351]           READ_RES0
    Set   [read_res0.f, 353]           READ_RES0
    Use   [read_res0.f, 354]           READ_RES0
    Use   [read_res0.f, 354]           READ_RES0
    Use   [read_res0.f, 376]           READ_RES0
    Set   [read_res0.f, 376]           READ_RES0
    Use   [read_res0.f, 377]           READ_RES0
    Set   [read_res0.f, 377]           READ_RES0
    Use   [read_res0.f, 380]           READ_RES0
    Set   [read_res0.f, 380]           READ_RES0
    Use   [read_res0.f, 381]           READ_RES0
    Set   [read_res0.f, 381]           READ_RES0
    Use   [read_res0.f, 384]           READ_RES0
    Set   [read_res0.f, 384]           READ_RES0
    Use   [read_res0.f, 385]           READ_RES0
    Set   [read_res0.f, 385]           READ_RES0
    Use   [read_res0.f, 388]           READ_RES0
    Set   [read_res0.f, 388]           READ_RES0
    Use   [read_res0.f, 389]           READ_RES0
    Set   [read_res0.f, 389]           READ_RES0
    Set   [read_res0.f, 647]           READ_RES0
    Set   [read_res0.f, 649]           READ_RES0
    Use   [read_res0.f, 651]           READ_RES0

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 75]        SOURCE_V_G
    Set   [source_v_g.f, 284]          SOURCE_V_G
    Use   [source_v_g.f, 285]          SOURCE_V_G
    Use   [source_v_g.f, 285]          SOURCE_V_G
    Use   [source_v_g.f, 287]          SOURCE_V_G
    Use   [source_v_g.f, 287]          SOURCE_V_G
    Use   [source_v_g.f, 287]          SOURCE_V_G
    Set   [source_v_g.f, 296]          SOURCE_V_G
    Use   [source_v_g.f, 297]          SOURCE_V_G
    Use   [source_v_g.f, 298]          SOURCE_V_G
    Use   [source_v_g.f, 298]          SOURCE_V_G
    Use   [source_v_g.f, 299]          SOURCE_V_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 403]       SOURCE_V_G_BC
    Set   [source_v_g.f, 552]          SOURCE_V_G_BC
    Use   [source_v_g.f, 553]          SOURCE_V_G_BC
    Use   [source_v_g.f, 557]          SOURCE_V_G_BC
    Use   [source_v_g.f, 558]          SOURCE_V_G_BC
    Use   [source_v_g.f, 559]          SOURCE_V_G_BC
    Use   [source_v_g.f, 560]          SOURCE_V_G_BC
    Use   [source_v_g.f, 561]          SOURCE_V_G_BC
    Use   [source_v_g.f, 562]          SOURCE_V_G_BC
    Use   [source_v_g.f, 563]          SOURCE_V_G_BC
    Use   [source_v_g.f, 592]          SOURCE_V_G_BC
    Use   [source_v_g.f, 593]          SOURCE_V_G_BC
    Use   [source_v_g.f, 594]          SOURCE_V_G_BC
    Use   [source_v_g.f, 595]          SOURCE_V_G_BC
    Use   [source_v_g.f, 596]          SOURCE_V_G_BC
    Use   [source_v_g.f, 597]          SOURCE_V_G_BC
    Use   [source_v_g.f, 598]          SOURCE_V_G_BC
    Use   [source_v_g.f, 627]          SOURCE_V_G_BC
    Use   [source_v_g.f, 628]          SOURCE_V_G_BC
    Use   [source_v_g.f, 629]          SOURCE_V_G_BC
    Use   [source_v_g.f, 630]          SOURCE_V_G_BC
    Use   [source_v_g.f, 631]          SOURCE_V_G_BC
    Use   [source_v_g.f, 632]          SOURCE_V_G_BC
    Use   [source_v_g.f, 633]          SOURCE_V_G_BC
    Use   [source_v_g.f, 652]          SOURCE_V_G_BC
    Use   [source_v_g.f, 655]          SOURCE_V_G_BC
    Use   [source_v_g.f, 657]          SOURCE_V_G_BC
    Use   [source_v_g.f, 658]          SOURCE_V_G_BC
    Use   [source_v_g.f, 659]          SOURCE_V_G_BC
    Use   [source_v_g.f, 659]          SOURCE_V_G_BC
    Use   [source_v_g.f, 662]          SOURCE_V_G_BC
    Use   [source_v_g.f, 665]          SOURCE_V_G_BC
    Use   [source_v_g.f, 667]          SOURCE_V_G_BC
    Use   [source_v_g.f, 668]          SOURCE_V_G_BC
    Use   [source_v_g.f, 669]          SOURCE_V_G_BC
    Use   [source_v_g.f, 669]          SOURCE_V_G_BC
    Use   [source_v_g.f, 672]          SOURCE_V_G_BC
    Use   [source_v_g.f, 675]          SOURCE_V_G_BC
    Use   [source_v_g.f, 677]          SOURCE_V_G_BC
    Use   [source_v_g.f, 678]          SOURCE_V_G_BC
    Use   [source_v_g.f, 679]          SOURCE_V_G_BC
    Use   [source_v_g.f, 679]          SOURCE_V_G_BC
    Use   [source_v_g.f, 682]          SOURCE_V_G_BC
    Use   [source_v_g.f, 685]          SOURCE_V_G_BC
    Use   [source_v_g.f, 687]          SOURCE_V_G_BC
    Use   [source_v_g.f, 688]          SOURCE_V_G_BC
    Use   [source_v_g.f, 689]          SOURCE_V_G_BC
    Use   [source_v_g.f, 689]          SOURCE_V_G_BC
    Use   [source_v_g.f, 697]          SOURCE_V_G_BC
    Use   [source_v_g.f, 698]          SOURCE_V_G_BC
    Use   [source_v_g.f, 699]          SOURCE_V_G_BC
    Use   [source_v_g.f, 701]          SOURCE_V_G_BC
    Use   [source_v_g.f, 702]          SOURCE_V_G_BC
    Use   [source_v_g.f, 703]          SOURCE_V_G_BC
    Use   [source_v_g.f, 704]          SOURCE_V_G_BC
    Use   [source_v_g.f, 705]          SOURCE_V_G_BC
    Use   [source_v_g.f, 706]          SOURCE_V_G_BC
    Use   [source_v_g.f, 728]          SOURCE_V_G_BC
    Use   [source_v_g.f, 728]          SOURCE_V_G_BC
    Use   [source_v_g.f, 733]          SOURCE_V_G_BC
    Use   [source_v_g.f, 733]          SOURCE_V_G_BC
    Use   [source_v_g.f, 738]          SOURCE_V_G_BC
    Use   [source_v_g.f, 738]          SOURCE_V_G_BC
    Use   [source_v_g.f, 743]          SOURCE_V_G_BC
    Use   [source_v_g.f, 743]          SOURCE_V_G_BC
    Use   [source_v_g.f, 753]          SOURCE_V_G_BC
    Use   [source_v_g.f, 753]          SOURCE_V_G_BC
    Use   [source_v_g.f, 754]          SOURCE_V_G_BC
    Use   [source_v_g.f, 758]          SOURCE_V_G_BC
    Use   [source_v_g.f, 759]          SOURCE_V_G_BC
    Use   [source_v_g.f, 760]          SOURCE_V_G_BC
    Use   [source_v_g.f, 761]          SOURCE_V_G_BC
    Use   [source_v_g.f, 762]          SOURCE_V_G_BC
    Use   [source_v_g.f, 763]          SOURCE_V_G_BC
    Use   [source_v_g.f, 787]          SOURCE_V_G_BC
    Use   [source_v_g.f, 788]          SOURCE_V_G_BC
    Use   [source_v_g.f, 789]          SOURCE_V_G_BC
    Use   [source_v_g.f, 790]          SOURCE_V_G_BC
    Use   [source_v_g.f, 791]          SOURCE_V_G_BC
    Use   [source_v_g.f, 792]          SOURCE_V_G_BC
    Use   [source_v_g.f, 793]          SOURCE_V_G_BC
    Use   [source_v_g.f, 794]          SOURCE_V_G_BC
    Use   [source_v_g.f, 821]          SOURCE_V_G_BC
    Use   [source_v_g.f, 822]          SOURCE_V_G_BC
    Use   [source_v_g.f, 823]          SOURCE_V_G_BC
    Use   [source_v_g.f, 824]          SOURCE_V_G_BC
    Use   [source_v_g.f, 825]          SOURCE_V_G_BC
    Use   [source_v_g.f, 826]          SOURCE_V_G_BC
    Use   [source_v_g.f, 827]          SOURCE_V_G_BC
    Use   [source_v_g.f, 855]          SOURCE_V_G_BC
    Use   [source_v_g.f, 856]          SOURCE_V_G_BC
    Use   [source_v_g.f, 857]          SOURCE_V_G_BC
    Use   [source_v_g.f, 858]          SOURCE_V_G_BC
    Use   [source_v_g.f, 859]          SOURCE_V_G_BC
    Use   [source_v_g.f, 860]          SOURCE_V_G_BC
    Use   [source_v_g.f, 876]          SOURCE_V_G_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [set_ic.f, 46]            SET_IC
    Set   [set_ic.f, 76]               SET_IC
    Use   [set_ic.f, 77]               SET_IC
    Use   [set_ic.f, 78]               SET_IC
    Use   [set_ic.f, 79]               SET_IC
    Use   [set_ic.f, 80]               SET_IC
    Use   [set_ic.f, 81]               SET_IC
    Use   [set_ic.f, 82]               SET_IC
    Use   [set_ic.f, 83]               SET_IC
    Use   [set_ic.f, 84]               SET_IC
    Use   [set_ic.f, 85]               SET_IC
    Use   [set_ic.f, 86]               SET_IC
    Use   [set_ic.f, 91]               SET_IC
    Use   [set_ic.f, 92]               SET_IC
    Use   [set_ic.f, 93]               SET_IC
    Use   [set_ic.f, 94]               SET_IC
    Use   [set_ic.f, 95]               SET_IC
    Use   [set_ic.f, 99]               SET_IC
    Use   [set_ic.f, 99]               SET_IC
    Use   [set_ic.f, 100]              SET_IC
    Use   [set_ic.f, 100]              SET_IC
    Use   [set_ic.f, 101]              SET_IC
    Use   [set_ic.f, 101]              SET_IC
    Use   [set_ic.f, 108]              SET_IC
    Use   [set_ic.f, 116]              SET_IC
    Use   [set_ic.f, 117]              SET_IC
    Use   [set_ic.f, 120]              SET_IC
    Use   [set_ic.f, 121]              SET_IC
    Use   [set_ic.f, 125]              SET_IC
    Use   [set_ic.f, 126]              SET_IC
    Use   [set_ic.f, 130]              SET_IC
    Use   [set_ic.f, 131]              SET_IC
    Use   [set_ic.f, 132]              SET_IC
    Use   [set_ic.f, 133]              SET_IC
    Use   [set_ic.f, 140]              SET_IC
    Use   [set_ic.f, 141]              SET_IC
    Use   [set_ic.f, 142]              SET_IC
    Use   [set_ic.f, 147]              SET_IC
    Use   [set_ic.f, 148]              SET_IC
    Use   [set_ic.f, 153]              SET_IC
    Use   [set_ic.f, 154]              SET_IC
    Use   [set_ic.f, 155]              SET_IC
    Use   [set_ic.f, 158]              SET_IC
    Use   [set_ic.f, 159]              SET_IC
    Use   [set_ic.f, 179]              SET_IC
    Use   [set_ic.f, 182]              SET_IC

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs.f, 77]           DRAG_GS
    Set   [drag_gs.f, 134]             DRAG_GS
    Use   [drag_gs.f, 135]             DRAG_GS
    Use   [drag_gs.f, 136]             DRAG_GS
    Use   [drag_gs.f, 137]             DRAG_GS
    Set   [drag_gs.f, 177]             DRAG_GS
    Use   [drag_gs.f, 179]             DRAG_GS
    Set   [drag_gs.f, 186]             DRAG_GS
    Use   [drag_gs.f, 188]             DRAG_GS
    Use   [drag_gs.f, 189]             DRAG_GS
    Use   [drag_gs.f, 191]             DRAG_GS
    Set   [drag_gs.f, 260]             DRAG_GS
    Use   [drag_gs.f, 261]             DRAG_GS
    Use   [drag_gs.f, 262]             DRAG_GS
    Use   [drag_gs.f, 262]             DRAG_GS
    Use   [drag_gs.f, 263]             DRAG_GS
    Use   [drag_gs.f, 264]             DRAG_GS
    Use   [drag_gs.f, 264]             DRAG_GS
    Use   [drag_gs.f, 265]             DRAG_GS
    Use   [drag_gs.f, 266]             DRAG_GS
    Use   [drag_gs.f, 266]             DRAG_GS

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs.f, 1442]         DRAG_HYS
    Set   [drag_gs.f, 1481]            DRAG_HYS
    Use   [drag_gs.f, 1482]            DRAG_HYS
    Set   [drag_gs.f, 1507]            DRAG_HYS
    Use   [drag_gs.f, 1508]            DRAG_HYS
    Use   [drag_gs.f, 1509]            DRAG_HYS
    Use   [drag_gs.f, 1512]            DRAG_HYS
    Use   [drag_gs.f, 1513]            DRAG_HYS
    Use   [drag_gs.f, 1518]            DRAG_HYS
    Use   [drag_gs.f, 1521]            DRAG_HYS
    Use   [drag_gs.f, 1522]            DRAG_HYS
    Use   [drag_gs.f, 1522]            DRAG_HYS
    Use   [drag_gs.f, 1523]            DRAG_HYS
    Use   [drag_gs.f, 1524]            DRAG_HYS

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

L    (Local Variable)  Declared as: INTEGER
    Define   [seek_comment.f, 49]      SEEK_COMMENT
    Set   [seek_comment.f, 62]         SEEK_COMMENT
    Use   [seek_comment.f, 64]         SEEK_COMMENT
    Use   [seek_comment.f, 64]         SEEK_COMMENT
    Use   [seek_comment.f, 65]         SEEK_COMMENT

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 56]          DIF_W_IS
    Set   [dif_w_is.f, 82]             DIF_W_IS
    Use   [dif_w_is.f, 83]             DIF_W_IS
    Use   [dif_w_is.f, 84]             DIF_W_IS
    Use   [dif_w_is.f, 85]             DIF_W_IS
    Use   [dif_w_is.f, 86]             DIF_W_IS
    Use   [dif_w_is.f, 87]             DIF_W_IS
    Use   [dif_w_is.f, 88]             DIF_W_IS
    Use   [dif_w_is.f, 89]             DIF_W_IS
    Use   [dif_w_is.f, 91]             DIF_W_IS
    Use   [dif_w_is.f, 112]            DIF_W_IS

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [pic_routines.f, 408]     MPPIC_APPLY_PS_GRAD_PART
    Declare   [pic_routines.f, 422]    MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 449]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 450]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 454]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 455]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 457]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 459]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 460]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 461]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 463]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 470]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 474]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 476]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 579]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 583]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 589]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 591]        MPPIC_APPLY_PS_GRAD_PART

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [tau_u_s.f, 80]           CALC_TAU_U_S
    Set   [tau_u_s.f, 136]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 137]    CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 137]    CALC_TAU_U_S

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 503]      CFNEWVALUES_MPPIC
    Set   [cfnewvalues.f, 562]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 566]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 568]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 572]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 573]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 573]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 573]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 575]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 578]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 585]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 585]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 589]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 590]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 592]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 598]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 598]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 599]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 601]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 605]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 611]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 623]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 623]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 623]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 624]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 627]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 627]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 627]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 630]   CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 632]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 632]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 641]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 644]   CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 646]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 655]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 657]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 657]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 668]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 668]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 671]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 673]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 673]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 677]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 678]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 680]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 683]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 683]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 684]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 684]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 686]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 686]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 696]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 696]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 697]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 698]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 699]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 700]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 702]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 702]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 704]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 705]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 706]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 707]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 723]         CFNEWVALUES_MPPIC
    Use   [cfnewvalues.f, 726]         CFNEWVALUES_MPPIC

L    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 201]      CFNEWVALUES_MPPIC_SNIDER
    Set   [cfnewvalues.f, 253]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 257]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 259]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 272]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 273]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 273]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 273]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 275]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 283]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 283]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 288]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 289]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 293]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 301]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 301]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 302]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 306]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 306]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 306]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 313]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 317]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 321]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 325]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 332]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 332]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 333]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 335]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 335]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 337]         CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 348]   CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 350]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 357]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 358]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 358]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 363]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 367]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 370]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 370]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 372]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 373]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 375]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 378]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 378]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 379]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 379]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 381]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 381]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 391]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 391]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 392]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 392]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 401]         CFNEWVALUES_MPPIC_SNIDER
    Use   [cfnewvalues.f, 404]         CFNEWVALUES_MPPIC_SNIDER

L    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 51]     DISPLAY_RESID
    Set   [display_resid.f, 87]        DISPLAY_RESID
    Use   [display_resid.f, 88]        DISPLAY_RESID
    Use   [display_resid.f, 89]        DISPLAY_RESID
    Set   [display_resid.f, 99]        DISPLAY_RESID
    Use   [display_resid.f, 100]       DISPLAY_RESID
    Use   [display_resid.f, 101]       DISPLAY_RESID
    Use   [display_resid.f, 101]       DISPLAY_RESID

L1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4621]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4636]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4637]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4640]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4641]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4645]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4656]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4656]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4656]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4661]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4661]   GET_LIP_WITH_GHOST_LAYERS

L1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5386]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5401]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5402]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5405]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5406]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5410]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5421]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5421]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5421]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5426]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5426]   GET_LIP_WITH_GHOST_LAYERS0

l1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 816]          SET_IJK_P_G
    Set   [set_bc0.f, 852]             SET_IJK_P_G
    Use   [set_bc0.f, 852]             SET_IJK_P_G
    Set   [set_bc0.f, 861]             SET_IJK_P_G
    Set   [set_bc0.f, 869]             SET_IJK_P_G
    Set   [set_bc0.f, 877]             SET_IJK_P_G
    Set   [set_bc0.f, 888]             SET_IJK_P_G
    Use   [set_bc0.f, 897]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 904]    SET_IJK_P_G
    Use Argument   [set_bc0.f, 906]    SET_IJK_P_G
    Use Argument   [set_bc0.f, 908]    SET_IJK_P_G
    Use   [set_bc0.f, 928]             SET_IJK_P_G
    Use   [set_bc0.f, 930]             SET_IJK_P_G

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

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

L1    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2562]   WRITE_INT_TABLE
    Set   [set_increments.f, 2569]     WRITE_INT_TABLE
    Use   [set_increments.f, 2570]     WRITE_INT_TABLE
    Use   [set_increments.f, 2571]     WRITE_INT_TABLE
    Set   [set_increments.f, 2574]     WRITE_INT_TABLE
    Use   [set_increments.f, 2576]     WRITE_INT_TABLE

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

L2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4621]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4637]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4640]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4641]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4645]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4660]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4660]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4664]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4664]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4664]   GET_LIP_WITH_GHOST_LAYERS

L2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5386]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5402]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5405]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5406]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5410]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5425]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5425]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5429]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5429]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5429]   GET_LIP_WITH_GHOST_LAYERS0

l2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 815]          SET_IJK_P_G
    Set   [set_bc0.f, 851]             SET_IJK_P_G
    Use   [set_bc0.f, 851]             SET_IJK_P_G
    Set   [set_bc0.f, 860]             SET_IJK_P_G
    Set   [set_bc0.f, 868]             SET_IJK_P_G
    Set   [set_bc0.f, 876]             SET_IJK_P_G
    Set   [set_bc0.f, 887]             SET_IJK_P_G
    Use   [set_bc0.f, 896]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 904]    SET_IJK_P_G
    Use Argument   [set_bc0.f, 906]    SET_IJK_P_G
    Use Argument   [set_bc0.f, 908]    SET_IJK_P_G
    Use   [set_bc0.f, 928]             SET_IJK_P_G
    Use   [set_bc0.f, 930]             SET_IJK_P_G

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

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

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

L2    (Dummy Argument)  Declared as: INTEGER
    Define   [location.f, 19]          LOCATION
    Declare   [location.f, 34]         LOCATION
    Use   [location.f, 42]             LOCATION
    Use   [location.f, 52]             LOCATION
    Use   [location.f, 58]             LOCATION
    Use   [location.f, 58]             LOCATION
    Use   [location.f, 59]             LOCATION

L2    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2562]   WRITE_INT_TABLE
    Set   [set_increments.f, 2567]     WRITE_INT_TABLE
    Use   [set_increments.f, 2569]     WRITE_INT_TABLE
    Set   [set_increments.f, 2570]     WRITE_INT_TABLE
    Use   [set_increments.f, 2571]     WRITE_INT_TABLE
    Use   [set_increments.f, 2574]     WRITE_INT_TABLE
    Set   [set_increments.f, 2575]     WRITE_INT_TABLE
    Use   [set_increments.f, 2576]     WRITE_INT_TABLE

L2    (Local Variable)  Declared as: INTEGER
    Define   [seek_comment.f, 49]      SEEK_COMMENT
    Set   [seek_comment.f, 63]         SEEK_COMMENT
    Use   [seek_comment.f, 64]         SEEK_COMMENT

L2P    (Local Variable)  Declared as: CHARACTER
    Define   [set_increments.f, 362]   RE_INDEX_ARRAYS

L2P    (Local Variable)  Declared as: CHARACTER
    Define   [set_increments.f, 2636]   WRITE_IJK_VALUES

l3    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 814]          SET_IJK_P_G
    Set   [set_bc0.f, 850]             SET_IJK_P_G
    Set   [set_bc0.f, 859]             SET_IJK_P_G
    Set   [set_bc0.f, 867]             SET_IJK_P_G
    Set   [set_bc0.f, 875]             SET_IJK_P_G
    Use   [set_bc0.f, 884]             SET_IJK_P_G
    Set   [set_bc0.f, 886]             SET_IJK_P_G
    Use   [set_bc0.f, 895]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 904]    SET_IJK_P_G
    Use Argument   [set_bc0.f, 906]    SET_IJK_P_G
    Use Argument   [set_bc0.f, 908]    SET_IJK_P_G
    Use   [set_bc0.f, 927]             SET_IJK_P_G
    Use   [set_bc0.f, 929]             SET_IJK_P_G

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

L3    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2562]   WRITE_INT_TABLE
    Use   [set_increments.f, 2571]     WRITE_INT_TABLE
    Set   [set_increments.f, 2571]     WRITE_INT_TABLE
    Use   [set_increments.f, 2576]     WRITE_INT_TABLE
    Set   [set_increments.f, 2576]     WRITE_INT_TABLE

l_2SI    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rrates0.f, 147]          RRATES0
    Set   [rrates0.f, 172]             RRATES0
    Use   [rrates0.f, 331]             RRATES0
    Use   [rrates0.f, 333]             RRATES0

l_ab    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_geometry.f, 89]      SET_GEOMETRY
    Set   [set_geometry.f, 258]        SET_GEOMETRY
    Use   [set_geometry.f, 259]        SET_GEOMETRY
    Set   [set_geometry.f, 266]        SET_GEOMETRY
    Use   [set_geometry.f, 267]        SET_GEOMETRY

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

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

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4576]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4621]   GET_LIP_WITH_GHOST_LAYERS
    Use Argument   [check_data_cartesian.f, 4629]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4637]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4641]   GET_LIP_WITH_GHOST_LAYERS

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5341]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5386]   GET_LIP_WITH_GHOST_LAYERS0
    Use Argument   [check_data_cartesian.f, 5394]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5402]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5406]   GET_LIP_WITH_GHOST_LAYERS0

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4710]   MINIMIZE_LOAD_IMBALANCE
    Declare   [check_data_cartesian.f, 4758]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4770]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4773]   MINIMIZE_LOAD_IMBALANCE
    Set   [check_data_cartesian.f, 4795]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4795]   MINIMIZE_LOAD_IMBALANCE
    Set   [check_data_cartesian.f, 4796]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4796]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4798]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4806]   MINIMIZE_LOAD_IMBALANCE
    Set   [check_data_cartesian.f, 4831]   MINIMIZE_LOAD_IMBALANCE

L_SIZE    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5475]   MINIMIZE_LOAD_IMBALANCE0
    Declare   [check_data_cartesian.f, 5521]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5533]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5536]   MINIMIZE_LOAD_IMBALANCE0
    Set   [check_data_cartesian.f, 5558]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5558]   MINIMIZE_LOAD_IMBALANCE0
    Set   [check_data_cartesian.f, 5559]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5559]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5561]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5569]   MINIMIZE_LOAD_IMBALANCE0
    Set   [check_data_cartesian.f, 5594]   MINIMIZE_LOAD_IMBALANCE0

l_ver    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_geometry.f, 89]      SET_GEOMETRY
    Set   [set_geometry.f, 257]        SET_GEOMETRY
    Use   [set_geometry.f, 258]        SET_GEOMETRY
    Use   [set_geometry.f, 258]        SET_GEOMETRY
    Set   [set_geometry.f, 265]        SET_GEOMETRY
    Use   [set_geometry.f, 266]        SET_GEOMETRY
    Use   [set_geometry.f, 266]        SET_GEOMETRY

lambda    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cooling_rate.f, 174]     FUNC_JACOBI_EVAL
    Set   [cooling_rate.f, 182]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 205]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 206]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 230]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 233]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 240]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 247]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 249]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 251]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 254]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 255]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 262]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 265]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 266]        FUNC_JACOBI_EVAL

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

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

lambda1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 719]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 726]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 732]     BUILD_C_QUADRIC_MATRIX

lambda2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 719]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 726]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 733]     BUILD_C_QUADRIC_MATRIX

lambda3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 719]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 726]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 734]     BUILD_C_QUADRIC_MATRIX

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

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

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

lambda_num    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_energy_dissipation_ss.f, 233]   CALC_GD_99_ENERGY_DISSIPATION_SS
    Set   [kintheory_energy_dissipation_ss.f, 267]   CALC_GD_99_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 273]   CALC_GD_99_ENERGY_DISSIPATION_SS

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

LAMBDA_sL_pE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_u_s.f, 123]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 211]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 213]       CALC_IA_MOMSOURCE_U_S

LAMBDA_sL_pN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_v_s.f, 123]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 209]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 211]       CALC_IA_MOMSOURCE_V_S

LAMBDA_sL_pS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_v_s.f, 123]    CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 210]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 211]       CALC_IA_MOMSOURCE_V_S

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

LAMBDA_sL_pW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_u_s.f, 123]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 212]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 213]       CALC_IA_MOMSOURCE_U_S

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

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

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

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

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

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

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

LAST    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1111]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1219]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1220]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1221]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1223]   GET_POLYGON_AREA_AND_CENTROID

LAST_EMPTY_SPOT    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 332]   PIC_MI_BC
    Set   [pic_bc_routines.f, 371]     PIC_MI_BC
    Use Argument   [pic_bc_routines.f, 459]   PIC_MI_BC
    Set   [pic_bc_routines.f, 506]     PIC_MI_BC

LAST_INDEX    (Dummy Argument)  Declared as: INTEGER INTENT(INOUT)
    Define   [pic_bc_routines.f, 571]   PIC_FIND_EMPTY_SPOT
    Declare   [pic_bc_routines.f, 580]   PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 591]     PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 599]     PIC_FIND_EMPTY_SPOT
    Set   [pic_bc_routines.f, 603]     PIC_FIND_EMPTY_SPOT

LAST_VEC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1114]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1223]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1224]   GET_POLYGON_AREA_AND_CENTROID

LASTM    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1111]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1220]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1221]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1222]   GET_POLYGON_AREA_AND_CENTROID

LASTM_VEC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1114]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1222]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1224]   GET_POLYGON_AREA_AND_CENTROID

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

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

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

LB    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [des_init_arrays.f, 79]   DES_INIT_PARTICLE_ARRAYS
    Declare   [des_init_arrays.f, 100]   DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 102]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 105]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 106]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 107]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 108]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 109]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 112]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 113]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 114]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 122]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 125]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 126]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 127]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 130]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 133]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 134]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 137]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 138]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 142]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 145]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 146]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 151]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 152]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 157]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 158]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 159]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 160]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 165]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 166]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 167]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 168]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 169]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 174]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 175]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 176]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 177]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 178]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 180]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 185]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 186]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 188]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 189]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 191]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 197]     DES_INIT_PARTICLE_ARRAYS

lBCV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 122]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 142]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 198]     SEED_NEW_PARTICLE

lBCV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 280]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 305]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 306]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 307]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 356]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 362]     SET_NEW_PARTICLE_PROPS

lBCV_I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 122]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 142]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 174]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 175]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 176]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 185]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 187]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 189]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 192]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 201]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 202]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 203]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 205]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 206]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 207]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 211]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 212]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 213]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 215]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 216]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 217]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 221]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 222]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 223]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 225]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 226]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 227]     SEED_NEW_PARTICLE

LC    (Local Variable)  Declared as: INTEGER
    Define   [init_namelist.f, 56]     INIT_NAMELIST
    Set   [init_namelist.f, 1607]      INIT_NAMELIST
    Use   [init_namelist.f, 1612]      INIT_NAMELIST
    Use   [init_namelist.f, 1618]      INIT_NAMELIST
    Use   [init_namelist.f, 1624]      INIT_NAMELIST
    Use   [init_namelist.f, 1630]      INIT_NAMELIST
    Use   [init_namelist.f, 1636]      INIT_NAMELIST
    Use   [init_namelist.f, 1642]      INIT_NAMELIST
    Use   [init_namelist.f, 1648]      INIT_NAMELIST
    Use   [init_namelist.f, 1654]      INIT_NAMELIST
    Use   [init_namelist.f, 1660]      INIT_NAMELIST
    Use   [init_namelist.f, 1666]      INIT_NAMELIST
    Use   [init_namelist.f, 1672]      INIT_NAMELIST
    Use   [init_namelist.f, 1678]      INIT_NAMELIST
    Use   [init_namelist.f, 1690]      INIT_NAMELIST
    Use   [init_namelist.f, 1696]      INIT_NAMELIST
    Use   [init_namelist.f, 1706]      INIT_NAMELIST
    Use   [init_namelist.f, 1715]      INIT_NAMELIST
    Use   [init_namelist.f, 1721]      INIT_NAMELIST
    Use   [init_namelist.f, 1733]      INIT_NAMELIST
    Use   [init_namelist.f, 1743]      INIT_NAMELIST
    Use   [init_namelist.f, 1749]      INIT_NAMELIST
    Use   [init_namelist.f, 1756]      INIT_NAMELIST
    Use   [init_namelist.f, 1763]      INIT_NAMELIST
    Use   [init_namelist.f, 1773]      INIT_NAMELIST
    Use   [init_namelist.f, 1780]      INIT_NAMELIST
    Use   [init_namelist.f, 1790]      INIT_NAMELIST
    Use   [init_namelist.f, 1797]      INIT_NAMELIST
    Use   [init_namelist.f, 1803]      INIT_NAMELIST
    Use   [init_namelist.f, 1810]      INIT_NAMELIST
    Use   [init_namelist.f, 1816]      INIT_NAMELIST
    Use   [init_namelist.f, 1823]      INIT_NAMELIST
    Use   [init_namelist.f, 1829]      INIT_NAMELIST
    Use   [init_namelist.f, 1836]      INIT_NAMELIST
    Use   [init_namelist.f, 1843]      INIT_NAMELIST
    Use   [init_namelist.f, 1851]      INIT_NAMELIST
    Use   [init_namelist.f, 1858]      INIT_NAMELIST
    Use   [init_namelist.f, 1864]      INIT_NAMELIST
    Use   [init_namelist.f, 1870]      INIT_NAMELIST
    Use   [init_namelist.f, 1877]      INIT_NAMELIST
    Use   [init_namelist.f, 1889]      INIT_NAMELIST
    Use   [init_namelist.f, 1901]      INIT_NAMELIST
    Set   [init_namelist.f, 1911]      INIT_NAMELIST
    Use   [init_namelist.f, 1917]      INIT_NAMELIST
    Use   [init_namelist.f, 1923]      INIT_NAMELIST
    Use   [init_namelist.f, 1929]      INIT_NAMELIST
    Use   [init_namelist.f, 1935]      INIT_NAMELIST
    Use   [init_namelist.f, 1941]      INIT_NAMELIST
    Use   [init_namelist.f, 1947]      INIT_NAMELIST
    Use   [init_namelist.f, 1953]      INIT_NAMELIST
    Use   [init_namelist.f, 1959]      INIT_NAMELIST
    Use   [init_namelist.f, 1965]      INIT_NAMELIST
    Use   [init_namelist.f, 1971]      INIT_NAMELIST
    Use   [init_namelist.f, 1977]      INIT_NAMELIST
    Use   [init_namelist.f, 1983]      INIT_NAMELIST
    Use   [init_namelist.f, 2040]      INIT_NAMELIST
    Use   [init_namelist.f, 2046]      INIT_NAMELIST
    Use   [init_namelist.f, 2053]      INIT_NAMELIST
    Use   [init_namelist.f, 2059]      INIT_NAMELIST
    Use   [init_namelist.f, 2066]      INIT_NAMELIST
    Use   [init_namelist.f, 2072]      INIT_NAMELIST
    Use   [init_namelist.f, 2079]      INIT_NAMELIST
    Use   [init_namelist.f, 2085]      INIT_NAMELIST
    Use   [init_namelist.f, 2092]      INIT_NAMELIST
    Use   [init_namelist.f, 2107]      INIT_NAMELIST
    Use   [init_namelist.f, 2142]      INIT_NAMELIST
    Use   [init_namelist.f, 2153]      INIT_NAMELIST
    Use   [init_namelist.f, 2163]      INIT_NAMELIST
    Use   [init_namelist.f, 2172]      INIT_NAMELIST
    Use   [init_namelist.f, 2181]      INIT_NAMELIST
    Use   [init_namelist.f, 2190]      INIT_NAMELIST
    Use   [init_namelist.f, 2201]      INIT_NAMELIST
    Use   [init_namelist.f, 2211]      INIT_NAMELIST
    Use   [init_namelist.f, 2221]      INIT_NAMELIST
    Use   [init_namelist.f, 2231]      INIT_NAMELIST
    Use   [init_namelist.f, 2242]      INIT_NAMELIST
    Use   [init_namelist.f, 2252]      INIT_NAMELIST
    Use   [init_namelist.f, 2263]      INIT_NAMELIST
    Use   [init_namelist.f, 2274]      INIT_NAMELIST
    Use   [init_namelist.f, 2285]      INIT_NAMELIST
    Use   [init_namelist.f, 2295]      INIT_NAMELIST
    Use   [init_namelist.f, 2305]      INIT_NAMELIST
    Use   [init_namelist.f, 2315]      INIT_NAMELIST
    Use   [init_namelist.f, 2321]      INIT_NAMELIST
    Use   [init_namelist.f, 2327]      INIT_NAMELIST
    Use   [init_namelist.f, 2334]      INIT_NAMELIST
    Use   [init_namelist.f, 2341]      INIT_NAMELIST
    Use   [init_namelist.f, 2347]      INIT_NAMELIST
    Use   [init_namelist.f, 2354]      INIT_NAMELIST
    Use   [init_namelist.f, 2361]      INIT_NAMELIST
    Use   [init_namelist.f, 2368]      INIT_NAMELIST
    Use   [init_namelist.f, 2376]      INIT_NAMELIST
    Use   [init_namelist.f, 2382]      INIT_NAMELIST
    Use   [init_namelist.f, 2389]      INIT_NAMELIST
    Use   [init_namelist.f, 2395]      INIT_NAMELIST
    Use   [init_namelist.f, 2402]      INIT_NAMELIST
    Use   [init_namelist.f, 2408]      INIT_NAMELIST
    Use   [init_namelist.f, 2415]      INIT_NAMELIST
    Use   [init_namelist.f, 2421]      INIT_NAMELIST
    Use   [init_namelist.f, 2428]      INIT_NAMELIST
    Use   [init_namelist.f, 2434]      INIT_NAMELIST
    Use   [init_namelist.f, 2441]      INIT_NAMELIST
    Use   [init_namelist.f, 2455]      INIT_NAMELIST
    Use   [init_namelist.f, 2461]      INIT_NAMELIST
    Use   [init_namelist.f, 2467]      INIT_NAMELIST
    Use   [init_namelist.f, 2473]      INIT_NAMELIST
    Use   [init_namelist.f, 2479]      INIT_NAMELIST
    Use   [init_namelist.f, 2485]      INIT_NAMELIST
    Use   [init_namelist.f, 2492]      INIT_NAMELIST
    Use   [init_namelist.f, 2498]      INIT_NAMELIST
    Use   [init_namelist.f, 2504]      INIT_NAMELIST
    Use   [init_namelist.f, 2511]      INIT_NAMELIST
    Use   [init_namelist.f, 2519]      INIT_NAMELIST
    Use   [init_namelist.f, 2530]      INIT_NAMELIST
    Use   [init_namelist.f, 2541]      INIT_NAMELIST
    Use   [init_namelist.f, 2548]      INIT_NAMELIST
    Use   [init_namelist.f, 2556]      INIT_NAMELIST
    Use   [init_namelist.f, 2559]      INIT_NAMELIST
    Set   [init_namelist.f, 2568]      INIT_NAMELIST
    Use   [init_namelist.f, 2574]      INIT_NAMELIST
    Use   [init_namelist.f, 2580]      INIT_NAMELIST
    Use   [init_namelist.f, 2586]      INIT_NAMELIST
    Use   [init_namelist.f, 2592]      INIT_NAMELIST
    Use   [init_namelist.f, 2598]      INIT_NAMELIST
    Use   [init_namelist.f, 2604]      INIT_NAMELIST
    Use   [init_namelist.f, 2610]      INIT_NAMELIST
    Use   [init_namelist.f, 2616]      INIT_NAMELIST
    Use   [init_namelist.f, 2622]      INIT_NAMELIST
    Use   [init_namelist.f, 2628]      INIT_NAMELIST
    Use   [init_namelist.f, 2634]      INIT_NAMELIST
    Use   [init_namelist.f, 2640]      INIT_NAMELIST
    Use   [init_namelist.f, 2653]      INIT_NAMELIST
    Use   [init_namelist.f, 2668]      INIT_NAMELIST
    Use   [init_namelist.f, 2669]      INIT_NAMELIST
    Use   [init_namelist.f, 2676]      INIT_NAMELIST
    Set   [init_namelist.f, 2684]      INIT_NAMELIST
    Use   [init_namelist.f, 2689]      INIT_NAMELIST
    Use   [init_namelist.f, 2695]      INIT_NAMELIST
    Use   [init_namelist.f, 2701]      INIT_NAMELIST
    Use   [init_namelist.f, 2707]      INIT_NAMELIST
    Use   [init_namelist.f, 2713]      INIT_NAMELIST
    Use   [init_namelist.f, 2719]      INIT_NAMELIST
    Use   [init_namelist.f, 2725]      INIT_NAMELIST
    Use   [init_namelist.f, 2731]      INIT_NAMELIST
    Use   [init_namelist.f, 2737]      INIT_NAMELIST
    Use   [init_namelist.f, 2743]      INIT_NAMELIST
    Use   [init_namelist.f, 2749]      INIT_NAMELIST
    Use   [init_namelist.f, 2755]      INIT_NAMELIST
    Use   [init_namelist.f, 2762]      INIT_NAMELIST
    Use   [init_namelist.f, 2768]      INIT_NAMELIST
    Use   [init_namelist.f, 2774]      INIT_NAMELIST
    Use   [init_namelist.f, 2780]      INIT_NAMELIST
    Use   [init_namelist.f, 2786]      INIT_NAMELIST
    Use   [init_namelist.f, 2792]      INIT_NAMELIST
    Use   [init_namelist.f, 2799]      INIT_NAMELIST
    Use   [init_namelist.f, 2806]      INIT_NAMELIST
    Use   [init_namelist.f, 2813]      INIT_NAMELIST
    Use   [init_namelist.f, 2820]      INIT_NAMELIST
    Use   [init_namelist.f, 2827]      INIT_NAMELIST
    Use   [init_namelist.f, 2835]      INIT_NAMELIST
    Set   [init_namelist.f, 3024]      INIT_NAMELIST
    Use   [init_namelist.f, 3030]      INIT_NAMELIST
    Use   [init_namelist.f, 3036]      INIT_NAMELIST
    Use   [init_namelist.f, 3042]      INIT_NAMELIST
    Use   [init_namelist.f, 3048]      INIT_NAMELIST
    Use   [init_namelist.f, 3054]      INIT_NAMELIST
    Use   [init_namelist.f, 3060]      INIT_NAMELIST
    Use   [init_namelist.f, 3066]      INIT_NAMELIST
    Use   [init_namelist.f, 3072]      INIT_NAMELIST
    Use   [init_namelist.f, 3078]      INIT_NAMELIST
    Use   [init_namelist.f, 3084]      INIT_NAMELIST
    Use   [init_namelist.f, 3090]      INIT_NAMELIST
    Use   [init_namelist.f, 3096]      INIT_NAMELIST
    Use   [init_namelist.f, 3102]      INIT_NAMELIST
    Use   [init_namelist.f, 3108]      INIT_NAMELIST
    Use   [init_namelist.f, 3116]      INIT_NAMELIST
    Use   [init_namelist.f, 3124]      INIT_NAMELIST
    Use   [init_namelist.f, 3130]      INIT_NAMELIST

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 3364]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3444]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3445]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3445]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3460]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3461]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3461]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3477]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3478]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3478]   ADJUST_IJK_SIZE

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

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

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_res1.f, 68]        WRITE_RES1
    Set   [write_res1.f, 148]          WRITE_RES1
    Use   [write_res1.f, 150]          WRITE_RES1
    Use   [write_res1.f, 153]          WRITE_RES1
    Use   [write_res1.f, 155]          WRITE_RES1
    Use   [write_res1.f, 157]          WRITE_RES1
    Use   [write_res1.f, 159]          WRITE_RES1
    Use   [write_res1.f, 161]          WRITE_RES1
    Use   [write_res1.f, 163]          WRITE_RES1
    Use   [write_res1.f, 165]          WRITE_RES1
    Use   [write_res1.f, 166]          WRITE_RES1
    Set   [write_res1.f, 172]          WRITE_RES1
    Use   [write_res1.f, 173]          WRITE_RES1
    Set   [write_res1.f, 181]          WRITE_RES1
    Use   [write_res1.f, 182]          WRITE_RES1
    Use   [write_res1.f, 184]          WRITE_RES1
    Set   [write_res1.f, 189]          WRITE_RES1
    Use   [write_res1.f, 190]          WRITE_RES1

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 660]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 698]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 724]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 724]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 727]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 728]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 731]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 732]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 733]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 734]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 737]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 749]    CHECK_SOLIDS_DEM_COLL_HERTZ

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 403]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 482]    CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 490]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 490]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 493]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 494]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 496]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 497]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 498]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 499]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 502]    CHECK_SOLIDS_DEM_COLL_LSD

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 342]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 398]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 401]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 437]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 438]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 438]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 443]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 455]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 456]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 457]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 457]       SET_DEM_BCMI_IJK

LC    (Local Variable)  Declared as: INTEGER
    Define   [output_manager.f, 370]   INIT_OUTPUT_VARS
    Set   [output_manager.f, 406]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 407]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 408]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 410]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 412]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 412]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 413]      INIT_OUTPUT_VARS
    Set   [output_manager.f, 420]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 421]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 422]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 424]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 426]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 426]      INIT_OUTPUT_VARS
    Use   [output_manager.f, 427]      INIT_OUTPUT_VARS

LC    (Local Variable)  Declared as: INTEGER
    Define   [output_manager.f, 56]    OUTPUT_MANAGER
    Set   [output_manager.f, 104]      OUTPUT_MANAGER
    Use   [output_manager.f, 105]      OUTPUT_MANAGER
    Use   [output_manager.f, 106]      OUTPUT_MANAGER
    Use   [output_manager.f, 106]      OUTPUT_MANAGER
    Use Argument   [output_manager.f, 108]   OUTPUT_MANAGER
    Use   [output_manager.f, 109]      OUTPUT_MANAGER
    Use   [output_manager.f, 109]      OUTPUT_MANAGER
    Use   [output_manager.f, 111]      OUTPUT_MANAGER
    Set   [output_manager.f, 129]      OUTPUT_MANAGER
    Use   [output_manager.f, 130]      OUTPUT_MANAGER
    Use   [output_manager.f, 131]      OUTPUT_MANAGER
    Use   [output_manager.f, 131]      OUTPUT_MANAGER
    Use Argument   [output_manager.f, 132]   OUTPUT_MANAGER
    Use   [output_manager.f, 133]      OUTPUT_MANAGER
    Use   [output_manager.f, 133]      OUTPUT_MANAGER
    Set   [output_manager.f, 143]      OUTPUT_MANAGER
    Use   [output_manager.f, 144]      OUTPUT_MANAGER
    Use   [output_manager.f, 145]      OUTPUT_MANAGER
    Use   [output_manager.f, 145]      OUTPUT_MANAGER
    Use Argument   [output_manager.f, 146]   OUTPUT_MANAGER
    Use Argument   [output_manager.f, 147]   OUTPUT_MANAGER

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_res0.f, 59]        WRITE_RES0
    Set   [write_res0.f, 105]          WRITE_RES0
    Use   [write_res0.f, 106]          WRITE_RES0
    Set   [write_res0.f, 140]          WRITE_RES0
    Use   [write_res0.f, 141]          WRITE_RES0
    Use   [write_res0.f, 141]          WRITE_RES0
    Set   [write_res0.f, 166]          WRITE_RES0
    Use   [write_res0.f, 167]          WRITE_RES0
    Use   [write_res0.f, 168]          WRITE_RES0
    Use   [write_res0.f, 169]          WRITE_RES0
    Use   [write_res0.f, 170]          WRITE_RES0
    Use   [write_res0.f, 171]          WRITE_RES0
    Use   [write_res0.f, 172]          WRITE_RES0
    Use   [write_res0.f, 173]          WRITE_RES0
    Set   [write_res0.f, 202]          WRITE_RES0
    Use   [write_res0.f, 203]          WRITE_RES0
    Use   [write_res0.f, 204]          WRITE_RES0
    Use   [write_res0.f, 205]          WRITE_RES0
    Use   [write_res0.f, 206]          WRITE_RES0
    Use   [write_res0.f, 207]          WRITE_RES0
    Use   [write_res0.f, 208]          WRITE_RES0
    Use   [write_res0.f, 209]          WRITE_RES0
    Use   [write_res0.f, 211]          WRITE_RES0
    Use   [write_res0.f, 213]          WRITE_RES0
    Set   [write_res0.f, 216]          WRITE_RES0
    Use   [write_res0.f, 217]          WRITE_RES0
    Set   [write_res0.f, 248]          WRITE_RES0
    Use   [write_res0.f, 249]          WRITE_RES0
    Set   [write_res0.f, 251]          WRITE_RES0
    Use   [write_res0.f, 252]          WRITE_RES0
    Set   [write_res0.f, 267]          WRITE_RES0
    Use   [write_res0.f, 268]          WRITE_RES0
    Set   [write_res0.f, 271]          WRITE_RES0
    Use   [write_res0.f, 272]          WRITE_RES0
    Set   [write_res0.f, 282]          WRITE_RES0
    Use   [write_res0.f, 283]          WRITE_RES0
    Use   [write_res0.f, 283]          WRITE_RES0
    Use   [write_res0.f, 284]          WRITE_RES0
    Use   [write_res0.f, 284]          WRITE_RES0
    Set   [write_res0.f, 289]          WRITE_RES0
    Use   [write_res0.f, 290]          WRITE_RES0
    Set   [write_res0.f, 322]          WRITE_RES0
    Use   [write_res0.f, 323]          WRITE_RES0
    Use   [write_res0.f, 324]          WRITE_RES0
    Use   [write_res0.f, 325]          WRITE_RES0
    Use   [write_res0.f, 326]          WRITE_RES0
    Set   [write_res0.f, 344]          WRITE_RES0
    Use   [write_res0.f, 345]          WRITE_RES0
    Use   [write_res0.f, 346]          WRITE_RES0
    Use   [write_res0.f, 380]          WRITE_RES0
    Set   [write_res0.f, 380]          WRITE_RES0
    Set   [write_res0.f, 382]          WRITE_RES0
    Use   [write_res0.f, 383]          WRITE_RES0
    Use   [write_res0.f, 384]          WRITE_RES0
    Use   [write_res0.f, 385]          WRITE_RES0
    Use   [write_res0.f, 385]          WRITE_RES0

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 78]        WRITE_SPX1
    Set   [write_spx1.f, 227]          WRITE_SPX1
    Use   [write_spx1.f, 229]          WRITE_SPX1
    Use   [write_spx1.f, 231]          WRITE_SPX1
    Use   [write_spx1.f, 233]          WRITE_SPX1
    Use   [write_spx1.f, 236]          WRITE_SPX1
    Use   [write_spx1.f, 236]          WRITE_SPX1
    Use   [write_spx1.f, 237]          WRITE_SPX1
    Use   [write_spx1.f, 237]          WRITE_SPX1
    Use   [write_spx1.f, 238]          WRITE_SPX1
    Use   [write_spx1.f, 238]          WRITE_SPX1
    Set   [write_spx1.f, 247]          WRITE_SPX1
    Use   [write_spx1.f, 248]          WRITE_SPX1
    Use   [write_spx1.f, 249]          WRITE_SPX1
    Use   [write_spx1.f, 250]          WRITE_SPX1
    Set   [write_spx1.f, 270]          WRITE_SPX1
    Use   [write_spx1.f, 272]          WRITE_SPX1
    Use   [write_spx1.f, 275]          WRITE_SPX1
    Use   [write_spx1.f, 275]          WRITE_SPX1
    Set   [write_spx1.f, 282]          WRITE_SPX1
    Use   [write_spx1.f, 283]          WRITE_SPX1
    Set   [write_spx1.f, 306]          WRITE_SPX1
    Use   [write_spx1.f, 307]          WRITE_SPX1
    Set   [write_spx1.f, 312]          WRITE_SPX1
    Use   [write_spx1.f, 313]          WRITE_SPX1
    Use   [write_spx1.f, 313]          WRITE_SPX1
    Set   [write_spx1.f, 322]          WRITE_SPX1
    Use   [write_spx1.f, 323]          WRITE_SPX1
    Set   [write_spx1.f, 347]          WRITE_SPX1
    Use   [write_spx1.f, 348]          WRITE_SPX1
    Use   [write_spx1.f, 349]          WRITE_SPX1
    Set   [write_spx1.f, 357]          WRITE_SPX1
    Use   [write_spx1.f, 358]          WRITE_SPX1
    Use   [write_spx1.f, 359]          WRITE_SPX1
    Use   [write_spx1.f, 359]          WRITE_SPX1
    Set   [write_spx1.f, 377]          WRITE_SPX1
    Use   [write_spx1.f, 378]          WRITE_SPX1
    Use   [write_spx1.f, 379]          WRITE_SPX1
    Set   [write_spx1.f, 401]          WRITE_SPX1
    Use   [write_spx1.f, 402]          WRITE_SPX1
    Set   [write_spx1.f, 406]          WRITE_SPX1
    Use   [write_spx1.f, 407]          WRITE_SPX1
    Use   [write_spx1.f, 407]          WRITE_SPX1
    Set   [write_spx1.f, 414]          WRITE_SPX1
    Use   [write_spx1.f, 415]          WRITE_SPX1
    Set   [write_spx1.f, 436]          WRITE_SPX1
    Use   [write_spx1.f, 437]          WRITE_SPX1
    Set   [write_spx1.f, 441]          WRITE_SPX1
    Use   [write_spx1.f, 442]          WRITE_SPX1
    Use   [write_spx1.f, 442]          WRITE_SPX1
    Set   [write_spx1.f, 449]          WRITE_SPX1
    Use   [write_spx1.f, 450]          WRITE_SPX1
    Set   [write_spx1.f, 470]          WRITE_SPX1
    Use   [write_spx1.f, 471]          WRITE_SPX1
    Set   [write_spx1.f, 475]          WRITE_SPX1
    Use   [write_spx1.f, 476]          WRITE_SPX1
    Use   [write_spx1.f, 476]          WRITE_SPX1
    Set   [write_spx1.f, 483]          WRITE_SPX1
    Use   [write_spx1.f, 484]          WRITE_SPX1

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

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

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

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

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

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

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

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

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

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

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

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

lc    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [read_database.f, 333]       writeCp
    Use   [read_database.f, 334]       writeCp
    Use   [read_database.f, 335]       writeCp
    Use   [read_database.f, 335]       writeCp

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_continuum.f, 29]   CHECK_SOLIDS_CONTINUUM
    Set   [check_solids_continuum.f, 214]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 215]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 216]   CHECK_SOLIDS_CONTINUUM

LC    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 75]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 111]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 112]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 113]        DRAG_GS_DES1

LC    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 395]     DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 445]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 446]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 447]        DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 478]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 479]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 480]        DRAG_GS_EXPLICIT1

LC    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 227]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 267]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 268]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 269]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 296]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 297]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 298]        DRAG_GS_GAS1

LC    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 333]   PIC_MI_BC
    Set   [pic_bc_routines.f, 386]     PIC_MI_BC
    Use   [pic_bc_routines.f, 387]     PIC_MI_BC
    Use   [pic_bc_routines.f, 439]     PIC_MI_BC
    Use   [pic_bc_routines.f, 439]     PIC_MI_BC
    Use   [pic_bc_routines.f, 441]     PIC_MI_BC
    Use   [pic_bc_routines.f, 441]     PIC_MI_BC
    Use   [pic_bc_routines.f, 444]     PIC_MI_BC
    Use   [pic_bc_routines.f, 445]     PIC_MI_BC
    Use   [pic_bc_routines.f, 446]     PIC_MI_BC
    Use   [pic_bc_routines.f, 446]     PIC_MI_BC
    Use   [pic_bc_routines.f, 448]     PIC_MI_BC
    Use   [pic_bc_routines.f, 449]     PIC_MI_BC

LC    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 178]   PIC_MO_BC
    Set   [pic_bc_routines.f, 198]     PIC_MO_BC
    Use   [pic_bc_routines.f, 199]     PIC_MO_BC

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 48]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 81]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 82]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 83]         CALC_PG_GRAD

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 32]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 94]        SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 97]        SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 133]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 134]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 134]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 174]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 175]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 175]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 180]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 191]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 192]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 193]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 193]       SET_BC_DEM_MO

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

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

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [read_res0.f, 51]         READ_RES0
    Set   [read_res0.f, 271]           READ_RES0
    Use   [read_res0.f, 272]           READ_RES0
    Set   [read_res0.f, 404]           READ_RES0
    Use   [read_res0.f, 405]           READ_RES0
    Use   [read_res0.f, 406]           READ_RES0
    Set   [read_res0.f, 491]           READ_RES0
    Use   [read_res0.f, 492]           READ_RES0
    Use   [read_res0.f, 494]           READ_RES0
    Use   [read_res0.f, 496]           READ_RES0
    Use   [read_res0.f, 498]           READ_RES0
    Use   [read_res0.f, 501]           READ_RES0
    Use   [read_res0.f, 506]           READ_RES0
    Use   [read_res0.f, 507]           READ_RES0
    Set   [read_res0.f, 607]           READ_RES0
    Use   [read_res0.f, 608]           READ_RES0
    Use   [read_res0.f, 610]           READ_RES0
    Use   [read_res0.f, 612]           READ_RES0
    Use   [read_res0.f, 617]           READ_RES0
    Use   [read_res0.f, 621]           READ_RES0
    Use   [read_res0.f, 623]           READ_RES0
    Use   [read_res0.f, 624]           READ_RES0
    Use   [read_res0.f, 628]           READ_RES0
    Use   [read_res0.f, 630]           READ_RES0
    Set   [read_res0.f, 651]           READ_RES0
    Use   [read_res0.f, 652]           READ_RES0
    Set   [read_res0.f, 705]           READ_RES0
    Use   [read_res0.f, 706]           READ_RES0
    Set   [read_res0.f, 714]           READ_RES0
    Use   [read_res0.f, 715]           READ_RES0
    Set   [read_res0.f, 783]           READ_RES0
    Use   [read_res0.f, 784]           READ_RES0
    Set   [read_res0.f, 787]           READ_RES0
    Use   [read_res0.f, 788]           READ_RES0
    Set   [read_res0.f, 813]           READ_RES0
    Use   [read_res0.f, 814]           READ_RES0
    Use   [read_res0.f, 815]           READ_RES0
    Use   [read_res0.f, 815]           READ_RES0
    Use   [read_res0.f, 815]           READ_RES0
    Set   [read_res0.f, 832]           READ_RES0
    Use   [read_res0.f, 833]           READ_RES0
    Set   [read_res0.f, 913]           READ_RES0
    Use   [read_res0.f, 914]           READ_RES0
    Use   [read_res0.f, 915]           READ_RES0
    Use   [read_res0.f, 916]           READ_RES0
    Use   [read_res0.f, 917]           READ_RES0
    Set   [read_res0.f, 926]           READ_RES0
    Set   [read_res0.f, 931]           READ_RES0
    Set   [read_res0.f, 979]           READ_RES0
    Use   [read_res0.f, 980]           READ_RES0
    Use   [read_res0.f, 982]           READ_RES0
    Use   [read_res0.f, 1072]          READ_RES0
    Set   [read_res0.f, 1072]          READ_RES0
    Set   [read_res0.f, 1074]          READ_RES0
    Use   [read_res0.f, 1075]          READ_RES0
    Use   [read_res0.f, 1076]          READ_RES0
    Use   [read_res0.f, 1076]          READ_RES0
    Use   [read_res0.f, 1076]          READ_RES0
    Set   [read_res0.f, 1087]          READ_RES0
    Use   [read_res0.f, 1088]          READ_RES0
    Use   [read_res0.f, 1088]          READ_RES0
    Set   [read_res0.f, 1094]          READ_RES0
    Use   [read_res0.f, 1095]          READ_RES0
    Use   [read_res0.f, 1095]          READ_RES0

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

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

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

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

lc1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 996]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1035]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1037]   IJK_Pg_SEARCH

lc1    (Local Variable)  Declared as: INTEGER
    Define   [set_ps.f, 281]           DEBUG_PS
    Set   [set_ps.f, 294]              DEBUG_PS
    Set   [set_ps.f, 300]              DEBUG_PS
    Use   [set_ps.f, 300]              DEBUG_PS
    Use   [set_ps.f, 305]              DEBUG_PS
    Use   [set_ps.f, 306]              DEBUG_PS
    Set   [set_ps.f, 377]              DEBUG_PS
    Set   [set_ps.f, 382]              DEBUG_PS
    Use   [set_ps.f, 382]              DEBUG_PS
    Use   [set_ps.f, 383]              DEBUG_PS

LC1    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 27]     READ_RES0_DES
    Set   [read_res0_des.f, 45]        READ_RES0_DES
    Use   [read_res0_des.f, 46]        READ_RES0_DES
    Set   [read_res0_des.f, 49]        READ_RES0_DES
    Use   [read_res0_des.f, 50]        READ_RES0_DES
    Set   [read_res0_des.f, 53]        READ_RES0_DES
    Use   [read_res0_des.f, 54]        READ_RES0_DES
    Set   [read_res0_des.f, 64]        READ_RES0_DES
    Use   [read_res0_des.f, 65]        READ_RES0_DES
    Set   [read_res0_des.f, 71]        READ_RES0_DES
    Use   [read_res0_des.f, 72]        READ_RES0_DES
    Set   [read_res0_des.f, 83]        READ_RES0_DES
    Use   [read_res0_des.f, 84]        READ_RES0_DES
    Use   [read_res0_des.f, 85]        READ_RES0_DES
    Set   [read_res0_des.f, 99]        READ_RES0_DES
    Use   [read_res0_des.f, 100]       READ_RES0_DES
    Use   [read_res0_des.f, 101]       READ_RES0_DES
    Use   [read_res0_des.f, 102]       READ_RES0_DES
    Use   [read_res0_des.f, 103]       READ_RES0_DES
    Use   [read_res0_des.f, 104]       READ_RES0_DES
    Use   [read_res0_des.f, 105]       READ_RES0_DES
    Use   [read_res0_des.f, 107]       READ_RES0_DES
    Use   [read_res0_des.f, 109]       READ_RES0_DES
    Use   [read_res0_des.f, 110]       READ_RES0_DES
    Use   [read_res0_des.f, 111]       READ_RES0_DES
    Use   [read_res0_des.f, 112]       READ_RES0_DES
    Use   [read_res0_des.f, 113]       READ_RES0_DES
    Use   [read_res0_des.f, 114]       READ_RES0_DES
    Use   [read_res0_des.f, 115]       READ_RES0_DES
    Use   [read_res0_des.f, 116]       READ_RES0_DES

LC1    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 1259]   SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1271]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1272]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1273]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1275]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1281]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1282]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1283]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1285]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1291]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1292]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1293]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1295]      SET_DEM_MI_OWNER

LC1    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 30]    WRITE_RES0_DES
    Set   [write_res0_des.f, 49]       WRITE_RES0_DES
    Use   [write_res0_des.f, 50]       WRITE_RES0_DES
    Set   [write_res0_des.f, 55]       WRITE_RES0_DES
    Use   [write_res0_des.f, 56]       WRITE_RES0_DES
    Set   [write_res0_des.f, 59]       WRITE_RES0_DES
    Use   [write_res0_des.f, 60]       WRITE_RES0_DES
    Set   [write_res0_des.f, 63]       WRITE_RES0_DES
    Use   [write_res0_des.f, 64]       WRITE_RES0_DES
    Set   [write_res0_des.f, 77]       WRITE_RES0_DES
    Use   [write_res0_des.f, 78]       WRITE_RES0_DES
    Set   [write_res0_des.f, 84]       WRITE_RES0_DES
    Use   [write_res0_des.f, 85]       WRITE_RES0_DES
    Set   [write_res0_des.f, 88]       WRITE_RES0_DES
    Use   [write_res0_des.f, 89]       WRITE_RES0_DES
    Set   [write_res0_des.f, 94]       WRITE_RES0_DES
    Use   [write_res0_des.f, 95]       WRITE_RES0_DES
    Use   [write_res0_des.f, 96]       WRITE_RES0_DES
    Set   [write_res0_des.f, 100]      WRITE_RES0_DES
    Use   [write_res0_des.f, 101]      WRITE_RES0_DES
    Use   [write_res0_des.f, 102]      WRITE_RES0_DES
    Use   [write_res0_des.f, 103]      WRITE_RES0_DES
    Use   [write_res0_des.f, 104]      WRITE_RES0_DES
    Use   [write_res0_des.f, 105]      WRITE_RES0_DES
    Use   [write_res0_des.f, 106]      WRITE_RES0_DES
    Use   [write_res0_des.f, 107]      WRITE_RES0_DES
    Use   [write_res0_des.f, 108]      WRITE_RES0_DES
    Use   [write_res0_des.f, 109]      WRITE_RES0_DES
    Use   [write_res0_des.f, 110]      WRITE_RES0_DES

lc2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 995]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1034]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1037]   IJK_Pg_SEARCH

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

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

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

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

LCM    (Local Variable)  Declared as: INTEGER
    Define   [init_namelist.f, 56]     INIT_NAMELIST

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

lcount    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 258]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 339]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 342]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 342]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 342]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 346]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 346]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 346]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 350]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 350]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 350]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 353]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 353]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 353]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 355]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 355]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 355]      WRITE_DES_TECPLOT

LCOUNT1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4616]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4628]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4631]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4632]   GET_LIP_WITH_GHOST_LAYERS

LCOUNT1    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5381]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5393]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5396]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5397]   GET_LIP_WITH_GHOST_LAYERS0

LCOUNT2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4616]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4629]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4631]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4632]   GET_LIP_WITH_GHOST_LAYERS

LCOUNT2    (Local Variable)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5381]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5394]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5396]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5397]   GET_LIP_WITH_GHOST_LAYERS0

lCP    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [read_database.f, 350]       writeCp
    Use   [read_database.f, 352]       writeCp
    Set   [read_database.f, 369]       writeCp
    Use   [read_database.f, 371]       writeCp

lCp    (Unknown Variable)    Set   [physical_prop.f, 333]       PHYSICAL_PROP_CPg
    Use   [physical_prop.f, 334]       PHYSICAL_PROP_CPg
    Set   [physical_prop.f, 398]       PHYSICAL_PROP_CPs
    Use   [physical_prop.f, 400]       PHYSICAL_PROP_CPs

lCP_Err    (Unknown Variable)    Set   [physical_prop.f, 326]       PHYSICAL_PROP_CPg
    Use Argument   [physical_prop.f, 333]   PHYSICAL_PROP_CPg
    Use Argument   [physical_prop.f, 335]   PHYSICAL_PROP_CPg
    Set   [physical_prop.f, 389]       PHYSICAL_PROP_CPs
    Use Argument   [physical_prop.f, 398]   PHYSICAL_PROP_CPs

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

lcurpar    (Local Variable)  Declared as: INTEGER
    Define   [read_particle_input.f, 31]   READ_PAR_INPUT
    Set   [read_particle_input.f, 84]   READ_PAR_INPUT
    Use   [read_particle_input.f, 85]   READ_PAR_INPUT
    Use   [read_particle_input.f, 86]   READ_PAR_INPUT
    Use   [read_particle_input.f, 87]   READ_PAR_INPUT
    Use   [read_particle_input.f, 87]   READ_PAR_INPUT
    Use   [read_particle_input.f, 88]   READ_PAR_INPUT
    Set   [read_particle_input.f, 105]   READ_PAR_INPUT
    Use   [read_particle_input.f, 107]   READ_PAR_INPUT
    Use   [read_particle_input.f, 107]   READ_PAR_INPUT
    Use   [read_particle_input.f, 108]   READ_PAR_INPUT
    Use   [read_particle_input.f, 108]   READ_PAR_INPUT
    Use Argument   [read_particle_input.f, 121]   READ_PAR_INPUT

lcurpar    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 36]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 187]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 189]     MAKE_ARRAYS_DES

LCV    (Dummy Argument)  Declared as: INTEGER
    Define   [vtk_out.f, 15]           WRITE_VTU_FILE
    Declare   [vtk_out.f, 48]          WRITE_VTU_FILE
    Use   [vtk_out.f, 64]              WRITE_VTU_FILE
    Use   [vtk_out.f, 66]              WRITE_VTU_FILE

lData_dp    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [set_ps.f, 32]            SET_PS
    Set   [set_ps.f, 75]               SET_PS
    Set   [set_ps.f, 75]               SET_PS
    Set   [set_ps.f, 93]               SET_PS
    Use   [set_ps.f, 93]               SET_PS
    Use Argument   [set_ps.f, 103]     SET_PS
    Use Argument   [set_ps.f, 112]     SET_PS
    Set   [set_ps.f, 112]              SET_PS

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

lDBG    (Dummy Argument)  Declared as: LOGICAL INTENT(IN)
    Define   [diffuse_mean_fields.f, 120]   CALC_DIF_DES
    Declare   [diffuse_mean_fields.f, 134]   CALC_DIF_DES
    Use   [diffuse_mean_fields.f, 157]   CALC_DIF_DES

lDEBUG    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [check_cell_movement.f, 220]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 220]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 226]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 258]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 269]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 287]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 299]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 317]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 328]   CHECK_CELL_MOVEMENT_PIC

LDEL_ALL    (Local Variable)  Declared as: INTEGER
    Define   [generate_particle_config.f, 41]   GENERATE_PARTICLE_CONFIG
    Set   [generate_particle_config.f, 99]   GENERATE_PARTICLE_CONFIG
    Set   [generate_particle_config.f, 109]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 109]   GENERATE_PARTICLE_CONFIG
    Use Argument   [generate_particle_config.f, 118]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 127]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 136]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 138]   GENERATE_PARTICLE_CONFIG

lDELETED    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 216]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 230]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 265]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 265]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 295]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 295]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 324]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 324]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 351]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 355]   CHECK_CELL_MOVEMENT_PIC

ldFlag    (Dummy Argument)  Declared as: LOGICAL INTENT(IN)
    Define   [set_bc0.f, 972]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 988]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1028]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1110]            IJK_Pg_SEARCH

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

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1324]         DRAG_BVK
    Declare   [drag_gs.f, 1337]        DRAG_BVK
    Set   [drag_gs.f, 1379]            DRAG_BVK
    Set   [drag_gs.f, 1380]            DRAG_BVK

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 526]          DRAG_GIDASPOW
    Declare   [drag_gs.f, 538]         DRAG_GIDASPOW
    Set   [drag_gs.f, 571]             DRAG_GIDASPOW
    Set   [drag_gs.f, 581]             DRAG_GIDASPOW
    Set   [drag_gs.f, 584]             DRAG_GIDASPOW

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 607]          DRAG_GIDASPOW_BLEND
    Declare   [drag_gs.f, 621]         DRAG_GIDASPOW_BLEND
    Set   [drag_gs.f, 671]             DRAG_GIDASPOW_BLEND
    Set   [drag_gs.f, 672]             DRAG_GIDASPOW_BLEND

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1398]         DRAG_HYS
    Declare   [drag_gs.f, 1413]        DRAG_HYS
    Set   [drag_gs.f, 1530]            DRAG_HYS

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1198]         DRAG_KOCH_HILL
    Declare   [drag_gs.f, 1211]        DRAG_KOCH_HILL
    Set   [drag_gs.f, 1305]            DRAG_KOCH_HILL
    Set   [drag_gs.f, 1306]            DRAG_KOCH_HILL

ldGA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 430]          DRAG_SYAM_OBRIEN
    Declare   [drag_gs.f, 444]         DRAG_SYAM_OBRIEN
    Set   [drag_gs.f, 508]             DRAG_SYAM_OBRIEN
    Set   [drag_gs.f, 510]             DRAG_SYAM_OBRIEN

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 690]          DRAG_WEN_YU
    Declare   [drag_gs.f, 702]         DRAG_WEN_YU
    Set   [drag_gs.f, 736]             DRAG_WEN_YU
    Set   [drag_gs.f, 737]             DRAG_WEN_YU

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [drag_gs.f, 766]          SUBGRID_DRAG_IGCI
    Declare   [drag_gs.f, 781]         SUBGRID_DRAG_IGCI
    Set   [drag_gs.f, 871]             SUBGRID_DRAG_IGCI
    Use   [drag_gs.f, 871]             SUBGRID_DRAG_IGCI

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [drag_gs.f, 901]          SUBGRID_DRAG_MILIOLI
    Declare   [drag_gs.f, 917]         SUBGRID_DRAG_MILIOLI
    Set   [drag_gs.f, 1102]            SUBGRID_DRAG_MILIOLI
    Use   [drag_gs.f, 1102]            SUBGRID_DRAG_MILIOLI

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

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

LDIF    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 492]       PARSE_ARITH
    Set   [parse_line.f, 563]          PARSE_ARITH
    Use   [parse_line.f, 564]          PARSE_ARITH
    Use   [parse_line.f, 569]          PARSE_ARITH
    Use   [parse_line.f, 569]          PARSE_ARITH

lDIF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [diffuse_mean_fields.f, 140]   CALC_DIF_DES
    Set   [diffuse_mean_fields.f, 147]   CALC_DIF_DES
    Use   [diffuse_mean_fields.f, 153]   CALC_DIF_DES
    Use Argument   [diffuse_mean_fields.f, 158]   CALC_DIF_DES

lDIM_N    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 152]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 160]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 165]              CALC_PS_CpxMFLOW
    Use   [set_ps.f, 167]              CALC_PS_CpxMFLOW

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

lDIMN    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 322]   PIC_SEARCH
    Declare   [particles_in_cell.f, 333]   PIC_SEARCH
    Use   [particles_in_cell.f, 335]   PIC_SEARCH

lDIMN    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 32]    WRITE_RES0_DES
    Set   [write_res0_des.f, 41]       WRITE_RES0_DES
    Use   [write_res0_des.f, 49]       WRITE_RES0_DES
    Use   [write_res0_des.f, 59]       WRITE_RES0_DES
    Use   [write_res0_des.f, 94]       WRITE_RES0_DES

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

lDP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 67]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 108]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 117]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 118]   DRAG_SS_DEM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 126]   DRAG_SS_DEM_NONINTERP

lDP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 218]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 256]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 269]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 270]   DRAG_SS_TFM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 272]   DRAG_SS_TFM_NONINTERP

lDRAG_BM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 405]     DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 475]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 482]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 484]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 486]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 494]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 496]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 498]        DRAG_GS_EXPLICIT1

lDRAG_BM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 237]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 293]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 300]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 307]        DRAG_GS_GAS1

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 69]   DRAG_SS_DEM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 126]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 129]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 129]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 133]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 133]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 137]   DRAG_SS_DEM_NONINTERP

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 220]   DRAG_SS_TFM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 272]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 275]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 275]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 279]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 279]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 283]   DRAG_SS_TFM_NONINTERP

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

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

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

lE1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 996]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1031]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1035]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1067]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1071]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1071]            IJK_Pg_SEARCH

lE2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 995]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1030]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1034]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1068]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1074]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1074]            IJK_Pg_SEARCH

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

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

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

LEND    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 486]       PARSE_ARITH
    Set   [parse_line.f, 521]          PARSE_ARITH
    Use   [parse_line.f, 522]          PARSE_ARITH
    Use   [parse_line.f, 532]          PARSE_ARITH
    Use   [parse_line.f, 535]          PARSE_ARITH
    Use   [parse_line.f, 556]          PARSE_ARITH
    Use   [parse_line.f, 558]          PARSE_ARITH
    Use   [parse_line.f, 568]          PARSE_ARITH

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

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

lEND    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 322]   PIC_SEARCH
    Declare   [particles_in_cell.f, 337]   PIC_SEARCH
    Use   [particles_in_cell.f, 339]   PIC_SEARCH

LEND    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2506]   WRITE_INT_TABLE
    Declare   [set_increments.f, 2535]   WRITE_INT_TABLE
    Use   [set_increments.f, 2565]     WRITE_INT_TABLE
    Use   [set_increments.f, 2573]     WRITE_INT_TABLE
    Use   [set_increments.f, 2575]     WRITE_INT_TABLE

LENGTH    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 489]       PARSE_ARITH
    Set   [parse_line.f, 556]          PARSE_ARITH
    Use   [parse_line.f, 557]          PARSE_ARITH
    Use   [parse_line.f, 561]          PARSE_ARITH
    Use   [parse_line.f, 563]          PARSE_ARITH

length    (Local Variable)  Declared as: INTEGER
    Define   [mfix.f, 113]             MFIX

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 79]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 104]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 115]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 115]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 125]        DRAG_GS_DES1
    Use Argument   [drag_gs_des1.f, 132]   DRAG_GS_DES1

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 399]     DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 439]        DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 449]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 449]        DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 457]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 464]        DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 464]        DRAG_GS_EXPLICIT1
    Use Argument   [drag_gs_des1.f, 466]   DRAG_GS_EXPLICIT1

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 231]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 261]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 271]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 271]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 279]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 286]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 286]        DRAG_GS_GAS1
    Use Argument   [drag_gs_des1.f, 288]   DRAG_GS_GAS1

lEPSoDP    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_ss_dem_noninterp.f, 403]   CALC_EPSoDP
    Declare   [drag_ss_dem_noninterp.f, 435]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 443]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 448]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 448]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 451]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 451]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 455]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 455]   CALC_EPSoDP

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

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

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

LEQ_METHOD_NAME    (Local Variable)  Declared as: CHARACTER
    Define   [write_out0.f, 62]        WRITE_OUT0
    Set   [write_out0.f, 74]           WRITE_OUT0
    Use   [write_out0.f, 190]          WRITE_OUT0
    Use   [write_out0.f, 195]          WRITE_OUT0

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

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

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

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

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

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

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

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

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

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

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

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

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [diffuse_mean_fields.f, 50]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 87]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 89]   DIFFUSE_MEAN_FIELD

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

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

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

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

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

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

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

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

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

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

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

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [diffuse_mean_fields.f, 50]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 87]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 89]   DIFFUSE_MEAN_FIELD

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

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

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

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

leqsol.ITER_TOT    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 19]        leqsol
    Set   [leqsol_mod.f, 19]           leqsol
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 77]           leqsol.REPORT_SOLVER_STATS
    Set   [leq_cg.f, 424]              LEQ_CG0
    Use   [leq_cg.f, 424]              LEQ_CG0
    Set   [leq_cg.f, 471]              LEQ_CG0
    Use   [leq_cg.f, 471]              LEQ_CG0
    Set   [leq_sor.f, 120]             LEQ_SOR
    Set   [leq_bicgst.f, 567]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 567]          LEQ_BICGS0t
    Set   [leq_bicgst.f, 616]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 616]          LEQ_BICGS0t
    Set   [leq_bicgs.f, 622]           LEQ_BICGS0
    Use   [leq_bicgs.f, 622]           LEQ_BICGS0
    Set   [leq_bicgs.f, 673]           LEQ_BICGS0
    Use   [leq_bicgs.f, 673]           LEQ_BICGS0

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

leqsol.LEQ_IT    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 13]        leqsol
    Set   [init_namelist.f, 587]       INIT_NAMELIST
    Set   [init_namelist.f, 588]       INIT_NAMELIST
    Set   [init_namelist.f, 589]       INIT_NAMELIST
    Set   [init_namelist.f, 590]       INIT_NAMELIST
    Set   [init_namelist.f, 591]       INIT_NAMELIST
    Set   [init_namelist.f, 592]       INIT_NAMELIST
    Set   [init_namelist.f, 593]       INIT_NAMELIST
    Set   [init_namelist.f, 594]       INIT_NAMELIST
    Set   [init_namelist.f, 595]       INIT_NAMELIST
    Set   [init_namelist.f, 596]       INIT_NAMELIST
    Use Argument   [solve_scalar_eq.f, 167]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 233]   SOLVE_Scalar_EQ
    Use   [write_out0.f, 189]          WRITE_OUT0
    Use   [write_out0.f, 194]          WRITE_OUT0
    Use   [write_res0.f, 316]          WRITE_RES0
    Use Argument   [solve_epp.f, 137]   SOLVE_EPP
    Use Argument   [solve_k_epsilon_eq.f, 197]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 355]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_species_eq.f, 168]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 257]   SOLVE_SPECIES_EQ
    Use Argument   [solve_energy_eq.f, 273]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 291]   SOLVE_ENERGY_EQ
    Use   [solve_pp_g.f, 121]          SOLVE_PP_G
    Use Argument   [solve_vel_star.f, 233]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 247]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 360]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 374]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 485]   SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 499]   SOLVE_VEL_STAR
    Use Argument   [solve_granular_energy.f, 218]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 336]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 420]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_continuity.f, 87]   SOLVE_CONTINUITY
    Use Argument   [solve_continuity.f, 118]   SOLVE_CONTINUITY
    Set   [read_res0.f, 895]           READ_RES0
    Use Argument   [read_res0.f, 898]   READ_RES0
    Use Argument   [diffuse_mean_fields.f, 87]   DIFFUSE_MEAN_FIELD

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

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

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

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

leqsol.MAX_NIT    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 6]         leqsol
    Set   [init_namelist.f, 462]       INIT_NAMELIST
    Use   [check_data_cartesian.f, 912]   CHECK_DATA_CARTESIAN
    Use   [iterate.f, 362]             ITERATE
    Use   [iterate.f, 497]             ITERATE
    Use   [get_data.f, 172]            GET_DATA

leqsol.MINIMIZE_DOTPRODUCTS    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 31]        leqsol
    Use   [leq_bicgst.f, 407]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 506]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 533]          LEQ_BICGS0t
    Set   [check_numerics.f, 93]       CHECK_NUMERICS
    Use   [leq_bicgs.f, 470]           LEQ_BICGS0
    Use   [leq_bicgs.f, 557]           LEQ_BICGS0
    Use   [leq_bicgs.f, 590]           LEQ_BICGS0

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

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

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

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

leqsol.SOLVER_STATISTICS    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 43]        leqsol
    Set   [init_namelist.f, 3206]      INIT_NAMELIST
    Use   [time_march.f, 210]          TIME_MARCH
    Use   [time_march.f, 344]          TIME_MARCH
    Set   [check_numerics.f, 94]       CHECK_NUMERICS

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

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

lErr    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [iterate.f, 547]          IER_MANAGER
    Declare   [iterate.f, 549]         IER_MANAGER

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

lErrMsg    (Local Variable)  Declared as: INTEGER
    Define   [iterate.f, 102]          ITERATE

LEVEL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [physical_prop.f, 29]     PHYSICAL_PROP
    Declare   [physical_prop.f, 49]    PHYSICAL_PROP
    Use   [physical_prop.f, 66]        PHYSICAL_PROP
    Use   [physical_prop.f, 72]        PHYSICAL_PROP
    Use   [physical_prop.f, 82]        PHYSICAL_PROP

lEXISTS    (Local Variable)  Declared as: LOGICAL
    Define   [read_namelist.f, 79]     READ_NAMELIST
    Set   [read_namelist.f, 114]       READ_NAMELIST
    Use   [read_namelist.f, 115]       READ_NAMELIST

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

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [set_ro_s.f, 133]         CHECK_SET_ROs
    Set   [set_ro_s.f, 163]            CHECK_SET_ROs
    Use   [set_ro_s.f, 164]            CHECK_SET_ROs

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 487]    ROgErr_LOG
    Set   [physical_prop.f, 499]       ROgErr_LOG
    Use   [physical_prop.f, 500]       ROgErr_LOG

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 581]    ROsErr_LOG
    Set   [physical_prop.f, 593]       ROsErr_LOG
    Use   [physical_prop.f, 594]       ROsErr_LOG

lfac    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [generate_particle_config.f, 503]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 531]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 595]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 596]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 597]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 641]   GENERATE_PARTICLE_CONFIG_DEM

lface    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 36]   MAKE_ARRAYS_DES

lfactor_mus    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [calc_mu_s.f, 2330]       subgrid_stress_wall
    Declare   [calc_mu_s.f, 2346]      subgrid_stress_wall
    Set   [calc_mu_s.f, 2366]          subgrid_stress_wall
    Set   [calc_mu_s.f, 2373]          subgrid_stress_wall

lfactor_ps    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [calc_mu_s.f, 2330]       subgrid_stress_wall
    Declare   [calc_mu_s.f, 2344]      subgrid_stress_wall
    Set   [calc_mu_s.f, 2365]          subgrid_stress_wall
    Set   [calc_mu_s.f, 2371]          subgrid_stress_wall

lfcount    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 837]      des_dbgpic
    Set   [cfnewvalues.f, 837]         des_dbgpic
    Set   [cfnewvalues.f, 845]         des_dbgpic
    Use   [cfnewvalues.f, 845]         des_dbgpic
    Use   [cfnewvalues.f, 846]         des_dbgpic

lfcount    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 890]      des_dbgtecplot
    Set   [cfnewvalues.f, 890]         des_dbgtecplot
    Set   [cfnewvalues.f, 899]         des_dbgtecplot
    Use   [cfnewvalues.f, 899]         des_dbgtecplot
    Use   [cfnewvalues.f, 900]         des_dbgtecplot

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

lFile    (Local Variable)  Declared as: CHARACTER
    Define   [physical_prop.f, 488]    ROgErr_LOG
    Set   [physical_prop.f, 493]       ROgErr_LOG
    Set   [physical_prop.f, 495]       ROgErr_LOG
    Set   [physical_prop.f, 497]       ROgErr_LOG
    Use Argument   [physical_prop.f, 499]   ROgErr_LOG
    Use Argument   [physical_prop.f, 501]   ROgErr_LOG
    Use Argument   [physical_prop.f, 504]   ROgErr_LOG

lFile    (Local Variable)  Declared as: CHARACTER
    Define   [physical_prop.f, 582]    ROsErr_LOG
    Set   [physical_prop.f, 587]       ROsErr_LOG
    Set   [physical_prop.f, 589]       ROsErr_LOG
    Set   [physical_prop.f, 591]       ROsErr_LOG
    Use Argument   [physical_prop.f, 593]   ROsErr_LOG
    Use Argument   [physical_prop.f, 595]   ROsErr_LOG
    Use Argument   [physical_prop.f, 598]   ROsErr_LOG

lfilename    (Local Variable)  Declared as: CHARACTER
    Define   [read_particle_input.f, 35]   READ_PAR_INPUT
    Set   [read_particle_input.f, 53]   READ_PAR_INPUT
    Set   [read_particle_input.f, 54]   READ_PAR_INPUT
    Set   [read_particle_input.f, 56]   READ_PAR_INPUT
    Use   [read_particle_input.f, 61]   READ_PAR_INPUT
    Use   [read_particle_input.f, 67]   READ_PAR_INPUT

lFlags_i    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_ps.f, 283]           DEBUG_PS
    Set   [set_ps.f, 291]              DEBUG_PS
    Set   [set_ps.f, 291]              DEBUG_PS
    Set   [set_ps.f, 305]              DEBUG_PS
    Set   [set_ps.f, 306]              DEBUG_PS
    Use Argument   [set_ps.f, 314]     DEBUG_PS
    Use Argument   [set_ps.f, 390]     DEBUG_PS
    Set   [set_ps.f, 390]              DEBUG_PS

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

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

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

lFORCE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 403]     DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 472]        DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 473]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 473]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 475]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 488]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 500]        DRAG_GS_EXPLICIT1

lFORCE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 235]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 290]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 291]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 291]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 293]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 301]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 308]        DRAG_GS_GAS1

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

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

lfreq    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 837]      des_dbgpic
    Set   [cfnewvalues.f, 837]         des_dbgpic
    Set   [cfnewvalues.f, 841]         des_dbgpic
    Use   [cfnewvalues.f, 841]         des_dbgpic
    Use   [cfnewvalues.f, 842]         des_dbgpic
    Set   [cfnewvalues.f, 843]         des_dbgpic

lfreq    (Local Variable)  Declared as: INTEGER SAVE
    Define   [cfnewvalues.f, 890]      des_dbgtecplot
    Set   [cfnewvalues.f, 890]         des_dbgtecplot
    Set   [cfnewvalues.f, 895]         des_dbgtecplot
    Use   [cfnewvalues.f, 895]         des_dbgtecplot
    Use   [cfnewvalues.f, 896]         des_dbgtecplot
    Set   [cfnewvalues.f, 897]         des_dbgtecplot

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

lglobal_id    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 36]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 185]     MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 188]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 188]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 189]     MAKE_ARRAYS_DES

lglobal_id    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 349]   PIC_MI_BC
    Set   [pic_bc_routines.f, 528]     PIC_MI_BC
    Set   [pic_bc_routines.f, 531]     PIC_MI_BC
    Use   [pic_bc_routines.f, 531]     PIC_MI_BC
    Use   [pic_bc_routines.f, 532]     PIC_MI_BC

lglocnt    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 258]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 324]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 326]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 327]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 327]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 328]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 360]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 364]      WRITE_DES_TECPLOT

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

lHORg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 106]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 144]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 276]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 276]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 281]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 281]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 288]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 288]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 322]   STIFF_CHEM_RRATES

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

lHORs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 116]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 145]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 278]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 278]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 283]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 283]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 290]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 290]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 335]   STIFF_CHEM_RRATES

lI    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1161]         IKJ_MAP
    Declare   [set_bc0.f, 1166]        IKJ_MAP
    Set   [set_bc0.f, 1168]            IKJ_MAP

lI    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1148]         JKI_MAP
    Declare   [set_bc0.f, 1154]        JKI_MAP
    Set   [set_bc0.f, 1156]            JKI_MAP

lI    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1173]         KIJ_MAP
    Declare   [set_bc0.f, 1178]        KIJ_MAP
    Set   [set_bc0.f, 1180]            KIJ_MAP

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

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

lICP    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [read_database.f, 351]       writeCp
    Use   [read_database.f, 352]       writeCp
    Set   [read_database.f, 370]       writeCp
    Use   [read_database.f, 371]       writeCp

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

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

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

lIE    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1027]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1043]         POINT_SOURCE_U_G
    Set   [source_u_g.f, 1046]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1051]         POINT_SOURCE_U_G

lIE    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1182]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1197]         POINT_SOURCE_U_S
    Set   [source_u_s.f, 1200]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1205]         POINT_SOURCE_U_S

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

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

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

lijk    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 836]      des_dbgpic
    Set   [cfnewvalues.f, 850]         des_dbgpic
    Use   [cfnewvalues.f, 851]         des_dbgpic
    Use   [cfnewvalues.f, 852]         des_dbgpic
    Use   [cfnewvalues.f, 852]         des_dbgpic

lijk    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 889]      des_dbgtecplot
    Set   [cfnewvalues.f, 908]         des_dbgtecplot
    Use   [cfnewvalues.f, 909]         des_dbgtecplot
    Use   [cfnewvalues.f, 910]         des_dbgtecplot

lIJKP    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [mass_inflow_dem.f, 123]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 150]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 205]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 206]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 207]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 215]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 216]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 217]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 225]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 226]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 227]     SEED_NEW_PARTICLE

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

LINE    (Dummy Argument)  Declared as: CHARACTER
    Define   [read_namelist.f, 271]    BLANK_LINE
    Declare   [read_namelist.f, 275]   BLANK_LINE
    Use Argument   [read_namelist.f, 280]   BLANK_LINE
    Use   [read_namelist.f, 281]       BLANK_LINE
    Use   [read_namelist.f, 281]       BLANK_LINE

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

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

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

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

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

LINE    (Dummy Argument)  Declared as: CHARACTER
    Define   [seek_end.f, 18]          SEEK_END
    Declare   [seek_end.f, 30]         SEEK_END
    Use   [seek_end.f, 44]             SEEK_END

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

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

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [source_pp_g.f, 75]       SOURCE_PP_G
    Set   [source_pp_g.f, 174]         SOURCE_PP_G
    Use Argument   [source_pp_g.f, 176]   SOURCE_PP_G

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [write_spx1.f, 87]        WRITE_SPX1
    Set   [write_spx1.f, 531]          WRITE_SPX1
    Use Argument   [write_spx1.f, 532]   WRITE_SPX1

LINE    (Dummy Argument)  Declared as: CHARACTER
    Define   [parse_line.f, 450]       PARSE_ARITH
    Declare   [parse_line.f, 471]      PARSE_ARITH
    Use Argument   [parse_line.f, 515]   PARSE_ARITH
    Use Argument   [parse_line.f, 515]   PARSE_ARITH
    Use Argument   [parse_line.f, 517]   PARSE_ARITH
    Use Argument   [parse_line.f, 521]   PARSE_ARITH
    Use   [parse_line.f, 523]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 533]          PARSE_ARITH
    Use   [parse_line.f, 535]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Use   [parse_line.f, 550]          PARSE_ARITH
    Use   [parse_line.f, 552]          PARSE_ARITH
    Set   [parse_line.f, 559]          PARSE_ARITH
    Use Argument   [parse_line.f, 562]   PARSE_ARITH
    Use Argument   [parse_line.f, 562]   PARSE_ARITH
    Use Argument   [parse_line.f, 564]   PARSE_ARITH
    Use   [parse_line.f, 565]          PARSE_ARITH
    Set   [parse_line.f, 569]          PARSE_ARITH
    Use   [parse_line.f, 569]          PARSE_ARITH
    Set   [parse_line.f, 578]          PARSE_ARITH

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

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

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

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

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

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

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

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

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [conv_source_epp.f, 112]   CONV_SOURCE_EPP0
    Set   [conv_source_epp.f, 293]     CONV_SOURCE_EPP0
    Use Argument   [conv_source_epp.f, 296]   CONV_SOURCE_EPP0

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [conv_source_epp.f, 379]   CONV_SOURCE_EPP1
    Set   [conv_source_epp.f, 532]     CONV_SOURCE_EPP1
    Use Argument   [conv_source_epp.f, 536]   CONV_SOURCE_EPP1

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

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

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

LINE    (Local Variable)  Declared as: CHARACTER
    Define   [adjust_dt.f, 48]         ADJUST_DT
    Set   [adjust_dt.f, 122]           ADJUST_DT
    Set   [adjust_dt.f, 124]           ADJUST_DT
    Use   [adjust_dt.f, 126]           ADJUST_DT
    Use Argument   [adjust_dt.f, 127]   ADJUST_DT
    Set   [adjust_dt.f, 132]           ADJUST_DT
    Use   [adjust_dt.f, 133]           ADJUST_DT
    Use Argument   [adjust_dt.f, 134]   ADJUST_DT

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

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

LINE    (Dummy Argument)  Declared as: CHARACTER
    Define   [seek_comment.f, 24]      SEEK_COMMENT
    Declare   [seek_comment.f, 33]     SEEK_COMMENT
    Use   [seek_comment.f, 64]         SEEK_COMMENT

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

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

LINE_LEN    (Variable)  Declared as: INTEGER
    Define   [read_namelist.f, 69]     READ_NAMELIST
    Set   [read_namelist.f, 144]       READ_NAMELIST
    Use   [read_namelist.f, 145]       READ_NAMELIST
    Use   [read_namelist.f, 147]       READ_NAMELIST
    Use Argument   [read_namelist.f, 150]   READ_NAMELIST
    Use   [read_namelist.f, 168]       READ_NAMELIST
    Set   [read_namelist.f, 175]       READ_NAMELIST
    Use   [read_namelist.f, 178]       READ_NAMELIST
    Use Argument   [read_namelist.f, 209]   SET_KEYWORD
    Use Argument   [read_namelist.f, 211]   SET_KEYWORD
    Use Argument   [read_namelist.f, 215]   SET_KEYWORD
    Use   [read_namelist.f, 223]       SET_KEYWORD
    Use   [read_namelist.f, 232]       SET_KEYWORD
    Use   [read_namelist.f, 238]       SET_KEYWORD
    Use   [read_namelist.f, 244]       SET_KEYWORD
    Use   [read_namelist.f, 250]       SET_KEYWORD

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

LINE_NO    (Local Variable)  Declared as: INTEGER
    Define   [read_namelist.f, 71]     READ_NAMELIST
    Set   [read_namelist.f, 109]       READ_NAMELIST
    Set   [read_namelist.f, 142]       READ_NAMELIST
    Use   [read_namelist.f, 142]       READ_NAMELIST
    Use Argument   [read_namelist.f, 151]   READ_NAMELIST
    Use Argument   [read_namelist.f, 168]   READ_NAMELIST
    Use Argument   [read_namelist.f, 178]   READ_NAMELIST

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

LINE_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [deprecated.f, 11]        DEPRECATED_OR_UNKNOWN
    Declare   [deprecated.f, 20]       DEPRECATED_OR_UNKNOWN
    Use Argument   [deprecated.f, 110]   DEPRECATED_OR_UNKNOWN
    Use Argument   [deprecated.f, 116]   DEPRECATED_OR_UNKNOWN
    Use Argument   [deprecated.f, 120]   DEPRECATED_OR_UNKNOWN

LINE_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [deprecated.f, 161]       UNKNOWN_KEYWORD
    Declare   [deprecated.f, 163]      UNKNOWN_KEYWORD
    Use Argument   [deprecated.f, 166]   UNKNOWN_KEYWORD

LINE_STRING    (Variable)  Declared as: CHARACTER
    Define   [read_namelist.f, 67]     READ_NAMELIST
    Set   [read_namelist.f, 137]       READ_NAMELIST
    Use Argument   [read_namelist.f, 144]   READ_NAMELIST
    Use Argument   [read_namelist.f, 144]   READ_NAMELIST
    Use Argument   [read_namelist.f, 145]   READ_NAMELIST
    Use Argument   [read_namelist.f, 145]   READ_NAMELIST
    Use Argument   [read_namelist.f, 148]   READ_NAMELIST
    Use Argument   [read_namelist.f, 150]   READ_NAMELIST
    Use   [read_namelist.f, 152]       READ_NAMELIST
    Use   [read_namelist.f, 162]       READ_NAMELIST
    Use Argument   [read_namelist.f, 168]   READ_NAMELIST
    Use Argument   [read_namelist.f, 174]   READ_NAMELIST
    Use Argument   [read_namelist.f, 175]   READ_NAMELIST
    Use Argument   [read_namelist.f, 178]   READ_NAMELIST
    Use Argument   [read_namelist.f, 200]   SET_KEYWORD
    Use Argument   [read_namelist.f, 201]   SET_KEYWORD
    Use Argument   [read_namelist.f, 202]   SET_KEYWORD
    Use Argument   [read_namelist.f, 203]   SET_KEYWORD
    Use Argument   [read_namelist.f, 204]   SET_KEYWORD
    Use Argument   [read_namelist.f, 205]   SET_KEYWORD
    Use Argument   [read_namelist.f, 206]   SET_KEYWORD
    Use Argument   [read_namelist.f, 207]   SET_KEYWORD
    Use Argument   [read_namelist.f, 208]   SET_KEYWORD
    Use Argument   [read_namelist.f, 209]   SET_KEYWORD
    Use Argument   [read_namelist.f, 211]   SET_KEYWORD
    Use Argument   [read_namelist.f, 212]   SET_KEYWORD
    Use Argument   [read_namelist.f, 215]   SET_KEYWORD
    Use Argument   [read_namelist.f, 223]   SET_KEYWORD
    Use Argument   [read_namelist.f, 232]   SET_KEYWORD
    Use Argument   [read_namelist.f, 238]   SET_KEYWORD
    Use Argument   [read_namelist.f, 244]   SET_KEYWORD
    Use Argument   [read_namelist.f, 250]   SET_KEYWORD

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

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

line_t    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [pic_bc_routines.f, 825]   CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 884]     CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 904]     CHECK_IF_PARCEL_OVELAPS_STL
    Use   [pic_bc_routines.f, 905]     CHECK_IF_PARCEL_OVELAPS_STL
    Use   [pic_bc_routines.f, 910]     CHECK_IF_PARCEL_OVELAPS_STL

LINE_T    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [pic_bc_routines.f, 64]   PIC_APPLY_WALLBC_STL
    Set   [pic_bc_routines.f, 93]      PIC_APPLY_WALLBC_STL
    Set   [pic_bc_routines.f, 113]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 116]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 116]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 118]     PIC_APPLY_WALLBC_STL

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3384]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3849]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3868]   ADJUST_IJK_SIZE

LIP    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4576]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4624]   GET_LIP_WITH_GHOST_LAYERS
    Set   [check_data_cartesian.f, 4678]   GET_LIP_WITH_GHOST_LAYERS

LIP    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 5341]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5389]   GET_LIP_WITH_GHOST_LAYERS0
    Set   [check_data_cartesian.f, 5444]   GET_LIP_WITH_GHOST_LAYERS0

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4761]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4770]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4772]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4798]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4804]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4805]   MINIMIZE_LOAD_IMBALANCE

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 5524]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5533]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5535]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5561]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5567]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5568]   MINIMIZE_LOAD_IMBALANCE0

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4925]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5268]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5288]   REPORT_BEST_IJK_SIZE0

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_increments.f, 399]   RE_INDEX_ARRAYS

LIP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_increments.f, 2673]   WRITE_IJK_VALUES

LIP_OLD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3384]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3836]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3840]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3868]   ADJUST_IJK_SIZE

LIP_OLD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4099]   REPORT_BEST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 4303]   REPORT_BEST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 4377]   REPORT_BEST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 4450]   REPORT_BEST_IJK_SIZE

LIP_OLD    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 4925]   REPORT_BEST_IJK_SIZE0
    Use Argument   [check_data_cartesian.f, 5165]   REPORT_BEST_IJK_SIZE0
    Set   [check_data_cartesian.f, 5255]   REPORT_BEST_IJK_SIZE0
    Use   [check_data_cartesian.f, 5288]   REPORT_BEST_IJK_SIZE0

LIST_OF_CELLS    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 816]   CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 843]     CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 852]     CHECK_IF_PARCEL_OVELAPS_STL
    Set   [pic_bc_routines.f, 872]     CHECK_IF_PARCEL_OVELAPS_STL
    Use   [pic_bc_routines.f, 880]     CHECK_IF_PARCEL_OVELAPS_STL

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

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

lIW    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1027]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1042]         POINT_SOURCE_U_G
    Set   [source_u_g.f, 1045]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1051]         POINT_SOURCE_U_G

lIW    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1182]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1196]         POINT_SOURCE_U_S
    Set   [source_u_s.f, 1199]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1205]         POINT_SOURCE_U_S

lJ    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1161]         IKJ_MAP
    Declare   [set_bc0.f, 1166]        IKJ_MAP
    Set   [set_bc0.f, 1168]            IKJ_MAP

lJ    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1148]         JKI_MAP
    Declare   [set_bc0.f, 1154]        JKI_MAP
    Set   [set_bc0.f, 1156]            JKI_MAP

lJ    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1173]         KIJ_MAP
    Declare   [set_bc0.f, 1178]        KIJ_MAP
    Set   [set_bc0.f, 1180]            KIJ_MAP

lJ    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 167]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 235]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 239]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 239]     SEED_NEW_PARTICLE

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

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

lJN    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1173]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1186]         POINT_SOURCE_V_S
    Set   [source_v_s.f, 1189]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1193]         POINT_SOURCE_V_S

lJN    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 942]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 958]          POINT_SOURCE_V_G
    Set   [source_v_g.f, 961]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 965]          POINT_SOURCE_V_G

lJS    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1173]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1185]         POINT_SOURCE_V_S
    Set   [source_v_s.f, 1188]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1193]         POINT_SOURCE_V_S

lJS    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 942]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 957]          POINT_SOURCE_V_G
    Set   [source_v_g.f, 960]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 965]          POINT_SOURCE_V_G

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

lK    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1161]         IKJ_MAP
    Declare   [set_bc0.f, 1166]        IKJ_MAP
    Set   [set_bc0.f, 1168]            IKJ_MAP

lK    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1148]         JKI_MAP
    Declare   [set_bc0.f, 1154]        JKI_MAP
    Set   [set_bc0.f, 1156]            JKI_MAP

lK    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [set_bc0.f, 1173]         KIJ_MAP
    Declare   [set_bc0.f, 1178]        KIJ_MAP
    Set   [set_bc0.f, 1180]            KIJ_MAP

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

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

lKB    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 1050]      POINT_SOURCE_W_G
    Set   [source_w_g.f, 1065]         POINT_SOURCE_W_G
    Set   [source_w_g.f, 1068]         POINT_SOURCE_W_G
    Use   [source_w_g.f, 1072]         POINT_SOURCE_W_G

lKB    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1228]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1239]         POINT_SOURCE_W_S
    Set   [source_w_s.f, 1242]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1246]         POINT_SOURCE_W_S

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

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

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

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

lKT    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 1050]      POINT_SOURCE_W_G
    Set   [source_w_g.f, 1066]         POINT_SOURCE_W_G
    Set   [source_w_g.f, 1069]         POINT_SOURCE_W_G
    Use   [source_w_g.f, 1072]         POINT_SOURCE_W_G

lKT    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1228]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1240]         POINT_SOURCE_W_S
    Set   [source_w_s.f, 1243]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1246]         POINT_SOURCE_W_S

ll    (Local Variable)  Declared as: INTEGER
    Define   [cooling_rate.f, 397]     lubksb
    Set   [cooling_rate.f, 403]        lubksb
    Use   [cooling_rate.f, 404]        lubksb
    Use   [cooling_rate.f, 405]        lubksb

LL    (Local Variable)  Declared as: INTEGER
    Define   [calc_grbdry.f, 851]      F_HW
    Set   [calc_grbdry.f, 1006]        F_HW
    Use   [calc_grbdry.f, 1007]        F_HW
    Use   [calc_grbdry.f, 1008]        F_HW
    Use   [calc_grbdry.f, 1011]        F_HW
    Use   [calc_grbdry.f, 1011]        F_HW
    Use   [calc_grbdry.f, 1013]        F_HW
    Use   [calc_grbdry.f, 1018]        F_HW
    Use   [calc_grbdry.f, 1027]        F_HW
    Use   [calc_grbdry.f, 1029]        F_HW
    Use   [calc_grbdry.f, 1031]        F_HW
    Use   [calc_grbdry.f, 1037]        F_HW
    Use   [calc_grbdry.f, 1040]        F_HW
    Use   [calc_grbdry.f, 1040]        F_HW
    Use   [calc_grbdry.f, 1040]        F_HW

LL    (Variable)  Declared as: INTEGER
    Define   [calc_force_dem.f, 30]    CALC_FORCE_DEM
    Set   [calc_force_dem.f, 101]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 104]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 107]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 108]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 116]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 117]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 133]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 133]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 134]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 135]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 138]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 138]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 145]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 146]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 146]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 146]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 149]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 149]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 164]      CALC_FORCE_DEM
    Use Argument   [calc_force_dem.f, 178]   CALC_FORCE_DEM
    Use   [calc_force_dem.f, 181]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 224]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 237]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 237]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 239]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 239]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 241]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 241]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 254]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 254]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 256]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 256]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 258]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 258]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 297]      print_excess_overlap
    Use Argument   [calc_force_dem.f, 300]   print_excess_overlap
    Use   [calc_force_dem.f, 301]      print_excess_overlap

LL    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 39]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 61]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 63]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 66]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 68]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 69]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 70]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 71]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 73]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 77]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 79]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 82]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 117]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 118]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 120]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 120]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 125]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 129]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 133]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 136]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 136]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 137]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 138]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 139]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 159]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 160]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 162]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 162]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 165]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 165]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 167]   DES_GRANULAR_TEMPERATURE

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

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

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

LL    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 56]   PIC_APPLY_WALLBC_STL
    Set   [pic_bc_routines.f, 77]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 80]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 83]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 86]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 89]      PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 100]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 101]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 101]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 106]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 128]     PIC_APPLY_WALLBC_STL
    Use   [pic_bc_routines.f, 131]     PIC_APPLY_WALLBC_STL
    Use Argument   [pic_bc_routines.f, 136]   PIC_APPLY_WALLBC_STL

LL    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 586]   PIC_FIND_EMPTY_SPOT
    Set   [pic_bc_routines.f, 599]     PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 601]     PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 602]     PIC_FIND_EMPTY_SPOT
    Use   [pic_bc_routines.f, 603]     PIC_FIND_EMPTY_SPOT

LL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [pic_bc_routines.f, 704]   PIC_FIND_NEW_CELL
    Declare   [pic_bc_routines.f, 715]   PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 723]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 724]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 725]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 726]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 727]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 729]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 733]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 735]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 737]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 741]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 743]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 745]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 749]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 752]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 754]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 756]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 760]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 761]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 762]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 765]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 769]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 773]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 776]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 776]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 776]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 776]     PIC_FIND_NEW_CELL

LL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [pic_bc_routines.f, 638]   PIC_REFLECT_PART
    Declare   [pic_bc_routines.f, 647]   PIC_REFLECT_PART
    Use   [pic_bc_routines.f, 668]     PIC_REFLECT_PART
    Use   [pic_bc_routines.f, 675]     PIC_REFLECT_PART
    Use   [pic_bc_routines.f, 690]     PIC_REFLECT_PART

LL    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 810]         THETA_HW_CW
    Set   [bc_theta.f, 968]            THETA_HW_CW
    Use   [bc_theta.f, 969]            THETA_HW_CW
    Use   [bc_theta.f, 970]            THETA_HW_CW
    Use   [bc_theta.f, 973]            THETA_HW_CW
    Use   [bc_theta.f, 973]            THETA_HW_CW
    Use   [bc_theta.f, 975]            THETA_HW_CW
    Use   [bc_theta.f, 981]            THETA_HW_CW
    Use   [bc_theta.f, 982]            THETA_HW_CW
    Use   [bc_theta.f, 983]            THETA_HW_CW
    Use   [bc_theta.f, 1007]           THETA_HW_CW
    Use   [bc_theta.f, 1025]           THETA_HW_CW
    Use   [bc_theta.f, 1026]           THETA_HW_CW

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

LL    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 26]           NSQUARE
    Set   [nsquare.f, 46]              NSQUARE
    Use   [nsquare.f, 49]              NSQUARE
    Use   [nsquare.f, 51]              NSQUARE
    Use   [nsquare.f, 58]              NSQUARE
    Use   [nsquare.f, 59]              NSQUARE
    Use   [nsquare.f, 67]              NSQUARE
    Use   [nsquare.f, 70]              NSQUARE
    Use   [nsquare.f, 76]              NSQUARE
    Use   [nsquare.f, 79]              NSQUARE
    Use   [nsquare.f, 83]              NSQUARE
    Use   [nsquare.f, 87]              NSQUARE
    Use   [nsquare.f, 90]              NSQUARE
    Use   [nsquare.f, 118]             NSQUARE
    Use   [nsquare.f, 124]             NSQUARE

LL    (Local Variable)  Declared as: INTEGER
    Define   [cfupdateold.f, 24]       CFUPDATEOLD
    Set   [cfupdateold.f, 30]          CFUPDATEOLD
    Use   [cfupdateold.f, 31]          CFUPDATEOLD
    Use   [cfupdateold.f, 31]          CFUPDATEOLD
    Use   [cfupdateold.f, 33]          CFUPDATEOLD
    Use   [cfupdateold.f, 33]          CFUPDATEOLD
    Use   [cfupdateold.f, 34]          CFUPDATEOLD
    Use   [cfupdateold.f, 34]          CFUPDATEOLD
    Use   [cfupdateold.f, 35]          CFUPDATEOLD
    Use   [cfupdateold.f, 35]          CFUPDATEOLD

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

LL    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 1305]    WRITE_MPPIC_VEL_S
    Set   [pic_routines.f, 1358]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1361]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1363]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1365]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1366]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1366]       WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 1366]       WRITE_MPPIC_VEL_S

LL    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 419]   DES_NEW_PARTICLE_TEST
    Set   [mass_inflow_dem.f, 464]     DES_NEW_PARTICLE_TEST
    Use   [mass_inflow_dem.f, 465]     DES_NEW_PARTICLE_TEST

ll1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 971]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 987]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1067]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1070]   IJK_Pg_SEARCH

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

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

ll2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 971]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 986]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1068]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1073]   IJK_Pg_SEARCH

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

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

ll3    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 971]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 985]         IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1037]   IJK_Pg_SEARCH

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

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

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

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

llI    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 168]   SEED_NEW_PARTICLE

llJ    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 168]   SEED_NEW_PARTICLE

llK    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 168]   SEED_NEW_PARTICLE

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

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

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

llocalcnt    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 258]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 325]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 326]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 327]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 327]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 329]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 331]      WRITE_DES_TECPLOT

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

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 151]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 159]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 182]              CALC_PS_CpxMFLOW
    Use   [set_ps.f, 184]              CALC_PS_CpxMFLOW

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

LM    (Local Variable)  Declared as: INTEGER
    Define   [vf_gs_y.f, 131]          VF_SS_Y
    Set   [vf_gs_y.f, 139]             VF_SS_Y
    Use   [vf_gs_y.f, 145]             VF_SS_Y
    Use   [vf_gs_y.f, 145]             VF_SS_Y
    Use   [vf_gs_y.f, 145]             VF_SS_Y
    Use   [vf_gs_y.f, 147]             VF_SS_Y

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

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

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

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

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

lM    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_common_discrete.f, 92]   CHECK_SOLIDS_COMMON_DISCRETE
    Set   [check_solids_common_discrete.f, 105]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 108]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 113]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 114]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 114]   CHECK_SOLIDS_COMMON_DISCRETE
    Use   [check_solids_common_discrete.f, 114]   CHECK_SOLIDS_COMMON_DISCRETE

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 226]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 228]            CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 299]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 312]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 317]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 323]            CALC_D_N_GAS_AND_SOLIDS

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 547]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 589]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 591]            CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 602]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 613]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 616]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 620]            CALC_D_N_SOLIDS_ONLY

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

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ro_s.f, 104]         CHECK_SET_ROs
    Declare   [set_ro_s.f, 122]        CHECK_SET_ROs

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

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

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

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

lM    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 121]          RRATES0
    Set   [rrates0.f, 347]             RRATES0
    Use   [rrates0.f, 348]             RRATES0
    Use   [rrates0.f, 348]             RRATES0
    Use   [rrates0.f, 349]             RRATES0
    Set   [rrates0.f, 363]             RRATES0
    Use   [rrates0.f, 365]             RRATES0
    Set   [rrates0.f, 378]             RRATES0
    Use   [rrates0.f, 380]             RRATES0
    Set   [rrates0.f, 383]             RRATES0
    Use   [rrates0.f, 385]             RRATES0

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [read_database.f, 20]     READ_DATABASE
    Declare   [read_database.f, 38]    READ_DATABASE
    Use   [read_database.f, 116]       READ_DATABASE
    Use   [read_database.f, 116]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 127]       READ_DATABASE
    Use   [read_database.f, 128]       READ_DATABASE
    Use   [read_database.f, 128]       READ_DATABASE
    Use   [read_database.f, 131]       READ_DATABASE
    Use   [read_database.f, 132]       READ_DATABASE
    Use   [read_database.f, 136]       READ_DATABASE
    Use   [read_database.f, 139]       READ_DATABASE
    Use   [read_database.f, 140]       READ_DATABASE
    Use   [read_database.f, 143]       READ_DATABASE
    Use   [read_database.f, 144]       READ_DATABASE
    Use   [read_database.f, 146]       READ_DATABASE
    Use   [read_database.f, 147]       READ_DATABASE
    Use Argument   [read_database.f, 154]   READ_DATABASE

lM    (Local Variable)  Declared as: INTEGER
    Define   [physical_prop.f, 440]    PHYSICAL_PROP_Dp
    Set   [physical_prop.f, 446]       PHYSICAL_PROP_Dp
    Use Argument   [physical_prop.f, 452]   PHYSICAL_PROP_Dp
    Use   [physical_prop.f, 452]       PHYSICAL_PROP_Dp

LM    (Local Variable)  Declared as: INTEGER
    Define   [check_data_30.f, 122]    CHECK_DATA_30
    Set   [check_data_30.f, 581]       CHECK_DATA_30
    Use   [check_data_30.f, 582]       CHECK_DATA_30
    Set   [check_data_30.f, 584]       CHECK_DATA_30
    Use   [check_data_30.f, 585]       CHECK_DATA_30

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

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

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 229]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 231]            CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 301]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 314]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 318]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 324]            CALC_D_T_GAS_AND_SOLIDS

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

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 233]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 235]            CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 306]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 319]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 324]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 330]            CALC_D_E_GAS_AND_SOLIDS

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 559]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 603]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 605]            CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 616]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 628]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 633]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 637]            CALC_D_E_SOLIDS_ONLY

LM    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_energy_dissipation_ss.f, 47]   CALC_IA_ENERGY_DISSIPATION_SS
    Set   [kintheory_energy_dissipation_ss.f, 70]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 92]   CALC_IA_ENERGY_DISSIPATION_SS
    Use   [kintheory_energy_dissipation_ss.f, 147]   CALC_IA_ENERGY_DISSIPATION_SS

lM    (Local Variable)  Declared as: INTEGER
    Define   [drag_gp_des.f, 70]       DES_DRAG_GP
    Set   [drag_gp_des.f, 128]         DES_DRAG_GP
    Use   [drag_gp_des.f, 130]         DES_DRAG_GP
    Use   [drag_gp_des.f, 131]         DES_DRAG_GP
    Use   [drag_gp_des.f, 131]         DES_DRAG_GP
    Use   [drag_gp_des.f, 133]         DES_DRAG_GP
    Set   [drag_gp_des.f, 137]         DES_DRAG_GP
    Use Argument   [drag_gp_des.f, 139]   DES_DRAG_GP
    Use   [drag_gp_des.f, 139]         DES_DRAG_GP
    Use   [drag_gp_des.f, 141]         DES_DRAG_GP

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

lM    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [mass_inflow_dem.f, 122]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 146]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 187]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 189]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 193]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 193]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 194]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 194]     SEED_NEW_PARTICLE

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

lMAP    (Dummy Argument)  Declared as: INTEGER (implicit) EXTERNAL
    Define   [set_bc0.f, 971]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 993]         IJK_Pg_SEARCH
    Call   [set_bc0.f, 1037]           IJK_Pg_SEARCH

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

LMAX    (Dummy Argument)  Declared as: INTEGER
    Define   [parse_line.f, 450]       PARSE_ARITH
    Declare   [parse_line.f, 467]      PARSE_ARITH
    Set   [parse_line.f, 515]          PARSE_ARITH
    Use   [parse_line.f, 521]          PARSE_ARITH
    Use   [parse_line.f, 523]          PARSE_ARITH
    Set   [parse_line.f, 562]          PARSE_ARITH
    Use   [parse_line.f, 564]          PARSE_ARITH
    Use   [parse_line.f, 568]          PARSE_ARITH

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

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

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

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

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4576]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4614]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4617]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4628]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4652]   GET_LIP_WITH_GHOST_LAYERS

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5341]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5379]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5382]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5393]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5417]   GET_LIP_WITH_GHOST_LAYERS0

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4710]   MINIMIZE_LOAD_IMBALANCE
    Declare   [check_data_cartesian.f, 4748]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4750]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4770]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4798]   MINIMIZE_LOAD_IMBALANCE

LMAX1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5475]   MINIMIZE_LOAD_IMBALANCE0
    Declare   [check_data_cartesian.f, 5513]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5515]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5533]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5561]   MINIMIZE_LOAD_IMBALANCE0

lmax_dia    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [generate_particle_config.f, 503]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 558]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 573]   GENERATE_PARTICLE_CONFIG_DEM
    Use Argument   [generate_particle_config.f, 573]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 595]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 596]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 597]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 717]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 718]   GENERATE_PARTICLE_CONFIG_DEM

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4576]   GET_LIP_WITH_GHOST_LAYERS
    Declare   [check_data_cartesian.f, 4614]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4617]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4628]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4636]   GET_LIP_WITH_GHOST_LAYERS
    Use   [check_data_cartesian.f, 4652]   GET_LIP_WITH_GHOST_LAYERS

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5341]   GET_LIP_WITH_GHOST_LAYERS0
    Declare   [check_data_cartesian.f, 5379]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5382]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5393]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5401]   GET_LIP_WITH_GHOST_LAYERS0
    Use   [check_data_cartesian.f, 5417]   GET_LIP_WITH_GHOST_LAYERS0

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 4710]   MINIMIZE_LOAD_IMBALANCE
    Declare   [check_data_cartesian.f, 4748]   MINIMIZE_LOAD_IMBALANCE
    Use   [check_data_cartesian.f, 4750]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4770]   MINIMIZE_LOAD_IMBALANCE
    Use Argument   [check_data_cartesian.f, 4798]   MINIMIZE_LOAD_IMBALANCE

LMIN1    (Dummy Argument)  Declared as: INTEGER
    Define   [check_data_cartesian.f, 5475]   MINIMIZE_LOAD_IMBALANCE0
    Declare   [check_data_cartesian.f, 5513]   MINIMIZE_LOAD_IMBALANCE0
    Use   [check_data_cartesian.f, 5515]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5533]   MINIMIZE_LOAD_IMBALANCE0
    Use Argument   [check_data_cartesian.f, 5561]   MINIMIZE_LOAD_IMBALANCE0

lMMAX    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 127]          RRATES0
    Set   [rrates0.f, 176]             RRATES0
    Use   [rrates0.f, 280]             RRATES0
    Use   [rrates0.f, 313]             RRATES0
    Use   [rrates0.f, 320]             RRATES0
    Use   [rrates0.f, 321]             RRATES0
    Use   [rrates0.f, 332]             RRATES0
    Use   [rrates0.f, 338]             RRATES0
    Use   [rrates0.f, 362]             RRATES0
    Use   [rrates0.f, 370]             RRATES0
    Use   [rrates0.f, 382]             RRATES0

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

lMsg    (Local Variable)  Declared as: CHARACTER
    Define   [set_bc0.f, 812]          SET_IJK_P_G
    Set   [set_bc0.f, 862]             SET_IJK_P_G
    Set   [set_bc0.f, 870]             SET_IJK_P_G
    Set   [set_bc0.f, 878]             SET_IJK_P_G
    Set   [set_bc0.f, 889]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 898]    SET_IJK_P_G

lMsg    (Variable)  Declared as: CHARACTER
    Define   [iterate.f, 104]          ITERATE
    Set   [iterate.f, 189]             ITERATE
    Use Argument   [iterate.f, 470]    ITERATE
    Use Argument   [iterate.f, 474]    ITERATE
    Set   [iterate.f, 566]             IER_MANAGER
    Set   [iterate.f, 568]             IER_MANAGER
    Set   [iterate.f, 570]             IER_MANAGER
    Set   [iterate.f, 578]             IER_MANAGER
    Set   [iterate.f, 580]             IER_MANAGER
    Set   [iterate.f, 588]             IER_MANAGER
    Set   [iterate.f, 590]             IER_MANAGER
    Set   [iterate.f, 598]             IER_MANAGER
    Set   [iterate.f, 600]             IER_MANAGER
    Set   [iterate.f, 608]             IER_MANAGER
    Set   [iterate.f, 610]             IER_MANAGER
    Set   [iterate.f, 616]             IER_MANAGER

lMW    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [set_ps.f, 152]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 167]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 183]              CALC_PS_CpxMFLOW

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

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

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

lN    (Local Variable)  Declared as: INTEGER
    Define   [stiff_chem_rrates.f, 89]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 166]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 168]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 170]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 174]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 175]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 209]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 213]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 238]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 240]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 242]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 244]   STIFF_CHEM_RRATES

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

lN    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 120]          RRATES0
    Set   [rrates0.f, 202]             RRATES0
    Use   [rrates0.f, 204]             RRATES0
    Use   [rrates0.f, 206]             RRATES0
    Use   [rrates0.f, 210]             RRATES0
    Use   [rrates0.f, 211]             RRATES0
    Use   [rrates0.f, 246]             RRATES0
    Use   [rrates0.f, 250]             RRATES0
    Set   [rrates0.f, 296]             RRATES0
    Use   [rrates0.f, 298]             RRATES0
    Use   [rrates0.f, 300]             RRATES0
    Use   [rrates0.f, 302]             RRATES0

lN    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [read_database.f, 20]     READ_DATABASE
    Declare   [read_database.f, 38]    READ_DATABASE
    Use   [read_database.f, 116]       READ_DATABASE
    Use   [read_database.f, 116]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 117]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 127]       READ_DATABASE
    Use   [read_database.f, 128]       READ_DATABASE
    Use   [read_database.f, 128]       READ_DATABASE
    Use   [read_database.f, 131]       READ_DATABASE
    Use   [read_database.f, 132]       READ_DATABASE
    Use   [read_database.f, 136]       READ_DATABASE
    Use   [read_database.f, 139]       READ_DATABASE
    Use   [read_database.f, 140]       READ_DATABASE
    Use   [read_database.f, 143]       READ_DATABASE
    Use   [read_database.f, 144]       READ_DATABASE
    Use   [read_database.f, 146]       READ_DATABASE
    Use   [read_database.f, 147]       READ_DATABASE
    Use Argument   [read_database.f, 154]   READ_DATABASE

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

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

lName    (Dummy Argument)  Declared as: CHARACTER INTENT(IN)
    Define   [read_database.f, 20]     READ_DATABASE
    Declare   [read_database.f, 40]    READ_DATABASE
    Use Argument   [read_database.f, 116]   READ_DATABASE
    Use Argument   [read_database.f, 154]   READ_DATABASE
    Use Argument   [read_database.f, 169]   READ_DATABASE

lNEQ    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [stiff_chem_rrates.f, 12]   STIFF_CHEM_RRATES
    Declare   [stiff_chem_rrates.f, 75]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 140]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 148]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 308]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 344]   STIFF_CHEM_RRATES

lNEXT_REC    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 28]     READ_RES0_DES
    Set   [read_res0_des.f, 34]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 36]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 37]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 38]   READ_RES0_DES
    Use   [read_res0_des.f, 41]        READ_RES0_DES
    Set   [read_res0_des.f, 41]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 43]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 46]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 50]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 54]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 57]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 58]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 60]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 61]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 65]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 70]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 72]   READ_RES0_DES
    Use   [read_res0_des.f, 80]        READ_RES0_DES
    Set   [read_res0_des.f, 80]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 82]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 84]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 85]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 90]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 100]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 101]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 102]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 103]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 104]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 105]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 110]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 112]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 114]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 116]   READ_RES0_DES

lNEXT_REC    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 31]    WRITE_RES0_DES
    Set   [write_res0_des.f, 43]       WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 45]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 46]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 47]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 50]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 53]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 56]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 60]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 64]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 67]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 68]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 71]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 74]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 78]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 83]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 85]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 89]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 92]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 95]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 96]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 99]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 101]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 102]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 103]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 104]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 105]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 106]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 107]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 108]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 109]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 110]   WRITE_RES0_DES

lNoOfRxns    (Dummy Argument)  Declared as: INTEGER INTENT(INOUT)
    Define   [parse_rxn.f, 22]         PARSE_RXN
    Declare   [parse_rxn.f, 38]        PARSE_RXN
    Use Argument   [parse_rxn.f, 83]   PARSE_RXN
    Use Argument   [parse_rxn.f, 111]   PARSE_RXN
    Use Argument   [parse_rxn.f, 136]   PARSE_RXN
    Use Argument   [parse_rxn.f, 143]   PARSE_RXN

lNoP    (Local Variable)  Declared as: CHARACTER
    Define   [write_des_data.f, 114]   WRITE_DES_VTP
    Use Argument   [write_des_data.f, 122]   WRITE_DES_VTP
    Use   [write_des_data.f, 133]      WRITE_DES_VTP

lNOR    (Dummy Argument)  Declared as: INTEGER INTENT(INOUT)
    Define   [parse_rxn.f, 201]        getReactionIndex
    Declare   [parse_rxn.f, 207]       getReactionIndex
    Use   [parse_rxn.f, 212]           getReactionIndex
    Set   [parse_rxn.f, 218]           getReactionIndex
    Use   [parse_rxn.f, 218]           getReactionIndex
    Use   [parse_rxn.f, 219]           getReactionIndex

lNP    (Local Variable)  Declared as: INTEGER
    Define   [calc_thermo_des.f, 37]   CALC_THERMO_DES
    Set   [calc_thermo_des.f, 75]      CALC_THERMO_DES
    Use   [calc_thermo_des.f, 76]      CALC_THERMO_DES

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_newvalues.f, 37]   DES_THERMO_NEWVALUES
    Set   [des_thermo_newvalues.f, 67]   DES_THERMO_NEWVALUES
    Use   [des_thermo_newvalues.f, 68]   DES_THERMO_NEWVALUES

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_newvalues.f, 154]   SET_INIT_avgTs
    Set   [des_thermo_newvalues.f, 175]   SET_INIT_avgTs
    Use   [des_thermo_newvalues.f, 176]   SET_INIT_avgTs

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_reaction_model.f, 39]   DES_REACTION_MODEL
    Set   [des_reaction_model.f, 68]   DES_REACTION_MODEL
    Use   [des_reaction_model.f, 69]   DES_REACTION_MODEL

lNP    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 284]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 299]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 300]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 303]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 304]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 305]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 306]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 307]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 311]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 312]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 312]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 313]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 317]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 320]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 323]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 326]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 329]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 330]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 333]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 336]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 337]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 341]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 344]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 347]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 347]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 348]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 348]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 348]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 349]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 349]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 349]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 352]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 356]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 357]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 357]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 362]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 365]   SET_NEW_PARTICLE_PROPS

LOC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [write_out0.f, 56]        WRITE_OUT0
    Set   [write_out0.f, 377]          WRITE_OUT0
    Set   [write_out0.f, 378]          WRITE_OUT0
    Set   [write_out0.f, 379]          WRITE_OUT0
    Set   [write_out0.f, 380]          WRITE_OUT0
    Set   [write_out0.f, 381]          WRITE_OUT0
    Set   [write_out0.f, 382]          WRITE_OUT0
    Use   [write_out0.f, 383]          WRITE_OUT0
    Use   [write_out0.f, 383]          WRITE_OUT0
    Use   [write_out0.f, 384]          WRITE_OUT0
    Use   [write_out0.f, 384]          WRITE_OUT0
    Use   [write_out0.f, 384]          WRITE_OUT0
    Use   [write_out0.f, 385]          WRITE_OUT0
    Set   [write_out0.f, 462]          WRITE_OUT0
    Set   [write_out0.f, 463]          WRITE_OUT0
    Set   [write_out0.f, 464]          WRITE_OUT0
    Set   [write_out0.f, 465]          WRITE_OUT0
    Set   [write_out0.f, 466]          WRITE_OUT0
    Set   [write_out0.f, 467]          WRITE_OUT0
    Use   [write_out0.f, 468]          WRITE_OUT0
    Use   [write_out0.f, 468]          WRITE_OUT0
    Use   [write_out0.f, 469]          WRITE_OUT0
    Use   [write_out0.f, 469]          WRITE_OUT0
    Use   [write_out0.f, 469]          WRITE_OUT0
    Use   [write_out0.f, 470]          WRITE_OUT0
    Set   [write_out0.f, 548]          WRITE_OUT0
    Set   [write_out0.f, 549]          WRITE_OUT0
    Set   [write_out0.f, 550]          WRITE_OUT0
    Set   [write_out0.f, 551]          WRITE_OUT0
    Set   [write_out0.f, 552]          WRITE_OUT0
    Set   [write_out0.f, 553]          WRITE_OUT0
    Use   [write_out0.f, 554]          WRITE_OUT0
    Use   [write_out0.f, 554]          WRITE_OUT0
    Use   [write_out0.f, 555]          WRITE_OUT0
    Use   [write_out0.f, 555]          WRITE_OUT0
    Use   [write_out0.f, 555]          WRITE_OUT0
    Use   [write_out0.f, 556]          WRITE_OUT0

LOC    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [calc_cell.f, 126]        CALC_CELL_INTERSECT
    Declare   [calc_cell.f, 135]       CALC_CELL_INTERSECT
    Use   [calc_cell.f, 156]           CALC_CELL_INTERSECT
    Use   [calc_cell.f, 156]           CALC_CELL_INTERSECT

LOC_DEM_BCMI_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_dem_mi.f, 338]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 393]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 437]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 457]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 460]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 463]       SET_DEM_BCMI_IJK

LOC_DEM_BCMO_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_dem_mo.f, 39]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 90]        SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 133]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 174]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 193]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 196]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 199]       SET_BC_DEM_MO

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

LOC_PIC_BCMI_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_pic_mi.f, 145]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 200]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 249]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 272]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 281]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 284]       SET_PIC_BCMI_IJK

LOC_PIC_BCMO_IJK    (Local Variable)  Declared as: INTEGER ALLOCATABLE
    Define   [set_bc_pic_mo.f, 39]     SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 82]        SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 127]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 146]       SET_BC_PIC_MO
    Use   [set_bc_pic_mo.f, 149]       SET_BC_PIC_MO
    Set   [set_bc_pic_mo.f, 152]       SET_BC_PIC_MO

loc_UR_F_gs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_coeff.f, 43]        CALC_COEFF_ALL
    Set   [calc_coeff.f, 53]           CALC_COEFF_ALL
    Use   [calc_coeff.f, 68]           CALC_COEFF_ALL

loc_UR_kth_sml    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_coeff.f, 45]        CALC_COEFF_ALL
    Set   [calc_coeff.f, 54]           CALC_COEFF_ALL
    Use   [calc_coeff.f, 69]           CALC_COEFF_ALL

LOCAL_INDEX    (Local Variable)  Declared as: INTEGER
    Define   [accum_resid.f, 48]       ACCUM_RESID
    Set   [accum_resid.f, 53]          ACCUM_RESID
    Set   [accum_resid.f, 61]          ACCUM_RESID
    Use   [accum_resid.f, 61]          ACCUM_RESID
    Use   [accum_resid.f, 62]          ACCUM_RESID
    Set   [accum_resid.f, 63]          ACCUM_RESID
    Use   [accum_resid.f, 63]          ACCUM_RESID
    Use   [accum_resid.f, 64]          ACCUM_RESID
    Set   [accum_resid.f, 72]          ACCUM_RESID
    Set   [accum_resid.f, 78]          ACCUM_RESID
    Use   [accum_resid.f, 78]          ACCUM_RESID
    Use   [accum_resid.f, 79]          ACCUM_RESID
    Set   [accum_resid.f, 80]          ACCUM_RESID
    Use   [accum_resid.f, 80]          ACCUM_RESID
    Use   [accum_resid.f, 81]          ACCUM_RESID

LOCAL_MAX_Q    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 2147]         PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2559]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2561]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2565]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2567]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2571]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2573]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2578]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2580]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2584]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2586]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2590]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2592]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2597]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2599]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2603]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2605]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2610]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2612]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2616]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2618]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2622]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2624]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2629]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2631]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2638]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2640]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2643]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2645]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2648]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2650]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2654]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2656]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2659]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2661]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2664]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2666]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2670]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2672]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2675]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2677]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2681]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2683]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2686]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2688]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2691]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2693]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2697]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2699]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2707]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2709]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2712]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2714]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2717]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2719]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2723]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2725]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2728]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2730]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2733]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2735]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2739]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2740]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2744]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2746]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2750]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2752]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2755]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2757]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2760]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2762]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2766]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2768]   PRINT_GRID_STATISTICS

Local_min    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1466]   SORT
    Set   [get_cut_cell_volume_area.f, 1472]   SORT
    Use   [get_cut_cell_volume_area.f, 1475]   SORT
    Set   [get_cut_cell_volume_area.f, 1476]   SORT

LOCAL_MIN_Q    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 2147]         PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2558]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2560]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2564]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2566]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2570]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2572]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2577]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2579]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2583]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2585]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2589]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2591]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2596]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2598]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2602]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2604]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2609]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2611]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2615]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2617]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2621]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2623]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2628]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2630]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2637]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2639]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2642]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2644]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2647]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2649]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2653]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2655]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2658]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2660]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2663]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2665]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2669]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2671]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2674]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2676]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2680]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2682]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2685]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2687]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2690]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2692]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2696]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2698]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2706]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2708]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2711]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2713]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2716]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2718]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2722]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2724]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2727]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2729]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2732]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2734]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2738]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2741]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2743]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2745]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2749]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2751]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2754]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2756]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2759]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2761]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2765]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2767]   PRINT_GRID_STATISTICS

LOCAL_REFP_S    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [get_delh.f, 624]         GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 639]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 649]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 650]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 651]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 712]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 714]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 715]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 716]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 773]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 774]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 775]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 856]            GET_DISTANCE_TO_WALL

LOGFILE    (Local Variable)  Declared as: CHARACTER
    Define   [open_files.f, 294]       OPEN_PE_LOG
    Set   [open_files.f, 311]          OPEN_PE_LOG
    Set   [open_files.f, 316]          OPEN_PE_LOG
    Set   [open_files.f, 318]          OPEN_PE_LOG
    Set   [open_files.f, 320]          OPEN_PE_LOG
    Set   [open_files.f, 322]          OPEN_PE_LOG
    Set   [open_files.f, 324]          OPEN_PE_LOG
    Set   [open_files.f, 326]          OPEN_PE_LOG
    Use Argument   [open_files.f, 331]   OPEN_PE_LOG
    Use Argument   [open_files.f, 332]   OPEN_PE_LOG

LONGEST    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1267]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1369]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1371]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1373]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1379]   REORDER_POLYGON

lOoDT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [dif_phi_source_des.f, 56]   DIF_PHI_SOURCE_DES
    Set   [dif_phi_source_des.f, 60]   DIF_PHI_SOURCE_DES
    Use   [dif_phi_source_des.f, 66]   DIF_PHI_SOURCE_DES

LORIG_ALL    (Local Variable)  Declared as: INTEGER
    Define   [generate_particle_config.f, 40]   GENERATE_PARTICLE_CONFIG
    Set   [generate_particle_config.f, 56]   GENERATE_PARTICLE_CONFIG
    Set   [generate_particle_config.f, 104]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 104]   GENERATE_PARTICLE_CONFIG
    Use Argument   [generate_particle_config.f, 116]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 127]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 136]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 138]   GENERATE_PARTICLE_CONFIG

LOSS    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_philoss.f, 24]       GET_PHILOSS
    Declare   [get_philoss.f, 67]      GET_PHILOSS
    Set   [get_philoss.f, 77]          GET_PHILOSS
    Set   [get_philoss.f, 98]          GET_PHILOSS
    Use   [get_philoss.f, 98]          GET_PHILOSS
    Set   [get_philoss.f, 101]         GET_PHILOSS
    Use   [get_philoss.f, 101]         GET_PHILOSS
    Set   [get_philoss.f, 107]         GET_PHILOSS
    Use   [get_philoss.f, 107]         GET_PHILOSS
    Set   [get_philoss.f, 110]         GET_PHILOSS
    Use   [get_philoss.f, 110]         GET_PHILOSS
    Set   [get_philoss.f, 116]         GET_PHILOSS
    Use   [get_philoss.f, 116]         GET_PHILOSS
    Set   [get_philoss.f, 119]         GET_PHILOSS
    Use   [get_philoss.f, 119]         GET_PHILOSS
    Set   [get_philoss.f, 125]         GET_PHILOSS
    Use   [get_philoss.f, 125]         GET_PHILOSS
    Set   [get_philoss.f, 128]         GET_PHILOSS
    Use   [get_philoss.f, 128]         GET_PHILOSS
    Set   [get_philoss.f, 135]         GET_PHILOSS
    Use   [get_philoss.f, 135]         GET_PHILOSS
    Set   [get_philoss.f, 138]         GET_PHILOSS
    Use   [get_philoss.f, 138]         GET_PHILOSS
    Set   [get_philoss.f, 144]         GET_PHILOSS
    Use   [get_philoss.f, 144]         GET_PHILOSS
    Set   [get_philoss.f, 148]         GET_PHILOSS
    Use   [get_philoss.f, 148]         GET_PHILOSS

lOWNS    (Dummy Argument)  Declared as: LOGICAL INTENT(OUT)
    Define   [mass_inflow_dem.f, 123]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 152]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 238]     SEED_NEW_PARTICLE

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 219]     PARTIAL_ELIM_IA
    Set   [partial_elim.f, 275]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 276]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 277]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 278]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 278]        PARTIAL_ELIM_IA

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 69]      PARTIAL_ELIM_S
    Set   [partial_elim.f, 137]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 138]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 139]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 140]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 141]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 143]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 143]        PARTIAL_ELIM_S

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 364]     PARTIAL_ELIM_U
    Set   [partial_elim.f, 447]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 450]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 451]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 452]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 453]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 455]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 455]        PARTIAL_ELIM_U

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 550]     PARTIAL_ELIM_V
    Set   [partial_elim.f, 628]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 629]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 630]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 631]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 632]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 634]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 634]        PARTIAL_ELIM_V

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 729]     PARTIAL_ELIM_W
    Set   [partial_elim.f, 807]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 808]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 809]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 810]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 811]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 813]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 813]        PARTIAL_ELIM_W

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 301]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 302]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 302]            CALC_D_N_GAS_AND_SOLIDS
    Use Argument   [calc_d_n.f, 303]   CALC_D_N_GAS_AND_SOLIDS

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 547]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 604]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 605]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 605]            CALC_D_N_SOLIDS_ONLY
    Use Argument   [calc_d_n.f, 606]   CALC_D_N_SOLIDS_ONLY

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 70]   PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 144]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 145]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 145]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 146]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 147]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 148]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 149]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 151]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 151]    PARTIAL_ELIM_GHD_U

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 269]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 343]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 344]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 344]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 345]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 346]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 347]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 348]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 350]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 350]    PARTIAL_ELIM_GHD_V

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 461]   PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 533]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 534]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 534]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 535]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 536]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 537]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 538]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 540]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 540]    PARTIAL_ELIM_GHD_W

lP    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 534]        getFracDH
    Set   [parse_rxn.f, 550]           getFracDH
    Use   [parse_rxn.f, 554]           getFracDH
    Use   [parse_rxn.f, 554]           getFracDH
    Use   [parse_rxn.f, 558]           getFracDH
    Use   [parse_rxn.f, 568]           getFracDH

lP    (Local Variable)  Declared as: INTEGER
    Define   [remove_comment.f, 65]    REMOVE_PAR_BLANKS
    Set   [remove_comment.f, 78]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 81]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 84]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 84]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 86]       REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 93]       REMOVE_PAR_BLANKS
    Set   [remove_comment.f, 112]      REMOVE_PAR_BLANKS
    Use   [remove_comment.f, 114]      REMOVE_PAR_BLANKS

LP    (Local Variable)  Declared as: INTEGER
    Define   [pic_bc_routines.f, 178]   PIC_MO_BC
    Set   [pic_bc_routines.f, 200]     PIC_MO_BC
    Use   [pic_bc_routines.f, 202]     PIC_MO_BC

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 303]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 304]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 304]            CALC_D_T_GAS_AND_SOLIDS
    Use Argument   [calc_d_t.f, 305]   CALC_D_T_GAS_AND_SOLIDS

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 547]         CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 606]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 607]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 607]            CALC_D_T_SOLIDS_ONLY
    Use Argument   [calc_d_t.f, 608]   CALC_D_T_SOLIDS_ONLY

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 308]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 309]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 309]            CALC_D_E_GAS_AND_SOLIDS
    Use Argument   [calc_d_e.f, 310]   CALC_D_E_GAS_AND_SOLIDS

LP    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 559]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 618]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 619]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 619]            CALC_D_E_SOLIDS_ONLY
    Use Argument   [calc_d_e.f, 620]   CALC_D_E_SOLIDS_ONLY

LP    (Local Variable)  Declared as: INTEGER
    Define   [mass_outflow_dem.f, 23]   MASS_OUTFLOW_DEM
    Set   [mass_outflow_dem.f, 49]     MASS_OUTFLOW_DEM
    Use   [mass_outflow_dem.f, 51]     MASS_OUTFLOW_DEM

lp    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 836]      des_dbgpic
    Set   [cfnewvalues.f, 848]         des_dbgpic
    Use   [cfnewvalues.f, 849]         des_dbgpic
    Use   [cfnewvalues.f, 849]         des_dbgpic
    Use   [cfnewvalues.f, 850]         des_dbgpic
    Use   [cfnewvalues.f, 851]         des_dbgpic
    Use   [cfnewvalues.f, 851]         des_dbgpic
    Use   [cfnewvalues.f, 852]         des_dbgpic
    Use   [cfnewvalues.f, 853]         des_dbgpic
    Use   [cfnewvalues.f, 853]         des_dbgpic

lp    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 889]      des_dbgtecplot
    Set   [cfnewvalues.f, 906]         des_dbgtecplot
    Use   [cfnewvalues.f, 907]         des_dbgtecplot
    Use   [cfnewvalues.f, 908]         des_dbgtecplot
    Use   [cfnewvalues.f, 909]         des_dbgtecplot
    Use   [cfnewvalues.f, 909]         des_dbgtecplot
    Use   [cfnewvalues.f, 910]         des_dbgtecplot
    Use   [cfnewvalues.f, 910]         des_dbgtecplot
    Use   [cfnewvalues.f, 911]         des_dbgtecplot
    Use   [cfnewvalues.f, 911]         des_dbgtecplot
    Use   [cfnewvalues.f, 911]         des_dbgtecplot

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields1.f, 39]   COMP_MEAN_FIELDS1
    Set   [comp_mean_fields1.f, 54]    COMP_MEAN_FIELDS1
    Use   [comp_mean_fields1.f, 72]    COMP_MEAN_FIELDS1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 85]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 91]         DRAG_GS_DES1
    Use   [drag_gs_des1.f, 111]        DRAG_GS_DES1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 401]     DRAG_GS_EXPLICIT1
    Set   [drag_gs_des1.f, 413]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 445]        DRAG_GS_EXPLICIT1
    Use   [drag_gs_des1.f, 478]        DRAG_GS_EXPLICIT1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 233]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 245]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 267]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 296]        DRAG_GS_GAS1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 54]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 67]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 81]         CALC_PG_GRAD

lparcnt    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 36]   MAKE_ARRAYS_DES

lpCnt    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 1002]         IJK_Pg_SEARCH
    Set   [set_bc0.f, 1018]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1029]            IJK_Pg_SEARCH

lPF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 79]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 106]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 121]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 121]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 129]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 147]        DRAG_GS_DES1

lPF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_pg_grad.f, 52]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 80]         CALC_PG_GRAD
    Set   [calc_pg_grad.f, 84]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 84]         CALC_PG_GRAD
    Set   [calc_pg_grad.f, 87]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 91]         CALC_PG_GRAD

lpip_all    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 36]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 182]     MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 183]     MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 184]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 185]   MAKE_ARRAYS_DES

LPIP_DEL_COUNT_ALL    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 527]      CFNEWVALUES_MPPIC
    Set   [cfnewvalues.f, 738]         CFNEWVALUES_MPPIC
    Set   [cfnewvalues.f, 739]         CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 740]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 741]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 744]   CFNEWVALUES_MPPIC
    Use Argument   [cfnewvalues.f, 749]   CFNEWVALUES_MPPIC

LPIP_DEL_COUNT_ALL    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 226]      CFNEWVALUES_MPPIC_SNIDER
    Set   [cfnewvalues.f, 415]         CFNEWVALUES_MPPIC_SNIDER
    Set   [cfnewvalues.f, 416]         CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 417]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 418]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 421]   CFNEWVALUES_MPPIC_SNIDER
    Use Argument   [cfnewvalues.f, 426]   CFNEWVALUES_MPPIC_SNIDER

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 165]         CALC_D_N_GAS_AND_SOLIDS
    Set   [calc_d_n.f, 303]            CALC_D_N_GAS_AND_SOLIDS
    Use   [calc_d_n.f, 306]            CALC_D_N_GAS_AND_SOLIDS

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 547]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 606]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 608]            CALC_D_N_SOLIDS_ONLY

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 165]         CALC_D_T_GAS_AND_SOLIDS
    Set   [calc_d_t.f, 305]            CALC_D_T_GAS_AND_SOLIDS
    Use   [calc_d_t.f, 308]            CALC_D_T_GAS_AND_SOLIDS

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_t.f, 547]         CALC_D_T_SOLIDS_ONLY
    Set   [calc_d_t.f, 608]            CALC_D_T_SOLIDS_ONLY
    Use   [calc_d_t.f, 610]            CALC_D_T_SOLIDS_ONLY

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 169]         CALC_D_E_GAS_AND_SOLIDS
    Set   [calc_d_e.f, 310]            CALC_D_E_GAS_AND_SOLIDS
    Use   [calc_d_e.f, 313]            CALC_D_E_GAS_AND_SOLIDS

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 559]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 620]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 623]            CALC_D_E_SOLIDS_ONLY

lPOS    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 654]        getChemEq
    Set   [parse_rxn.f, 682]           getChemEq
    Use   [parse_rxn.f, 684]           getChemEq
    Use   [parse_rxn.f, 684]           getChemEq
    Set   [parse_rxn.f, 687]           getChemEq
    Use   [parse_rxn.f, 689]           getChemEq
    Use   [parse_rxn.f, 689]           getChemEq
    Use   [parse_rxn.f, 715]           getChemEq
    Use   [parse_rxn.f, 730]           getChemEq
    Use   [parse_rxn.f, 730]           getChemEq
    Use   [parse_rxn.f, 732]           getChemEq
    Use   [parse_rxn.f, 746]           getChemEq

lPOS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [particles_in_cell.f, 252]   INIT_PARTICLES_IN_CELL

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [particles_in_cell.f, 322]   PIC_SEARCH
    Declare   [particles_in_cell.f, 331]   PIC_SEARCH
    Use   [particles_in_cell.f, 340]   PIC_SEARCH
    Use   [particles_in_cell.f, 340]   PIC_SEARCH

lPOS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_cell_movement.f, 214]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 251]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 253]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 253]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 260]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 271]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 280]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 282]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 282]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 289]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 301]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 310]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 312]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 312]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 319]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 330]   CHECK_CELL_MOVEMENT_PIC

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [mass_inflow_dem.f, 122]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 148]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 201]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 202]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 203]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 211]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 212]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 213]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 221]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 222]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 223]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 232]     SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 234]   SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 235]   SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 236]   SEED_NEW_PARTICLE

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [mass_inflow_dem.f, 254]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 286]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 303]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 304]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 311]     SET_NEW_PARTICLE_PROPS

lproc    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 258]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 334]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 335]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 335]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 335]      WRITE_DES_TECPLOT

lproc_parcount    (Local Variable)  Declared as: INTEGER
    Define   [generate_particle_config.f, 500]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 526]   GENERATE_PARTICLE_CONFIG_DEM

lPS_SIZE    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 248]           DEBUG_PS
    Declare   [set_ps.f, 277]          DEBUG_PS
    Use   [set_ps.f, 288]              DEBUG_PS
    Use   [set_ps.f, 291]              DEBUG_PS
    Use   [set_ps.f, 292]              DEBUG_PS

lPSV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 248]           DEBUG_PS
    Declare   [set_ps.f, 275]          DEBUG_PS
    Use   [set_ps.f, 287]              DEBUG_PS
    Use   [set_ps.f, 296]              DEBUG_PS
    Use   [set_ps.f, 296]              DEBUG_PS
    Use   [set_ps.f, 297]              DEBUG_PS
    Use   [set_ps.f, 297]              DEBUG_PS
    Use   [set_ps.f, 298]              DEBUG_PS
    Use   [set_ps.f, 298]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 324]              DEBUG_PS
    Use   [set_ps.f, 324]              DEBUG_PS
    Use   [set_ps.f, 324]              DEBUG_PS
    Use   [set_ps.f, 324]              DEBUG_PS
    Use   [set_ps.f, 326]              DEBUG_PS
    Use   [set_ps.f, 329]              DEBUG_PS
    Use   [set_ps.f, 331]              DEBUG_PS
    Use   [set_ps.f, 332]              DEBUG_PS
    Use   [set_ps.f, 334]              DEBUG_PS
    Use   [set_ps.f, 335]              DEBUG_PS
    Use   [set_ps.f, 336]              DEBUG_PS
    Use   [set_ps.f, 338]              DEBUG_PS
    Use   [set_ps.f, 343]              DEBUG_PS
    Use   [set_ps.f, 352]              DEBUG_PS
    Use   [set_ps.f, 354]              DEBUG_PS
    Use   [set_ps.f, 355]              DEBUG_PS
    Use   [set_ps.f, 357]              DEBUG_PS
    Use   [set_ps.f, 358]              DEBUG_PS
    Use   [set_ps.f, 359]              DEBUG_PS
    Use   [set_ps.f, 361]              DEBUG_PS
    Use   [set_ps.f, 366]              DEBUG_PS
    Use   [set_ps.f, 378]              DEBUG_PS
    Use   [set_ps.f, 378]              DEBUG_PS
    Use   [set_ps.f, 379]              DEBUG_PS
    Use   [set_ps.f, 379]              DEBUG_PS
    Use   [set_ps.f, 380]              DEBUG_PS
    Use   [set_ps.f, 380]              DEBUG_PS

lQ    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 458]        getDH
    Set   [parse_rxn.f, 471]           getDH
    Use   [parse_rxn.f, 473]           getDH
    Use   [parse_rxn.f, 480]           getDH

lQ    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 534]        getFracDH
    Set   [parse_rxn.f, 552]           getFracDH
    Use   [parse_rxn.f, 562]           getFracDH
    Use   [parse_rxn.f, 580]           getFracDH

lRAND    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [mass_inflow_dem.f, 122]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 144]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 186]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 193]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 194]     SEED_NEW_PARTICLE

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 80]       DES_RRATES0
    Set   [des_rrates0.f, 140]         DES_RRATES0
    Use   [des_rrates0.f, 144]         DES_RRATES0
    Use   [des_rrates0.f, 146]         DES_RRATES0
    Use   [des_rrates0.f, 149]         DES_RRATES0
    Use   [des_rrates0.f, 157]         DES_RRATES0
    Use   [des_rrates0.f, 159]         DES_RRATES0
    Use   [des_rrates0.f, 164]         DES_RRATES0
    Use   [des_rrates0.f, 165]         DES_RRATES0
    Use   [des_rrates0.f, 168]         DES_RRATES0
    Set   [des_rrates0.f, 186]         DES_RRATES0
    Use   [des_rrates0.f, 190]         DES_RRATES0
    Use   [des_rrates0.f, 193]         DES_RRATES0

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 96]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 175]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 179]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 182]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 185]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 192]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 195]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 200]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 202]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 208]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 212]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 222]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 244]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 247]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 250]   STIFF_CHEM_RRATES

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rrates0.f, 133]          RRATES0
    Set   [rrates0.f, 211]             RRATES0
    Use   [rrates0.f, 215]             RRATES0
    Use   [rrates0.f, 217]             RRATES0
    Use   [rrates0.f, 220]             RRATES0
    Use   [rrates0.f, 228]             RRATES0
    Use   [rrates0.f, 231]             RRATES0
    Use   [rrates0.f, 238]             RRATES0
    Use   [rrates0.f, 240]             RRATES0
    Use   [rrates0.f, 245]             RRATES0
    Use   [rrates0.f, 249]             RRATES0
    Use   [rrates0.f, 261]             RRATES0
    Set   [rrates0.f, 302]             RRATES0
    Use   [rrates0.f, 305]             RRATES0
    Use   [rrates0.f, 308]             RRATES0

lRECOVERED    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 218]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 231]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 255]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 255]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 284]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 284]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 314]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 314]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 354]   CHECK_CELL_MOVEMENT_PIC

LREM_ALL    (Local Variable)  Declared as: INTEGER
    Define   [generate_particle_config.f, 41]   GENERATE_PARTICLE_CONFIG
    Set   [generate_particle_config.f, 100]   GENERATE_PARTICLE_CONFIG
    Set   [generate_particle_config.f, 107]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 107]   GENERATE_PARTICLE_CONFIG
    Use Argument   [generate_particle_config.f, 117]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 120]   GENERATE_PARTICLE_CONFIG
    Use Argument   [generate_particle_config.f, 124]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 127]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 136]   GENERATE_PARTICLE_CONFIG
    Use   [generate_particle_config.f, 138]   GENERATE_PARTICLE_CONFIG

lRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 99]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 144]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 230]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 230]   STIFF_CHEM_RRATES
    Use Argument   [stiff_chem_rrates.f, 303]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 327]   STIFF_CHEM_RRATES

lRgc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 88]       DES_RRATES0
    Set   [des_rrates0.f, 109]         DES_RRATES0
    Set   [des_rrates0.f, 146]         DES_RRATES0
    Use   [des_rrates0.f, 146]         DES_RRATES0
    Use   [des_rrates0.f, 231]         DES_RRATES0
    Use   [des_rrates0.f, 245]         DES_RRATES0

lRgp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 87]       DES_RRATES0
    Set   [des_rrates0.f, 108]         DES_RRATES0
    Set   [des_rrates0.f, 157]         DES_RRATES0
    Use   [des_rrates0.f, 157]         DES_RRATES0
    Use   [des_rrates0.f, 231]         DES_RRATES0
    Use   [des_rrates0.f, 244]         DES_RRATES0

LRN    (Local Variable)  Declared as: INTEGER
    Define   [check_odepack_stiff_chem.f, 158]   ODEPACK_INIT
    Set   [check_odepack_stiff_chem.f, 190]   ODEPACK_INIT
    Use Argument   [check_odepack_stiff_chem.f, 192]   ODEPACK_INIT

lRPhase    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 93]       DES_RRATES0
    Set   [des_rrates0.f, 223]         DES_RRATES0
    Use   [des_rrates0.f, 223]         DES_RRATES0
    Use   [des_rrates0.f, 246]         DES_RRATES0

lRs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 109]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 145]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 231]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 231]   STIFF_CHEM_RRATES
    Use Argument   [stiff_chem_rrates.f, 308]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 350]   STIFF_CHEM_RRATES

LRS    (Local Variable)  Declared as: INTEGER
    Define   [check_odepack_stiff_chem.f, 158]   ODEPACK_INIT
    Set   [check_odepack_stiff_chem.f, 191]   ODEPACK_INIT
    Use Argument   [check_odepack_stiff_chem.f, 192]   ODEPACK_INIT

LS    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 21]   MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 40]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 41]      MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 64]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 84]      MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 86]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 92]      MASS_INFLOW_DEM
    Use Argument   [mass_inflow_dem.f, 95]   MASS_INFLOW_DEM

lS1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 996]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1031]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1035]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1067]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1070]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1070]            IJK_Pg_SEARCH

lS2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 995]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1030]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1034]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1068]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1073]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1073]            IJK_Pg_SEARCH

lsin_phi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_solids_continuum.f, 30]   CHECK_SOLIDS_CONTINUUM
    Set   [check_solids_continuum.f, 168]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 169]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 169]   CHECK_SOLIDS_CONTINUUM

lsP    (Local Variable)  Declared as: INTEGER
    Define   [parse_rxn.f, 654]        getChemEq
    Set   [parse_rxn.f, 678]           getChemEq
    Use   [parse_rxn.f, 680]           getChemEq
    Use   [parse_rxn.f, 685]           getChemEq
    Use   [parse_rxn.f, 687]           getChemEq

LSTART    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 486]       PARSE_ARITH
    Set   [parse_line.f, 517]          PARSE_ARITH
    Use   [parse_line.f, 519]          PARSE_ARITH
    Use   [parse_line.f, 521]          PARSE_ARITH
    Use   [parse_line.f, 521]          PARSE_ARITH
    Use   [parse_line.f, 522]          PARSE_ARITH
    Use   [parse_line.f, 523]          PARSE_ARITH
    Use   [parse_line.f, 532]          PARSE_ARITH
    Use   [parse_line.f, 535]          PARSE_ARITH
    Use   [parse_line.f, 556]          PARSE_ARITH
    Use   [parse_line.f, 558]          PARSE_ARITH
    Use   [parse_line.f, 576]          PARSE_ARITH

LSTART    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 56]        PARSE_LINE
    Set   [parse_line.f, 70]           PARSE_LINE
    Use   [parse_line.f, 73]           PARSE_LINE
    Use   [parse_line.f, 77]           PARSE_LINE
    Use   [parse_line.f, 77]           PARSE_LINE
    Use   [parse_line.f, 78]           PARSE_LINE
    Use   [parse_line.f, 79]           PARSE_LINE
    Use   [parse_line.f, 84]           PARSE_LINE
    Use   [parse_line.f, 84]           PARSE_LINE
    Use   [parse_line.f, 102]          PARSE_LINE
    Use   [parse_line.f, 102]          PARSE_LINE
    Use   [parse_line.f, 109]          PARSE_LINE
    Use   [parse_line.f, 109]          PARSE_LINE
    Set   [parse_line.f, 132]          PARSE_LINE
    Use   [parse_line.f, 133]          PARSE_LINE

LSTART    (Dummy Argument)  Declared as: INTEGER
    Define   [write_table.f, 23]       WRITE_TABLE
    Declare   [write_table.f, 45]      WRITE_TABLE
    Use   [write_table.f, 51]          WRITE_TABLE
    Use   [write_table.f, 91]          WRITE_TABLE
    Use   [write_table.f, 96]          WRITE_TABLE
    Use   [write_table.f, 98]          WRITE_TABLE
    Use   [write_table.f, 106]         WRITE_TABLE

LSTART    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [remove_comment.f, 13]    REMOVE_COMMENT
    Declare   [remove_comment.f, 22]   REMOVE_COMMENT
    Use   [remove_comment.f, 31]       REMOVE_COMMENT

lSTART    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 322]   PIC_SEARCH
    Declare   [particles_in_cell.f, 337]   PIC_SEARCH
    Use   [particles_in_cell.f, 339]   PIC_SEARCH

LSTART    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2506]   WRITE_INT_TABLE
    Declare   [set_increments.f, 2532]   WRITE_INT_TABLE
    Use   [set_increments.f, 2565]     WRITE_INT_TABLE
    Use   [set_increments.f, 2567]     WRITE_INT_TABLE
    Use   [set_increments.f, 2573]     WRITE_INT_TABLE

LSUB    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 495]       PARSE_ARITH
    Set   [parse_line.f, 531]          PARSE_ARITH
    Use   [parse_line.f, 534]          PARSE_ARITH
    Use   [parse_line.f, 538]          PARSE_ARITH
    Use   [parse_line.f, 541]          PARSE_ARITH
    Set   [parse_line.f, 548]          PARSE_ARITH
    Use   [parse_line.f, 552]          PARSE_ARITH
    Use   [parse_line.f, 552]          PARSE_ARITH
    Set   [parse_line.f, 553]          PARSE_ARITH
    Use   [parse_line.f, 553]          PARSE_ARITH
    Set   [parse_line.f, 577]          PARSE_ARITH
    Use   [parse_line.f, 578]          PARSE_ARITH
    Use   [parse_line.f, 578]          PARSE_ARITH
    Use   [parse_line.f, 584]          PARSE_ARITH

lSubGridWall    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1132]         SUBGRID_DRAG_WALL
    Declare   [drag_gs.f, 1147]        SUBGRID_DRAG_WALL
    Set   [drag_gs.f, 1164]            SUBGRID_DRAG_WALL
    Set   [drag_gs.f, 1171]            SUBGRID_DRAG_WALL

lSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_30.f, 75]     CHECK_DATA_30
    Set   [check_data_30.f, 374]       CHECK_DATA_30
    Set   [check_data_30.f, 376]       CHECK_DATA_30
    Use   [check_data_30.f, 377]       CHECK_DATA_30
    Use   [check_data_30.f, 384]       CHECK_DATA_30
    Use   [check_data_30.f, 385]       CHECK_DATA_30
    Use   [check_data_30.f, 389]       CHECK_DATA_30
    Use   [check_data_30.f, 390]       CHECK_DATA_30
    Use   [check_data_30.f, 395]       CHECK_DATA_30
    Use   [check_data_30.f, 397]       CHECK_DATA_30
    Use   [check_data_30.f, 399]       CHECK_DATA_30
    Use   [check_data_30.f, 401]       CHECK_DATA_30
    Use   [check_data_30.f, 403]       CHECK_DATA_30
    Use   [check_data_30.f, 405]       CHECK_DATA_30
    Use   [check_data_30.f, 407]       CHECK_DATA_30
    Use   [check_data_30.f, 409]       CHECK_DATA_30
    Set   [check_data_30.f, 483]       CHECK_DATA_30
    Use   [check_data_30.f, 486]       CHECK_DATA_30
    Use   [check_data_30.f, 493]       CHECK_DATA_30
    Use   [check_data_30.f, 494]       CHECK_DATA_30
    Use   [check_data_30.f, 498]       CHECK_DATA_30
    Use   [check_data_30.f, 499]       CHECK_DATA_30
    Use   [check_data_30.f, 504]       CHECK_DATA_30
    Use   [check_data_30.f, 507]       CHECK_DATA_30
    Use   [check_data_30.f, 510]       CHECK_DATA_30
    Use   [check_data_30.f, 513]       CHECK_DATA_30
    Use   [check_data_30.f, 516]       CHECK_DATA_30
    Use   [check_data_30.f, 519]       CHECK_DATA_30
    Use   [check_data_30.f, 522]       CHECK_DATA_30
    Use   [check_data_30.f, 525]       CHECK_DATA_30
    Set   [check_data_30.f, 542]       CHECK_DATA_30
    Set   [check_data_30.f, 545]       CHECK_DATA_30
    Use   [check_data_30.f, 545]       CHECK_DATA_30
    Use Argument   [check_data_30.f, 548]   CHECK_DATA_30
    Use Argument   [check_data_30.f, 550]   CHECK_DATA_30
    Use   [check_data_30.f, 551]       CHECK_DATA_30
    Use Argument   [check_data_30.f, 561]   CHECK_DATA_30
    Set   [check_data_30.f, 575]       CHECK_DATA_30
    Set   [check_data_30.f, 577]       CHECK_DATA_30
    Set   [check_data_30.f, 582]       CHECK_DATA_30
    Use   [check_data_30.f, 582]       CHECK_DATA_30
    Set   [check_data_30.f, 585]       CHECK_DATA_30
    Use   [check_data_30.f, 585]       CHECK_DATA_30
    Use Argument   [check_data_30.f, 589]   CHECK_DATA_30
    Use Argument   [check_data_30.f, 591]   CHECK_DATA_30
    Use   [check_data_30.f, 592]       CHECK_DATA_30
    Use Argument   [check_data_30.f, 603]   CHECK_DATA_30

lSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_axis.f, 62]        CHECK_AXIS
    Set   [check_axis.f, 166]          CHECK_AXIS
    Set   [check_axis.f, 172]          CHECK_AXIS
    Use   [check_axis.f, 172]          CHECK_AXIS
    Use   [check_axis.f, 179]          CHECK_AXIS
    Use   [check_axis.f, 181]          CHECK_AXIS

LT    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 52]           WRITE_VTU_FILE
    Set   [vtk_out.f, 173]             WRITE_VTU_FILE
    Set   [vtk_out.f, 176]             WRITE_VTU_FILE
    Use   [vtk_out.f, 178]             WRITE_VTU_FILE
    Set   [vtk_out.f, 191]             WRITE_VTU_FILE
    Set   [vtk_out.f, 194]             WRITE_VTU_FILE
    Use   [vtk_out.f, 196]             WRITE_VTU_FILE

ltemp_array    (Local Variable)  Declared as: REAL ALLOCATABLE
    Define   [write_des_data.f, 259]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 328]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 342]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 346]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 350]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 353]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 355]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 361]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 361]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 365]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 365]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 369]      WRITE_DES_TECPLOT

lTime    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [stiff_chem_rrates.f, 12]   STIFF_CHEM_RRATES
    Declare   [stiff_chem_rrates.f, 77]   STIFF_CHEM_RRATES

lTIME    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [output_manager.f, 166]   CHECK_TIME
    Declare   [output_manager.f, 168]   CHECK_TIME
    Use   [output_manager.f, 171]      CHECK_TIME

ltotvar    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 258]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 266]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 328]      WRITE_DES_TECPLOT

lTp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_rrates0.f, 81]       DES_RRATES0
    Set   [des_rrates0.f, 105]         DES_RRATES0
    Use Argument   [des_rrates0.f, 159]   DES_RRATES0
    Use Argument   [des_rrates0.f, 193]   DES_RRATES0

lU    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 206]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 209]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 212]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 218]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 218]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 223]              CALC_PS_VEL_MAG

lu1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 971]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 987]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1067]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1071]   IJK_Pg_SEARCH

lu2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 971]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 986]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1016]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1068]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1074]   IJK_Pg_SEARCH

lUg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [usr_drag.f, 26]          DRAG_USR
    Declare   [usr_drag.f, 56]         DRAG_USR

lunit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [read_particle_input.f, 33]   READ_PAR_INPUT
    Set   [read_particle_input.f, 33]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 67]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 83]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 86]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 106]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 145]   READ_PAR_INPUT

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [set_ro_s.f, 132]         CHECK_SET_ROs
    Set   [set_ro_s.f, 132]            CHECK_SET_ROs
    Use IO   [set_ro_s.f, 165]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 167]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 174]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 181]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 183]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 188]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 189]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 190]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 196]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 199]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 204]         CHECK_SET_ROs

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 489]    ROgErr_LOG
    Set   [physical_prop.f, 489]       ROgErr_LOG
    Use IO   [physical_prop.f, 501]    ROgErr_LOG
    Use IO   [physical_prop.f, 504]    ROgErr_LOG
    Use IO   [physical_prop.f, 508]    ROgErr_LOG
    Use IO   [physical_prop.f, 513]    ROgErr_LOG
    Use IO   [physical_prop.f, 517]    ROgErr_LOG
    Use IO   [physical_prop.f, 518]    ROgErr_LOG
    Use IO   [physical_prop.f, 519]    ROgErr_LOG
    Use IO   [physical_prop.f, 520]    ROgErr_LOG
    Use IO   [physical_prop.f, 522]    ROgErr_LOG
    Use IO   [physical_prop.f, 523]    ROgErr_LOG
    Use IO   [physical_prop.f, 524]    ROgErr_LOG
    Use IO   [physical_prop.f, 528]    ROgErr_LOG

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 583]    ROsErr_LOG
    Set   [physical_prop.f, 583]       ROsErr_LOG
    Use IO   [physical_prop.f, 595]    ROsErr_LOG
    Use IO   [physical_prop.f, 598]    ROsErr_LOG
    Use IO   [physical_prop.f, 602]    ROsErr_LOG
    Use IO   [physical_prop.f, 607]    ROsErr_LOG
    Use IO   [physical_prop.f, 613]    ROsErr_LOG
    Use IO   [physical_prop.f, 614]    ROsErr_LOG
    Use IO   [physical_prop.f, 615]    ROsErr_LOG
    Use IO   [physical_prop.f, 616]    ROsErr_LOG
    Use IO   [physical_prop.f, 617]    ROsErr_LOG
    Use IO   [physical_prop.f, 620]    ROsErr_LOG
    Use IO   [physical_prop.f, 621]    ROsErr_LOG
    Use IO   [physical_prop.f, 622]    ROsErr_LOG
    Use IO   [physical_prop.f, 626]    ROsErr_LOG

lV    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 206]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 209]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 212]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 219]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 219]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 224]              CALC_PS_VEL_MAG

LV    (Local Variable)  Declared as: INTEGER
    Define   [check_output_control.f, 48]   CHECK_OUTPUT_CONTROL
    Set   [check_output_control.f, 164]   CHECK_OUTPUT_CONTROL
    Use   [check_output_control.f, 166]   CHECK_OUTPUT_CONTROL

lvel_s    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_bc0.f, 402]          SET_BC0_INFLOW
    Set   [set_bc0.f, 471]             SET_BC0_INFLOW
    Set   [set_bc0.f, 489]             SET_BC0_INFLOW
    Use   [set_bc0.f, 489]             SET_BC0_INFLOW
    Set   [set_bc0.f, 491]             SET_BC0_INFLOW
    Use   [set_bc0.f, 491]             SET_BC0_INFLOW
    Set   [set_bc0.f, 493]             SET_BC0_INFLOW
    Use   [set_bc0.f, 493]             SET_BC0_INFLOW
    Set   [set_bc0.f, 501]             SET_BC0_INFLOW
    Use   [set_bc0.f, 501]             SET_BC0_INFLOW
    Use   [set_bc0.f, 506]             SET_BC0_INFLOW
    Use   [set_bc0.f, 509]             SET_BC0_INFLOW
    Use   [set_bc0.f, 512]             SET_BC0_INFLOW

lvel_s    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_bc1.f, 268]          SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 420]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 428]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 428]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 431]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 431]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 434]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 434]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 440]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 440]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 442]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 448]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 450]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 453]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 455]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 458]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 460]             SET_BC1_ADJUST_OUTFLOW

lVELFP    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_ss_dem_noninterp.f, 315]   CALC_NONINTERP_VELFP_SOLIDS
    Declare   [drag_ss_dem_noninterp.f, 349]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 363]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 366]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 371]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 374]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 380]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 383]   CALC_NONINTERP_VELFP_SOLIDS
    Set   [drag_ss_dem_noninterp.f, 386]   CALC_NONINTERP_VELFP_SOLIDS

lVg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [usr_drag.f, 26]          DRAG_USR
    Declare   [usr_drag.f, 56]         DRAG_USR

lW    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 206]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 209]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 213]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 220]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 220]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 225]              CALC_PS_VEL_MAG

lWg    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [usr_drag.f, 26]          DRAG_USR
    Declare   [usr_drag.f, 56]         DRAG_USR

lWRITE_DT    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [output_manager.f, 180]   NEXT_TIME
    Declare   [output_manager.f, 182]   NEXT_TIME
    Use   [output_manager.f, 185]      NEXT_TIME
    Use   [output_manager.f, 185]      NEXT_TIME

LXE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 45]        CFWALLCONTACT
    Use   [cfwallcontact.f, 85]        CFWALLCONTACT

LXW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 46]        CFWALLCONTACT
    Use   [cfwallcontact.f, 78]        CFWALLCONTACT

LYN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 47]        CFWALLCONTACT
    Use   [cfwallcontact.f, 95]        CFWALLCONTACT

LYS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 48]        CFWALLCONTACT
    Use   [cfwallcontact.f, 90]        CFWALLCONTACT

LZB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 50]        CFWALLCONTACT
    Use   [cfwallcontact.f, 100]       CFWALLCONTACT

LZT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 49]        CFWALLCONTACT
    Use   [cfwallcontact.f, 105]       CFWALLCONTACT

Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ