Object Cross Reference


Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ

X    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cooling_rate.f, 142]     FUNC_JACOBI_EVAL
    Declare   [cooling_rate.f, 150]    FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 187]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 187]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 187]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 187]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 188]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 188]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 188]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 198]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 219]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 227]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 228]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 229]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 230]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 230]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 231]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 232]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 233]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 237]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 238]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 238]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 238]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 238]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 239]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 241]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 241]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 241]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 241]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 241]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 248]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 249]        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, 256]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 263]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 264]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 265]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 266]        FUNC_JACOBI_EVAL
    Use   [cooling_rate.f, 266]        FUNC_JACOBI_EVAL

X    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cooling_rate.f, 69]      MNEWT
    Declare   [cooling_rate.f, 86]     MNEWT
    Use Argument   [cooling_rate.f, 102]   MNEWT
    Set   [cooling_rate.f, 120]        MNEWT
    Use   [cooling_rate.f, 120]        MNEWT

x    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [source_population_eq.f, 2]   Source_population_eq
    Declare   [source_population_eq.f, 12]   Source_population_eq

X    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [BLAS.f, 2348]            DNRM2
    Declare   [BLAS.f, 2359]           DNRM2
    Use Argument   [BLAS.f, 2378]      DNRM2
    Use   [BLAS.f, 2387]               DNRM2
    Use Argument   [BLAS.f, 2388]      DNRM2

X    (Dummy Argument)  Declared as: COMPLEX
    Define   [BLAS.f, 2988]            SCNRM2
    Declare   [BLAS.f, 2999]           SCNRM2
    Use Argument   [BLAS.f, 3025]      SCNRM2
    Use Argument   [BLAS.f, 3026]      SCNRM2
    Use Argument   [BLAS.f, 3034]      SCNRM2
    Use Argument   [BLAS.f, 3035]      SCNRM2

X    (Dummy Argument)  Declared as: REAL
    Define   [BLAS.f, 3362]            SNRM2
    Declare   [BLAS.f, 3373]           SNRM2
    Use Argument   [BLAS.f, 3392]      SNRM2
    Use   [BLAS.f, 3401]               SNRM2
    Use Argument   [BLAS.f, 3402]      SNRM2

X    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [ghdmassflux.f, 838]      Ur_JACOBI_EVAL
    Declare   [ghdmassflux.f, 847]     Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 873]         Ur_JACOBI_EVAL
    Use Argument   [ghdmassflux.f, 886]   Ur_JACOBI_EVAL
    Use Argument   [ghdmassflux.f, 889]   Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 898]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 902]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 911]         Ur_JACOBI_EVAL
    Use   [ghdmassflux.f, 916]         Ur_JACOBI_EVAL

X    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [ghdmassflux.f, 771]      UrNEWT
    Declare   [ghdmassflux.f, 784]     UrNEWT
    Use Argument   [ghdmassflux.f, 801]   UrNEWT
    Set   [ghdmassflux.f, 822]         UrNEWT
    Use   [ghdmassflux.f, 822]         UrNEWT

x    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [update_dashboard.f, 188]   WRITE_SIMPLE_PROGRESS_BAR
    Declare   [update_dashboard.f, 207]   WRITE_SIMPLE_PROGRESS_BAR
    Use   [update_dashboard.f, 220]    WRITE_SIMPLE_PROGRESS_BAR

x    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [rkqs.f, 1]               rkqs
    Declare   [rkqs.f, 10]             rkqs
    Use Argument   [rkqs.f, 27]        rkqs
    Use   [rkqs.f, 36]                 rkqs
    Use   [rkqs.f, 37]                 rkqs
    Set   [rkqs.f, 43]                 rkqs
    Use   [rkqs.f, 43]                 rkqs

x    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [rkck.f, 1]               rkck
    Declare   [rkck.f, 5]              rkck
    Use   [rkck.f, 23]                 rkck
    Use   [rkck.f, 27]                 rkck
    Use   [rkck.f, 31]                 rkck
    Use   [rkck.f, 35]                 rkck
    Use   [rkck.f, 40]                 rkck

x    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [odeint.f, 10]            odeint
    Set   [odeint.f, 12]               odeint
    Use   [odeint.f, 32]               odeint
    Use Argument   [odeint.f, 34]      odeint
    Use   [odeint.f, 40]               odeint
    Use   [odeint.f, 43]               odeint
    Use   [odeint.f, 47]               odeint
    Use   [odeint.f, 51]               odeint
    Use   [odeint.f, 51]               odeint
    Use   [odeint.f, 51]               odeint
    Use Argument   [odeint.f, 52]      odeint
    Use   [odeint.f, 58]               odeint
    Use   [odeint.f, 64]               odeint

x    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [utilities.f, 8]          isNan
    Declare   [utilities.f, 13]        isNan
    Use   [utilities.f, 21]            isNan

X0    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 18]          GET_DEL_H
    Declare   [get_delh.f, 36]         GET_DEL_H
    Use   [get_delh.f, 146]            GET_DEL_H

X0    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 176]         GET_DEL_H_DES
    Declare   [get_delh.f, 194]        GET_DEL_H_DES
    Use   [get_delh.f, 306]            GET_DEL_H_DES

X0    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 611]         GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 761]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 777]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 800]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 823]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 838]            GET_DISTANCE_TO_WALL

x1    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 1493]   BUILD_CONE_FOR_C2C
    Set   [check_data_cartesian.f, 1533]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1535]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1543]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1551]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1554]   BUILD_CONE_FOR_C2C
    Set   [check_data_cartesian.f, 1588]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1590]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1598]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1606]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1609]   BUILD_CONE_FOR_C2C

X1    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_flags.f, 59]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 457]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 470]   SET_3D_CUT_CELL_FLAGS

x1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 85]   GET_F_QUADRIC
    Declare   [define_quadrics.f, 100]   GET_F_QUADRIC
    Use   [define_quadrics.f, 120]     GET_F_QUADRIC
    Use   [define_quadrics.f, 120]     GET_F_QUADRIC
    Use   [define_quadrics.f, 131]     GET_F_QUADRIC
    Use   [define_quadrics.f, 131]     GET_F_QUADRIC
    Use   [define_quadrics.f, 140]     GET_F_QUADRIC
    Use   [define_quadrics.f, 144]     GET_F_QUADRIC
    Use   [define_quadrics.f, 156]     GET_F_QUADRIC
    Use   [define_quadrics.f, 183]     GET_F_QUADRIC
    Use   [define_quadrics.f, 223]     GET_F_QUADRIC
    Use   [define_quadrics.f, 289]     GET_F_QUADRIC
    Use   [define_quadrics.f, 345]     GET_F_QUADRIC
    Use   [define_quadrics.f, 357]     GET_F_QUADRIC
    Use   [define_quadrics.f, 371]     GET_F_QUADRIC
    Use   [define_quadrics.f, 392]     GET_F_QUADRIC
    Use   [define_quadrics.f, 429]     GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 515]   GET_F_QUADRIC
    Use   [define_quadrics.f, 540]     GET_F_QUADRIC
    Use   [define_quadrics.f, 545]     GET_F_QUADRIC
    Use   [define_quadrics.f, 572]     GET_F_QUADRIC
    Use   [define_quadrics.f, 577]     GET_F_QUADRIC

x1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 628]   REASSSIGN_QUADRIC
    Declare   [define_quadrics.f, 635]   REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 651]     REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 651]     REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 662]     REASSSIGN_QUADRIC

x1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [eval_usr_fct.f, 19]      EVAL_USR_FCT
    Declare   [eval_usr_fct.f, 44]     EVAL_USR_FCT

x1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 131]    EVAL_POLY_FCT
    Declare   [get_poly_data.f, 149]   EVAL_POLY_FCT
    Use   [get_poly_data.f, 198]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 198]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 215]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 216]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 227]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 227]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 247]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 249]       EVAL_POLY_FCT

x1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [odeint.f, 2]             odeint
    Declare   [odeint.f, 7]            odeint
    Use   [odeint.f, 12]               odeint
    Use   [odeint.f, 13]               odeint
    Use   [odeint.f, 51]               odeint
    Use   [odeint.f, 58]               odeint

X1    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1484]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1553]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1564]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1567]   CAD_INTERSECT

x1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 246]   EVAL_F
    Declare   [cut_cell_preprocessing.f, 259]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 282]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 289]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 291]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 314]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 318]   EVAL_F

x1    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 373]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 382]   INTERSECT_LINE
    Use Argument   [cut_cell_preprocessing.f, 392]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 421]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 421]   INTERSECT_LINE

X1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [calc_vort_out.f, 344]    BAIRSTOW
    Declare   [calc_vort_out.f, 355]   BAIRSTOW
    Set   [calc_vort_out.f, 417]       BAIRSTOW
    Set   [calc_vort_out.f, 434]       BAIRSTOW
    Set   [calc_vort_out.f, 439]       BAIRSTOW
    Use   [calc_vort_out.f, 466]       BAIRSTOW
    Use   [calc_vort_out.f, 467]       BAIRSTOW
    Set   [calc_vort_out.f, 468]       BAIRSTOW
    Use   [calc_vort_out.f, 478]       BAIRSTOW
    Use   [calc_vort_out.f, 479]       BAIRSTOW
    Set   [calc_vort_out.f, 480]       BAIRSTOW

x12    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_stl_data.f, 682]     GET_STL_DATA
    Set   [get_stl_data.f, 865]        GET_STL_DATA
    Use   [get_stl_data.f, 874]        GET_STL_DATA
    Use   [get_stl_data.f, 875]        GET_STL_DATA

x13    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_stl_data.f, 682]     GET_STL_DATA
    Set   [get_stl_data.f, 869]        GET_STL_DATA
    Use   [get_stl_data.f, 874]        GET_STL_DATA
    Use   [get_stl_data.f, 876]        GET_STL_DATA

x2    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 1493]   BUILD_CONE_FOR_C2C
    Set   [check_data_cartesian.f, 1534]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1535]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1543]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1552]   BUILD_CONE_FOR_C2C
    Set   [check_data_cartesian.f, 1589]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1590]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1598]   BUILD_CONE_FOR_C2C
    Use   [check_data_cartesian.f, 1607]   BUILD_CONE_FOR_C2C

X2    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_flags.f, 59]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 465]   SET_3D_CUT_CELL_FLAGS
    Use   [get_cut_cell_flags.f, 470]   SET_3D_CUT_CELL_FLAGS

x2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 85]   GET_F_QUADRIC
    Declare   [define_quadrics.f, 100]   GET_F_QUADRIC
    Use   [define_quadrics.f, 121]     GET_F_QUADRIC
    Use   [define_quadrics.f, 121]     GET_F_QUADRIC
    Use   [define_quadrics.f, 132]     GET_F_QUADRIC
    Use   [define_quadrics.f, 132]     GET_F_QUADRIC
    Use   [define_quadrics.f, 140]     GET_F_QUADRIC
    Use   [define_quadrics.f, 145]     GET_F_QUADRIC
    Use   [define_quadrics.f, 157]     GET_F_QUADRIC
    Use   [define_quadrics.f, 198]     GET_F_QUADRIC
    Use   [define_quadrics.f, 199]     GET_F_QUADRIC
    Use   [define_quadrics.f, 200]     GET_F_QUADRIC
    Use   [define_quadrics.f, 201]     GET_F_QUADRIC
    Use   [define_quadrics.f, 224]     GET_F_QUADRIC
    Use   [define_quadrics.f, 290]     GET_F_QUADRIC
    Use   [define_quadrics.f, 346]     GET_F_QUADRIC
    Use   [define_quadrics.f, 358]     GET_F_QUADRIC
    Use   [define_quadrics.f, 372]     GET_F_QUADRIC
    Use   [define_quadrics.f, 393]     GET_F_QUADRIC
    Use   [define_quadrics.f, 430]     GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 515]   GET_F_QUADRIC
    Use   [define_quadrics.f, 550]     GET_F_QUADRIC
    Use   [define_quadrics.f, 555]     GET_F_QUADRIC
    Use   [define_quadrics.f, 582]     GET_F_QUADRIC
    Use   [define_quadrics.f, 587]     GET_F_QUADRIC

x2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 628]   REASSSIGN_QUADRIC
    Declare   [define_quadrics.f, 635]   REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 652]     REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 652]     REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 662]     REASSSIGN_QUADRIC

x2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [eval_usr_fct.f, 19]      EVAL_USR_FCT
    Declare   [eval_usr_fct.f, 44]     EVAL_USR_FCT

x2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 131]    EVAL_POLY_FCT
    Declare   [get_poly_data.f, 149]   EVAL_POLY_FCT
    Use   [get_poly_data.f, 199]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 199]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 215]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 216]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 224]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 236]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 236]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 239]       EVAL_POLY_FCT

x2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [odeint.f, 2]             odeint
    Declare   [odeint.f, 7]            odeint
    Use   [odeint.f, 13]               odeint
    Use   [odeint.f, 51]               odeint
    Use   [odeint.f, 51]               odeint
    Use   [odeint.f, 58]               odeint
    Use   [odeint.f, 58]               odeint

X2    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1484]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1554]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1564]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1575]   CAD_INTERSECT

x2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 246]   EVAL_F
    Declare   [cut_cell_preprocessing.f, 259]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 282]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 289]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 291]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 314]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 318]   EVAL_F

x2    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 373]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 387]   INTERSECT_LINE
    Use Argument   [cut_cell_preprocessing.f, 393]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 421]   INTERSECT_LINE

X2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [calc_vort_out.f, 344]    BAIRSTOW
    Declare   [calc_vort_out.f, 355]   BAIRSTOW
    Set   [calc_vort_out.f, 418]       BAIRSTOW
    Set   [calc_vort_out.f, 435]       BAIRSTOW
    Set   [calc_vort_out.f, 440]       BAIRSTOW
    Use   [calc_vort_out.f, 466]       BAIRSTOW
    Use   [calc_vort_out.f, 468]       BAIRSTOW
    Set   [calc_vort_out.f, 469]       BAIRSTOW
    Use   [calc_vort_out.f, 472]       BAIRSTOW
    Use   [calc_vort_out.f, 473]       BAIRSTOW
    Set   [calc_vort_out.f, 474]       BAIRSTOW
    Use   [calc_vort_out.f, 478]       BAIRSTOW
    Use   [calc_vort_out.f, 480]       BAIRSTOW
    Set   [calc_vort_out.f, 481]       BAIRSTOW

x3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 85]   GET_F_QUADRIC
    Declare   [define_quadrics.f, 100]   GET_F_QUADRIC
    Use   [define_quadrics.f, 122]     GET_F_QUADRIC
    Use   [define_quadrics.f, 122]     GET_F_QUADRIC
    Use   [define_quadrics.f, 133]     GET_F_QUADRIC
    Use   [define_quadrics.f, 133]     GET_F_QUADRIC
    Use   [define_quadrics.f, 140]     GET_F_QUADRIC
    Use   [define_quadrics.f, 146]     GET_F_QUADRIC
    Use   [define_quadrics.f, 158]     GET_F_QUADRIC
    Use   [define_quadrics.f, 184]     GET_F_QUADRIC
    Use   [define_quadrics.f, 225]     GET_F_QUADRIC
    Use   [define_quadrics.f, 291]     GET_F_QUADRIC
    Use   [define_quadrics.f, 347]     GET_F_QUADRIC
    Use   [define_quadrics.f, 359]     GET_F_QUADRIC
    Use   [define_quadrics.f, 373]     GET_F_QUADRIC
    Use   [define_quadrics.f, 394]     GET_F_QUADRIC
    Use   [define_quadrics.f, 431]     GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 515]   GET_F_QUADRIC
    Use   [define_quadrics.f, 560]     GET_F_QUADRIC
    Use   [define_quadrics.f, 565]     GET_F_QUADRIC
    Use   [define_quadrics.f, 592]     GET_F_QUADRIC
    Use   [define_quadrics.f, 597]     GET_F_QUADRIC

x3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 628]   REASSSIGN_QUADRIC
    Declare   [define_quadrics.f, 635]   REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 653]     REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 653]     REASSSIGN_QUADRIC
    Use   [define_quadrics.f, 662]     REASSSIGN_QUADRIC

x3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [eval_usr_fct.f, 19]      EVAL_USR_FCT
    Declare   [eval_usr_fct.f, 44]     EVAL_USR_FCT

x3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 131]    EVAL_POLY_FCT
    Declare   [get_poly_data.f, 149]   EVAL_POLY_FCT

x3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 246]   EVAL_F
    Declare   [cut_cell_preprocessing.f, 259]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 282]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 289]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 291]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 314]   EVAL_F
    Use Argument   [cut_cell_preprocessing.f, 318]   EVAL_F

x3    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 373]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 421]   INTERSECT_LINE
    Use Argument   [cut_cell_preprocessing.f, 425]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 437]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 450]   INTERSECT_LINE

X3    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [calc_vort_out.f, 344]    BAIRSTOW
    Declare   [calc_vort_out.f, 355]   BAIRSTOW
    Set   [calc_vort_out.f, 419]       BAIRSTOW
    Set   [calc_vort_out.f, 457]       BAIRSTOW
    Set   [calc_vort_out.f, 459]       BAIRSTOW
    Use   [calc_vort_out.f, 472]       BAIRSTOW
    Use   [calc_vort_out.f, 474]       BAIRSTOW
    Set   [calc_vort_out.f, 475]       BAIRSTOW

X_21    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_mu_s.f, 846]        gt_pde_simonin
    Set   [calc_mu_s.f, 906]           gt_pde_simonin
    Use   [calc_mu_s.f, 912]           gt_pde_simonin
    Use   [calc_mu_s.f, 913]           gt_pde_simonin

X_ACT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [test_lin_eq.f, 51]       TEST_LIN_EQ
    Set   [test_lin_eq.f, 71]          TEST_LIN_EQ
    Use   [test_lin_eq.f, 108]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 109]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 110]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 111]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 112]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 116]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 117]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 133]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 134]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 134]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 144]         TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 145]   TEST_LIN_EQ
    Use   [test_lin_eq.f, 167]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 170]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 170]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 171]         TEST_LIN_EQ

X_CONSTANT    (Local Variable)  Declared as: LOGICAL
    Define   [set_icbc_flags.f, 395]   SET_BC_FLAGS_FLOW
    Set   [set_icbc_flags.f, 413]      SET_BC_FLAGS_FLOW
    Use   [set_icbc_flags.f, 417]      SET_BC_FLAGS_FLOW

X_CONSTANT    (Local Variable)  Declared as: LOGICAL
    Define   [get_ps.f, 37]            GET_PS
    Set   [get_ps.f, 42]               GET_PS
    Set   [get_ps.f, 50]               GET_PS
    Set   [get_ps.f, 65]               GET_PS

X_CONSTANT    (Local Variable)  Declared as: LOGICAL
    Define   [check_bc_geometry.f, 424]   CHECK_BC_GEOMETRY_FLOW
    Set   [check_bc_geometry.f, 429]   CHECK_BC_GEOMETRY_FLOW
    Set   [check_bc_geometry.f, 437]   CHECK_BC_GEOMETRY_FLOW
    Set   [check_bc_geometry.f, 451]   CHECK_BC_GEOMETRY_FLOW
    Use Argument   [check_bc_geometry.f, 517]   CHECK_BC_GEOMETRY_FLOW

X_CONSTANT    (Dummy Argument)  Declared as: LOGICAL INTENT(IN)
    Define   [check_plane.f, 20]       CHECK_PLANE
    Declare   [check_plane.f, 33]      CHECK_PLANE
    Use   [check_plane.f, 48]          CHECK_PLANE

X_CONSTANT    (Local Variable)  Declared as: LOGICAL
    Define   [get_is.f, 37]            GET_IS
    Set   [get_is.f, 42]               GET_IS
    Set   [get_is.f, 50]               GET_IS
    Set   [get_is.f, 65]               GET_IS
    Use   [get_is.f, 132]              GET_IS
    Use Argument   [get_is.f, 134]     GET_IS

X_COPY    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3365]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3526]   ADJUST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 3531]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3616]   ADJUST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 3621]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3688]   ADJUST_IJK_SIZE
    Use Argument   [check_data_cartesian.f, 3693]   ADJUST_IJK_SIZE

X_COPY    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 1499]         WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1537]            WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1546]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1552]            WRITE_CUT_SURFACE_VTK
    Use Argument   [vtk_out.f, 1564]   WRITE_CUT_SURFACE_VTK
    Use Argument   [vtk_out.f, 1566]   WRITE_CUT_SURFACE_VTK
    Use Argument   [vtk_out.f, 1568]   WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1579]            WRITE_CUT_SURFACE_VTK

X_COPY    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 49]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 118]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 128]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 134]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 142]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 157]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 166]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 168]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 170]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 180]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 185]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 187]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 194]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 201]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 207]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 209]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 218]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 228]   GET_CUT_CELL_VOLUME_AND_AREAS

X_COPY    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 514]         TEST_DEL_H
    Set   [get_delh.f, 544]            TEST_DEL_H
    Use Argument   [get_delh.f, 552]   TEST_DEL_H
    Use   [get_delh.f, 560]            TEST_DEL_H

X_COUNT    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 260]     CALC_PG_GRAD_CG
    Set   [calc_pg_grad.f, 278]        CALC_PG_GRAD_CG
    Set   [calc_pg_grad.f, 290]        CALC_PG_GRAD_CG
    Use   [calc_pg_grad.f, 290]        CALC_PG_GRAD_CG
    Set   [calc_pg_grad.f, 295]        CALC_PG_GRAD_CG
    Use   [calc_pg_grad.f, 295]        CALC_PG_GRAD_CG
    Set   [calc_pg_grad.f, 299]        CALC_PG_GRAD_CG
    Use Argument   [calc_pg_grad.f, 299]   CALC_PG_GRAD_CG
    Use Argument   [calc_pg_grad.f, 302]   CALC_PG_GRAD_CG

x_d    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_mu_s.f, 2361]       subgrid_stress_wall
    Set   [calc_mu_s.f, 2369]          subgrid_stress_wall
    Use   [calc_mu_s.f, 2371]          subgrid_stress_wall
    Use   [calc_mu_s.f, 2373]          subgrid_stress_wall

x_d    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs.f, 1161]         SUBGRID_DRAG_WALL
    Set   [drag_gs.f, 1167]            SUBGRID_DRAG_WALL
    Use   [drag_gs.f, 1171]            SUBGRID_DRAG_WALL

x_dimid    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 722]       write_mesh_netcdf
    Use Argument   [write_spx1.f, 778]   write_mesh_netcdf
    Use   [write_spx1.f, 784]          write_mesh_netcdf
    Use Argument   [write_spx1.f, 790]   write_mesh_netcdf

x_dimid    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 857]       write_netcdf
    Use Argument   [write_spx1.f, 986]   write_netcdf
    Use Argument   [write_spx1.f, 993]   write_netcdf
    Use   [write_spx1.f, 999]          write_netcdf

x_east    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 159]    EVAL_POLY_FCT
    Set   [get_poly_data.f, 226]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 227]       EVAL_POLY_FCT

X_FACE_POINT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 1495]         WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1603]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1629]            WRITE_CUT_SURFACE_VTK

X_g    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [calc_mw.f, 23]           CALC_MW
    Declare   [calc_mw.f, 46]          CALC_MW
    Use   [calc_mw.f, 66]              CALC_MW

X_IJ    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_p_star.f, 175]      CALC_ep_star
    Set   [calc_p_star.f, 261]         CALC_ep_star
    Set   [calc_p_star.f, 264]         CALC_ep_star
    Use   [calc_p_star.f, 287]         CALC_ep_star
    Use   [calc_p_star.f, 298]         CALC_ep_star

X_intersect    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_connectivity.f, 16]   GET_CONNECTIVITY
    Declare   [get_connectivity.f, 45]   GET_CONNECTIVITY
    Use   [get_connectivity.f, 133]    GET_CONNECTIVITY
    Use   [get_connectivity.f, 157]    GET_CONNECTIVITY
    Use   [get_connectivity.f, 184]    GET_CONNECTIVITY
    Use   [get_connectivity.f, 208]    GET_CONNECTIVITY

x_intersection    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 376]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 458]   INTERSECT_LINE

x_max    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [update_dashboard.f, 188]   WRITE_SIMPLE_PROGRESS_BAR
    Declare   [update_dashboard.f, 207]   WRITE_SIMPLE_PROGRESS_BAR
    Use   [update_dashboard.f, 210]    WRITE_SIMPLE_PROGRESS_BAR
    Use   [update_dashboard.f, 220]    WRITE_SIMPLE_PROGRESS_BAR

X_MEAN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 50]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 102]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 157]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 157]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 237]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 237]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 396]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 398]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 439]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 449]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 452]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 655]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 665]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 668]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 810]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 821]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 824]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use Argument   [get_cut_cell_volume_area.f, 958]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 964]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 967]   GET_CUT_CELL_VOLUME_AND_AREAS

X_MEAN    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 345]         STORE_CUT_FACE_INFO
    Declare   [get_delh.f, 366]        STORE_CUT_FACE_INFO
    Use   [get_delh.f, 405]            STORE_CUT_FACE_INFO
    Use   [get_delh.f, 423]            STORE_CUT_FACE_INFO

X_NP    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 15]   GET_CUT_CELL_VOLUME_AND_AREAS
    Declare   [get_cut_cell_volume_area.f, 62]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 118]   GET_CUT_CELL_VOLUME_AND_AREAS

X_NP    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_connectivity.f, 15]   GET_CONNECTIVITY
    Declare   [get_connectivity.f, 44]   GET_CONNECTIVITY
    Set   [get_connectivity.f, 133]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 145]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 157]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 169]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 184]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 196]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 208]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 220]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 235]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 247]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 259]    GET_CONNECTIVITY
    Set   [get_connectivity.f, 271]    GET_CONNECTIVITY

X_OFFSET    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1490]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1515]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1521]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1527]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1533]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1567]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1575]   CAD_INTERSECT

X_OLD_POINT    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [get_cut_cell_flags.f, 53]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 67]   SET_3D_CUT_CELL_FLAGS
    Set   [get_cut_cell_flags.f, 652]   SET_3D_CUT_CELL_FLAGS

X_s_temp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [solve_species_eq.f, 74]   SOLVE_SPECIES_EQ
    Set   [solve_species_eq.f, 193]    SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 196]   SOLVE_SPECIES_EQ

X_SOL    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [test_lin_eq.f, 51]       TEST_LIN_EQ
    Set   [test_lin_eq.f, 72]          TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 124]   TEST_LIN_EQ
    Use   [test_lin_eq.f, 134]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 135]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 144]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 167]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 173]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 173]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 174]         TEST_LIN_EQ

x_star    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 159]    EVAL_POLY_FCT
    Set   [get_poly_data.f, 239]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 247]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 249]       EVAL_POLY_FCT

X_SUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [tau_v_g.f, 90]           CALC_TAU_V_G
    Set   [tau_v_g.f, 292]             CALC_TAU_V_G

X_vavg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [time_march.f, 86]        TIME_MARCH

X_VECTOR    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 107]   GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 515]   GET_F_QUADRIC
    Use   [define_quadrics.f, 517]     GET_F_QUADRIC

X_VERTEX_MAX    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 157]    EVAL_POLY_FCT
    Set   [get_poly_data.f, 193]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 198]       EVAL_POLY_FCT

X_VERTEX_MIN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 157]    EVAL_POLY_FCT
    Set   [get_poly_data.f, 192]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 198]       EVAL_POLY_FCT

x_west    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 159]    EVAL_POLY_FCT
    Set   [get_poly_data.f, 225]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 227]       EVAL_POLY_FCT

xa    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_stl_data.f, 1178]    INTERSECT_LINE_WITH_FACET
    Declare   [get_stl_data.f, 1194]   INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1229]       INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1250]       INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1268]       INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1294]       INTERSECT_LINE_WITH_FACET

xa    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1481]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1666]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1676]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1704]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1720]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1750]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1756]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1775]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1797]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1830]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1836]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1855]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1877]   CAD_INTERSECT

xa    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 732]   CLEAN_INTERSECT
    Set   [cut_cell_preprocessing.f, 800]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 808]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 812]   CLEAN_INTERSECT
    Set   [cut_cell_preprocessing.f, 872]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 876]   CLEAN_INTERSECT
    Set   [cut_cell_preprocessing.f, 940]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 944]   CLEAN_INTERSECT

xa    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 509]   INTERSECT
    Set   [cut_cell_preprocessing.f, 526]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 538]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 553]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 558]   INTERSECT
    Set   [cut_cell_preprocessing.f, 580]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 587]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 601]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 606]   INTERSECT
    Set   [cut_cell_preprocessing.f, 627]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 634]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 648]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 653]   INTERSECT

xa    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 358]   INTERSECT_LINE
    Declare   [cut_cell_preprocessing.f, 374]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 382]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 444]   INTERSECT_LINE
    Use Argument   [cut_cell_preprocessing.f, 446]   INTERSECT_LINE

xa    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1121]   SET_SNAP_FLAG
    Set   [cut_cell_preprocessing.f, 1160]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1169]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1173]   SET_SNAP_FLAG
    Set   [cut_cell_preprocessing.f, 1213]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1217]   SET_SNAP_FLAG
    Set   [cut_cell_preprocessing.f, 1265]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1269]   SET_SNAP_FLAG

xb    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_stl_data.f, 1178]    INTERSECT_LINE_WITH_FACET
    Declare   [get_stl_data.f, 1194]   INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1229]       INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1295]       INTERSECT_LINE_WITH_FACET

xb    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1481]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1670]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1687]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1704]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1726]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1775]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1803]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1855]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1883]   CAD_INTERSECT

xb    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 732]   CLEAN_INTERSECT
    Set   [cut_cell_preprocessing.f, 804]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 808]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 835]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 876]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 944]   CLEAN_INTERSECT

xb    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 509]   INTERSECT
    Set   [cut_cell_preprocessing.f, 530]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 538]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 553]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 558]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 587]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 601]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 606]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 634]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 648]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 653]   INTERSECT

xb    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 358]   INTERSECT_LINE
    Declare   [cut_cell_preprocessing.f, 374]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 387]   INTERSECT_LINE
    Use   [cut_cell_preprocessing.f, 445]   INTERSECT_LINE
    Use Argument   [cut_cell_preprocessing.f, 447]   INTERSECT_LINE

xb    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1121]   SET_SNAP_FLAG
    Set   [cut_cell_preprocessing.f, 1164]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1169]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1187]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1217]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1269]   SET_SNAP_FLAG

xc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_flags.f, 1926]   GET_POTENTIAL_CUT_CELLS
    Set   [get_cut_cell_flags.f, 1951]   GET_POTENTIAL_CUT_CELLS
    Use Argument   [get_cut_cell_flags.f, 1961]   GET_POTENTIAL_CUT_CELLS
    Use Argument   [get_cut_cell_flags.f, 1963]   GET_POTENTIAL_CUT_CELLS
    Use Argument   [get_cut_cell_flags.f, 1965]   GET_POTENTIAL_CUT_CELLS
    Use   [get_cut_cell_flags.f, 1967]   GET_POTENTIAL_CUT_CELLS

xc    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [get_stl_data.f, 1178]    INTERSECT_LINE_WITH_FACET
    Declare   [get_stl_data.f, 1194]   INTERSECT_LINE_WITH_FACET
    Set   [get_stl_data.f, 1276]       INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1294]       INTERSECT_LINE_WITH_FACET
    Use   [get_stl_data.f, 1295]       INTERSECT_LINE_WITH_FACET

xc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1481]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1704]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1709]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1716]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1720]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1726]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1775]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1797]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1803]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1855]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1877]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1883]   CAD_INTERSECT

xc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 509]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 538]   INTERSECT
    Use   [cut_cell_preprocessing.f, 539]   INTERSECT
    Use   [cut_cell_preprocessing.f, 543]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 553]   INTERSECT
    Use   [cut_cell_preprocessing.f, 554]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 558]   INTERSECT
    Use   [cut_cell_preprocessing.f, 559]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 587]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 601]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 606]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 634]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 648]   INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 653]   INTERSECT

xc    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 358]   INTERSECT_LINE
    Declare   [cut_cell_preprocessing.f, 374]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 405]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 410]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 437]   INTERSECT_LINE
    Set   [cut_cell_preprocessing.f, 463]   INTERSECT_LINE

Xc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1270]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1324]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1329]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1329]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1334]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1334]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1400]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1402]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1417]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1419]   REORDER_POLYGON

Xc_backup    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 510]   INTERSECT
    Set   [cut_cell_preprocessing.f, 542]   INTERSECT

XCC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_cartesian.f, 3367]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3450]   ADJUST_IJK_SIZE
    Set   [check_data_cartesian.f, 3452]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3452]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3526]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3616]   ADJUST_IJK_SIZE
    Use   [check_data_cartesian.f, 3688]   ADJUST_IJK_SIZE

xdist    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cal_d.f, 37]             CAL_D
    Set   [cal_d.f, 46]                CAL_D
    Set   [cal_d.f, 47]                CAL_D
    Set   [cal_d.f, 49]                CAL_D
    Use   [cal_d.f, 49]                CAL_D
    Use   [cal_d.f, 57]                CAL_D
    Set   [cal_d.f, 78]                CAL_D

xdist3    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cal_d.f, 38]             CAL_D
    Set   [cal_d.f, 77]                CAL_D
    Set   [cal_d.f, 81]                CAL_D
    Use   [cal_d.f, 81]                CAL_D
    Use   [cal_d.f, 92]                CAL_D

XE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 3073]         SETUP_VTK_REGION
    Set   [vtk_out.f, 3079]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3110]            SETUP_VTK_REGION

Xe    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 33]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 203]           GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 208]   GET_3D_ALPHA_U_CUT_CELL

Xe    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 452]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 634]           GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 641]   GET_3D_ALPHA_V_CUT_CELL

Xe    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 878]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 1046]          GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 1052]   GET_3D_ALPHA_W_CUT_CELL

Xe    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_connectivity.f, 352]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 393]    GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 408]    GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 423]    GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 438]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 459]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 469]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 479]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 489]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 499]    GET_CELL_NODE_COORDINATES

Xe    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_connectivity.f, 542]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 580]    GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 595]    GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 610]    GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 625]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 646]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 656]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 666]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 676]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 686]    GET_GLOBAL_CELL_NODE_COORDINATES

XEND_IC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [generate_particle_config.f, 505]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 590]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 595]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 643]   GENERATE_PARTICLE_CONFIG_DEM

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [tau_w_g.f, 102]          CALC_TAU_W_G
    Set   [tau_w_g.f, 257]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 264]    CALC_TAU_W_G
    Set   [tau_w_g.f, 277]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 284]    CALC_TAU_W_G
    Set   [tau_w_g.f, 317]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 325]    CALC_TAU_W_G
    Set   [tau_w_g.f, 338]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 345]    CALC_TAU_W_G

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [tau_w_s.f, 95]           CALC_TAU_W_S
    Set   [tau_w_s.f, 269]             CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 275]    CALC_TAU_W_S
    Set   [tau_w_s.f, 285]             CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 291]    CALC_TAU_W_S
    Set   [tau_w_s.f, 323]             CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 329]    CALC_TAU_W_S
    Set   [tau_w_s.f, 339]             CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 345]    CALC_TAU_W_S

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_trd_g.f, 67]        CALC_TRD_G
    Set   [calc_trd_g.f, 160]          CALC_TRD_G
    Use Argument   [calc_trd_g.f, 167]   CALC_TRD_G
    Set   [calc_trd_g.f, 188]          CALC_TRD_G
    Use Argument   [calc_trd_g.f, 195]   CALC_TRD_G
    Set   [calc_trd_g.f, 231]          CALC_TRD_G
    Use Argument   [calc_trd_g.f, 238]   CALC_TRD_G

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_trd_g.f, 339]       CG_CALC_VEL_G_GRAD
    Set   [calc_trd_g.f, 429]          CG_CALC_VEL_G_GRAD
    Use Argument   [calc_trd_g.f, 436]   CG_CALC_VEL_G_GRAD
    Set   [calc_trd_g.f, 486]          CG_CALC_VEL_G_GRAD
    Use Argument   [calc_trd_g.f, 493]   CG_CALC_VEL_G_GRAD
    Set   [calc_trd_g.f, 553]          CG_CALC_VEL_G_GRAD
    Use Argument   [calc_trd_g.f, 560]   CG_CALC_VEL_G_GRAD

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 35]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 118]           GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 120]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 122]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 122]           GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 126]           GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 128]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 130]           GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 157]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 158]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 158]           GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 161]           GET_3D_ALPHA_U_CUT_CELL
    Use   [get_alpha.f, 162]           GET_3D_ALPHA_U_CUT_CELL

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [tau_v_g.f, 93]           CALC_TAU_V_G
    Set   [tau_v_g.f, 253]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 261]    CALC_TAU_V_G
    Set   [tau_v_g.f, 274]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 281]    CALC_TAU_V_G
    Set   [tau_v_g.f, 328]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 335]    CALC_TAU_V_G
    Set   [tau_v_g.f, 348]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 355]    CALC_TAU_V_G

Xi    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 709]   CLEAN_INTERSECT
    Declare   [cut_cell_preprocessing.f, 733]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 812]   CLEAN_INTERSECT
    Use   [cut_cell_preprocessing.f, 835]   CLEAN_INTERSECT

Xi    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 489]   INTERSECT
    Declare   [cut_cell_preprocessing.f, 510]   INTERSECT
    Set   [cut_cell_preprocessing.f, 513]   INTERSECT
    Use   [cut_cell_preprocessing.f, 539]   INTERSECT
    Use   [cut_cell_preprocessing.f, 542]   INTERSECT
    Set   [cut_cell_preprocessing.f, 543]   INTERSECT
    Set   [cut_cell_preprocessing.f, 547]   INTERSECT
    Set   [cut_cell_preprocessing.f, 554]   INTERSECT
    Set   [cut_cell_preprocessing.f, 559]   INTERSECT
    Set   [cut_cell_preprocessing.f, 571]   INTERSECT

Xi    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1098]   SET_SNAP_FLAG
    Declare   [cut_cell_preprocessing.f, 1122]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1173]   SET_SNAP_FLAG
    Use   [cut_cell_preprocessing.f, 1187]   SET_SNAP_FLAG

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_trd_s.f, 68]        CALC_TRD_S
    Set   [calc_trd_s.f, 165]          CALC_TRD_S
    Use Argument   [calc_trd_s.f, 172]   CALC_TRD_S
    Set   [calc_trd_s.f, 193]          CALC_TRD_S
    Use Argument   [calc_trd_s.f, 200]   CALC_TRD_S
    Set   [calc_trd_s.f, 227]          CALC_TRD_S
    Use Argument   [calc_trd_s.f, 234]   CALC_TRD_S

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_trd_s.f, 327]       CG_CALC_VEL_S_GRAD
    Set   [calc_trd_s.f, 430]          CG_CALC_VEL_S_GRAD
    Use Argument   [calc_trd_s.f, 437]   CG_CALC_VEL_S_GRAD
    Set   [calc_trd_s.f, 485]          CG_CALC_VEL_S_GRAD
    Use Argument   [calc_trd_s.f, 492]   CG_CALC_VEL_S_GRAD
    Set   [calc_trd_s.f, 548]          CG_CALC_VEL_S_GRAD
    Use Argument   [calc_trd_s.f, 555]   CG_CALC_VEL_S_GRAD

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [tau_v_s.f, 93]           CALC_TAU_V_S
    Set   [tau_v_s.f, 271]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 277]    CALC_TAU_V_S
    Set   [tau_v_s.f, 287]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 293]    CALC_TAU_V_S
    Set   [tau_v_s.f, 333]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 339]    CALC_TAU_V_S
    Set   [tau_v_s.f, 349]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 355]    CALC_TAU_V_S

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [tau_u_g.f, 100]          CALC_TAU_U_G
    Set   [tau_u_g.f, 265]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 272]    CALC_TAU_U_G
    Set   [tau_u_g.f, 285]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 292]    CALC_TAU_U_G
    Set   [tau_u_g.f, 328]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 335]    CALC_TAU_U_G
    Set   [tau_u_g.f, 349]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 356]    CALC_TAU_U_G

Xi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [tau_u_s.f, 98]           CALC_TAU_U_S
    Set   [tau_u_s.f, 291]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 297]    CALC_TAU_U_S
    Set   [tau_u_s.f, 307]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 313]    CALC_TAU_U_S
    Set   [tau_u_s.f, 346]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 352]    CALC_TAU_U_S
    Set   [tau_u_s.f, 362]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 368]    CALC_TAU_U_S

XI_s_v    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_mu_s.f, 1455]       gt_pde_ia
    Set   [calc_mu_s.f, 1611]          gt_pde_ia
    Use   [calc_mu_s.f, 1614]          gt_pde_ia

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

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

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

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

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

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

XI_sM_sum    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_mu_s.f, 1455]       gt_pde_ia
    Set   [calc_mu_s.f, 1486]          gt_pde_ia
    Set   [calc_mu_s.f, 1601]          gt_pde_ia
    Use   [calc_mu_s.f, 1601]          gt_pde_ia
    Use   [calc_mu_s.f, 1611]          gt_pde_ia

xinit    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [generate_particle_config.f, 506]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 598]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 643]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 653]   GENERATE_PARTICLE_CONFIG_DEM

Xint    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cut_cell_preprocessing.f, 1456]   CAD_INTERSECT
    Declare   [cut_cell_preprocessing.f, 1486]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1505]   CAD_INTERSECT
    Use   [cut_cell_preprocessing.f, 1709]   CAD_INTERSECT
    Set   [cut_cell_preprocessing.f, 1716]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1933]   CAD_INTERSECT
    Use Argument   [cut_cell_preprocessing.f, 1949]   CAD_INTERSECT

xloc    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [write_spx1.f, 728]       write_mesh_netcdf
    Set   [write_spx1.f, 747]          write_mesh_netcdf
    Set   [write_spx1.f, 754]          write_mesh_netcdf
    Set   [write_spx1.f, 760]          write_mesh_netcdf
    Set   [write_spx1.f, 762]          write_mesh_netcdf
    Use   [write_spx1.f, 762]          write_mesh_netcdf
    Use Argument   [write_spx1.f, 803]   write_mesh_netcdf
    Set   [write_spx1.f, 823]          write_mesh_netcdf

xloc    (Local Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [write_spx1.f, 887]       write_netcdf
    Set   [write_spx1.f, 919]          write_netcdf
    Set   [write_spx1.f, 930]          write_netcdf
    Set   [write_spx1.f, 939]          write_netcdf
    Set   [write_spx1.f, 941]          write_netcdf
    Use   [write_spx1.f, 941]          write_netcdf
    Use Argument   [write_spx1.f, 1080]   write_netcdf
    Set   [write_spx1.f, 1232]         write_netcdf

XMIN    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [location.f, 19]          LOCATION
    Declare   [location.f, 37]         LOCATION
    Use   [location.f, 50]             LOCATION

XMT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 107]   GET_F_QUADRIC
    Set   [define_quadrics.f, 517]     GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 518]   GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 520]   GET_F_QUADRIC

Xn    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_mass_balance.f, 834]   Accumulation
    Set   [check_mass_balance.f, 841]   Accumulation
    Use Argument   [check_mass_balance.f, 842]   Accumulation

Xn    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_mass_balance.f, 857]   Accumulation_sp
    Declare   [check_mass_balance.f, 888]   Accumulation_sp
    Use   [check_mass_balance.f, 900]   Accumulation_sp

Xn    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_mass_balance.f, 481]   Calc_mass_flux
    Set   [check_mass_balance.f, 490]   Calc_mass_flux
    Use Argument   [check_mass_balance.f, 491]   Calc_mass_flux

Xn    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_mass_balance.f, 512]   Calc_mass_flux_sp
    Declare   [check_mass_balance.f, 537]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 564]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 566]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 572]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 574]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 580]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 582]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 588]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 590]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 596]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 598]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 604]   Calc_mass_flux_sp
    Use   [check_mass_balance.f, 606]   Calc_mass_flux_sp

Xn    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [check_mass_balance.f, 689]   Calc_mass_flux_spHR
    Declare   [check_mass_balance.f, 713]   Calc_mass_flux_spHR
    Use Argument   [check_mass_balance.f, 737]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 752]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 752]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 757]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 757]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 762]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 762]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 767]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 767]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 772]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 772]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 777]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 777]   Calc_mass_flux_spHR

Xn    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_mass_balance.f, 658]   Calc_mass_fluxHR
    Set   [check_mass_balance.f, 667]   Calc_mass_fluxHR
    Use Argument   [check_mass_balance.f, 668]   Calc_mass_fluxHR

Xn    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 33]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 258]           GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 263]   GET_3D_ALPHA_U_CUT_CELL

Xn    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 452]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 677]           GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 683]   GET_3D_ALPHA_V_CUT_CELL

Xn    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 878]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 1098]          GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 1104]   GET_3D_ALPHA_W_CUT_CELL

xnew    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rkqs.f, 16]              rkqs
    Set   [rkqs.f, 36]                 rkqs
    Use   [rkqs.f, 37]                 rkqs

xp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [generate_particle_config.f, 503]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 653]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 674]   GENERATE_PARTICLE_CONFIG_DEM
    Use Argument   [generate_particle_config.f, 683]   GENERATE_PARTICLE_CONFIG_DEM
    Use Argument   [generate_particle_config.f, 686]   GENERATE_PARTICLE_CONFIG_DEM

xp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [odeint.f, 11]            odeint
    Set   [odeint.f, 43]               odeint
    Set   [odeint.f, 64]               odeint

XPOS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 37]     CFWALLCONTACT
    Set   [cfwallcontact.f, 53]        CFWALLCONTACT
    Use   [cfwallcontact.f, 78]        CFWALLCONTACT
    Use   [cfwallcontact.f, 85]        CFWALLCONTACT

XPOS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [pic_bc_routines.f, 719]   PIC_FIND_NEW_CELL
    Set   [pic_bc_routines.f, 726]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 732]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 732]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 734]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 765]     PIC_FIND_NEW_CELL
    Use   [pic_bc_routines.f, 765]     PIC_FIND_NEW_CELL

XPOS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [nsquare.f, 30]           NSQUARE
    Set   [nsquare.f, 58]              NSQUARE
    Set   [nsquare.f, 67]              NSQUARE
    Set   [nsquare.f, 70]              NSQUARE
    Use   [nsquare.f, 100]             NSQUARE

xpos    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [pic_routines.f, 51]      PIC_TIME_MARCH

XREF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 36]          GET_DEL_H
    Set   [get_delh.f, 55]             GET_DEL_H
    Set   [get_delh.f, 72]             GET_DEL_H
    Set   [get_delh.f, 97]             GET_DEL_H
    Set   [get_delh.f, 122]            GET_DEL_H
    Use   [get_delh.f, 146]            GET_DEL_H

XREF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 194]         GET_DEL_H_DES
    Set   [get_delh.f, 216]            GET_DEL_H_DES
    Set   [get_delh.f, 233]            GET_DEL_H_DES
    Set   [get_delh.f, 258]            GET_DEL_H_DES
    Set   [get_delh.f, 283]            GET_DEL_H_DES
    Use   [get_delh.f, 306]            GET_DEL_H_DES

XREF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_delh.f, 611]         GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 773]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 777]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 796]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 800]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 819]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 823]            GET_DISTANCE_TO_WALL
    Set   [get_delh.f, 834]            GET_DISTANCE_TO_WALL
    Use   [get_delh.f, 838]            GET_DISTANCE_TO_WALL

xsav    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [odeint.f, 10]            odeint
    Set   [odeint.f, 32]               odeint
    Use   [odeint.f, 40]               odeint
    Set   [odeint.f, 47]               odeint

XSI.CALC_XSI.cf    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 78]           XSI.CALC_XSI
    Set   [xsi_mod.f, 233]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 234]    XSI.CALC_XSI
    Set   [xsi_mod.f, 249]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 250]    XSI.CALC_XSI
    Set   [xsi_mod.f, 266]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 267]    XSI.CALC_XSI
    Set   [xsi_mod.f, 295]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 296]    XSI.CALC_XSI
    Set   [xsi_mod.f, 315]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 316]    XSI.CALC_XSI
    Set   [xsi_mod.f, 336]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 337]    XSI.CALC_XSI

XSI.CALC_XSI.DISCR    (Dummy Argument)  Declared as: INTEGER
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 54]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Use   [xsi_mod.f, 92]              XSI.CALC_XSI
    Use   [xsi_mod.f, 560]             XSI.CALC_XSI

XSI.CALC_XSI.dwf    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 75]           XSI.CALC_XSI
    Set   [xsi_mod.f, 116]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 117]    XSI.CALC_XSI
    Set   [xsi_mod.f, 130]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 131]    XSI.CALC_XSI
    Set   [xsi_mod.f, 146]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 148]    XSI.CALC_XSI
    Set   [xsi_mod.f, 168]             XSI.CALC_XSI
    Set   [xsi_mod.f, 170]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 173]    XSI.CALC_XSI
    Set   [xsi_mod.f, 188]             XSI.CALC_XSI
    Set   [xsi_mod.f, 190]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 193]    XSI.CALC_XSI
    Set   [xsi_mod.f, 209]             XSI.CALC_XSI
    Set   [xsi_mod.f, 211]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 214]    XSI.CALC_XSI
    Set   [xsi_mod.f, 234]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 235]    XSI.CALC_XSI
    Set   [xsi_mod.f, 250]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 251]    XSI.CALC_XSI
    Set   [xsi_mod.f, 267]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 269]    XSI.CALC_XSI
    Set   [xsi_mod.f, 296]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 297]    XSI.CALC_XSI
    Set   [xsi_mod.f, 316]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 317]    XSI.CALC_XSI
    Set   [xsi_mod.f, 337]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 339]    XSI.CALC_XSI
    Set   [xsi_mod.f, 359]             XSI.CALC_XSI
    Set   [xsi_mod.f, 361]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 364]    XSI.CALC_XSI
    Set   [xsi_mod.f, 379]             XSI.CALC_XSI
    Set   [xsi_mod.f, 381]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 384]    XSI.CALC_XSI
    Set   [xsi_mod.f, 400]             XSI.CALC_XSI
    Set   [xsi_mod.f, 402]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 405]    XSI.CALC_XSI
    Set   [xsi_mod.f, 424]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 425]    XSI.CALC_XSI
    Set   [xsi_mod.f, 438]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 439]    XSI.CALC_XSI
    Set   [xsi_mod.f, 453]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 454]    XSI.CALC_XSI
    Set   [xsi_mod.f, 472]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 473]    XSI.CALC_XSI
    Set   [xsi_mod.f, 486]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 487]    XSI.CALC_XSI
    Set   [xsi_mod.f, 501]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 502]    XSI.CALC_XSI
    Set   [xsi_mod.f, 522]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 523]    XSI.CALC_XSI
    Set   [xsi_mod.f, 537]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 538]    XSI.CALC_XSI
    Set   [xsi_mod.f, 553]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 554]    XSI.CALC_XSI

XSI.CALC_XSI.I    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 67]           XSI.CALC_XSI
    Set   [xsi_mod.f, 221]             XSI.CALC_XSI
    Use   [xsi_mod.f, 233]             XSI.CALC_XSI
    Use   [xsi_mod.f, 266]             XSI.CALC_XSI
    Set   [xsi_mod.f, 279]             XSI.CALC_XSI
    Use   [xsi_mod.f, 284]             XSI.CALC_XSI
    Use   [xsi_mod.f, 285]             XSI.CALC_XSI
    Use   [xsi_mod.f, 290]             XSI.CALC_XSI
    Use   [xsi_mod.f, 291]             XSI.CALC_XSI
    Use   [xsi_mod.f, 295]             XSI.CALC_XSI
    Use   [xsi_mod.f, 296]             XSI.CALC_XSI
    Use   [xsi_mod.f, 336]             XSI.CALC_XSI

XSI.CALC_XSI.IJK    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 67]           XSI.CALC_XSI
    Set   [xsi_mod.f, 96]              XSI.CALC_XSI
    Use   [xsi_mod.f, 97]              XSI.CALC_XSI
    Use   [xsi_mod.f, 97]              XSI.CALC_XSI
    Use   [xsi_mod.f, 98]              XSI.CALC_XSI
    Use   [xsi_mod.f, 98]              XSI.CALC_XSI
    Use   [xsi_mod.f, 99]              XSI.CALC_XSI
    Use   [xsi_mod.f, 99]              XSI.CALC_XSI
    Set   [xsi_mod.f, 104]             XSI.CALC_XSI
    Use   [xsi_mod.f, 105]             XSI.CALC_XSI
    Use   [xsi_mod.f, 106]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 107]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 110]    XSI.CALC_XSI
    Use   [xsi_mod.f, 111]             XSI.CALC_XSI
    Use   [xsi_mod.f, 117]             XSI.CALC_XSI
    Use   [xsi_mod.f, 117]             XSI.CALC_XSI
    Use   [xsi_mod.f, 119]             XSI.CALC_XSI
    Use   [xsi_mod.f, 120]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 121]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 124]    XSI.CALC_XSI
    Use   [xsi_mod.f, 125]             XSI.CALC_XSI
    Use   [xsi_mod.f, 131]             XSI.CALC_XSI
    Use   [xsi_mod.f, 131]             XSI.CALC_XSI
    Use   [xsi_mod.f, 134]             XSI.CALC_XSI
    Use   [xsi_mod.f, 135]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 136]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 139]    XSI.CALC_XSI
    Use   [xsi_mod.f, 140]             XSI.CALC_XSI
    Use   [xsi_mod.f, 148]             XSI.CALC_XSI
    Use   [xsi_mod.f, 148]             XSI.CALC_XSI
    Set   [xsi_mod.f, 154]             XSI.CALC_XSI
    Use   [xsi_mod.f, 155]             XSI.CALC_XSI
    Use   [xsi_mod.f, 156]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 157]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 160]    XSI.CALC_XSI
    Use   [xsi_mod.f, 161]             XSI.CALC_XSI
    Use   [xsi_mod.f, 168]             XSI.CALC_XSI
    Use   [xsi_mod.f, 173]             XSI.CALC_XSI
    Use   [xsi_mod.f, 173]             XSI.CALC_XSI
    Use   [xsi_mod.f, 175]             XSI.CALC_XSI
    Use   [xsi_mod.f, 176]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 177]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 180]    XSI.CALC_XSI
    Use   [xsi_mod.f, 181]             XSI.CALC_XSI
    Use   [xsi_mod.f, 188]             XSI.CALC_XSI
    Use   [xsi_mod.f, 193]             XSI.CALC_XSI
    Use   [xsi_mod.f, 193]             XSI.CALC_XSI
    Use   [xsi_mod.f, 196]             XSI.CALC_XSI
    Use   [xsi_mod.f, 197]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 198]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 201]    XSI.CALC_XSI
    Use   [xsi_mod.f, 202]             XSI.CALC_XSI
    Use   [xsi_mod.f, 209]             XSI.CALC_XSI
    Use   [xsi_mod.f, 214]             XSI.CALC_XSI
    Use   [xsi_mod.f, 214]             XSI.CALC_XSI
    Set   [xsi_mod.f, 220]             XSI.CALC_XSI
    Use   [xsi_mod.f, 221]             XSI.CALC_XSI
    Use   [xsi_mod.f, 222]             XSI.CALC_XSI
    Use   [xsi_mod.f, 223]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 224]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 227]    XSI.CALC_XSI
    Use   [xsi_mod.f, 228]             XSI.CALC_XSI
    Use   [xsi_mod.f, 233]             XSI.CALC_XSI
    Use   [xsi_mod.f, 235]             XSI.CALC_XSI
    Use   [xsi_mod.f, 235]             XSI.CALC_XSI
    Use   [xsi_mod.f, 237]             XSI.CALC_XSI
    Use   [xsi_mod.f, 238]             XSI.CALC_XSI
    Use   [xsi_mod.f, 239]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 240]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 243]    XSI.CALC_XSI
    Use   [xsi_mod.f, 244]             XSI.CALC_XSI
    Use   [xsi_mod.f, 249]             XSI.CALC_XSI
    Use   [xsi_mod.f, 251]             XSI.CALC_XSI
    Use   [xsi_mod.f, 251]             XSI.CALC_XSI
    Use   [xsi_mod.f, 254]             XSI.CALC_XSI
    Use   [xsi_mod.f, 255]             XSI.CALC_XSI
    Use   [xsi_mod.f, 256]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 257]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 260]    XSI.CALC_XSI
    Use   [xsi_mod.f, 261]             XSI.CALC_XSI
    Use   [xsi_mod.f, 266]             XSI.CALC_XSI
    Use   [xsi_mod.f, 269]             XSI.CALC_XSI
    Use   [xsi_mod.f, 269]             XSI.CALC_XSI
    Set   [xsi_mod.f, 278]             XSI.CALC_XSI
    Use   [xsi_mod.f, 279]             XSI.CALC_XSI
    Use   [xsi_mod.f, 280]             XSI.CALC_XSI
    Use   [xsi_mod.f, 281]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 282]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 287]    XSI.CALC_XSI
    Use   [xsi_mod.f, 288]             XSI.CALC_XSI
    Use   [xsi_mod.f, 295]             XSI.CALC_XSI
    Use   [xsi_mod.f, 297]             XSI.CALC_XSI
    Use   [xsi_mod.f, 297]             XSI.CALC_XSI
    Use   [xsi_mod.f, 299]             XSI.CALC_XSI
    Use   [xsi_mod.f, 300]             XSI.CALC_XSI
    Use   [xsi_mod.f, 301]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 302]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 307]    XSI.CALC_XSI
    Use   [xsi_mod.f, 308]             XSI.CALC_XSI
    Use   [xsi_mod.f, 315]             XSI.CALC_XSI
    Use   [xsi_mod.f, 317]             XSI.CALC_XSI
    Use   [xsi_mod.f, 317]             XSI.CALC_XSI
    Use   [xsi_mod.f, 320]             XSI.CALC_XSI
    Use   [xsi_mod.f, 321]             XSI.CALC_XSI
    Use   [xsi_mod.f, 322]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 323]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 328]    XSI.CALC_XSI
    Use   [xsi_mod.f, 329]             XSI.CALC_XSI
    Use   [xsi_mod.f, 336]             XSI.CALC_XSI
    Use   [xsi_mod.f, 339]             XSI.CALC_XSI
    Use   [xsi_mod.f, 339]             XSI.CALC_XSI
    Set   [xsi_mod.f, 345]             XSI.CALC_XSI
    Use   [xsi_mod.f, 346]             XSI.CALC_XSI
    Use   [xsi_mod.f, 347]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 348]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 351]    XSI.CALC_XSI
    Use   [xsi_mod.f, 352]             XSI.CALC_XSI
    Use   [xsi_mod.f, 359]             XSI.CALC_XSI
    Use   [xsi_mod.f, 364]             XSI.CALC_XSI
    Use   [xsi_mod.f, 364]             XSI.CALC_XSI
    Use   [xsi_mod.f, 366]             XSI.CALC_XSI
    Use   [xsi_mod.f, 367]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 368]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 371]    XSI.CALC_XSI
    Use   [xsi_mod.f, 372]             XSI.CALC_XSI
    Use   [xsi_mod.f, 379]             XSI.CALC_XSI
    Use   [xsi_mod.f, 384]             XSI.CALC_XSI
    Use   [xsi_mod.f, 384]             XSI.CALC_XSI
    Use   [xsi_mod.f, 387]             XSI.CALC_XSI
    Use   [xsi_mod.f, 388]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 389]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 392]    XSI.CALC_XSI
    Use   [xsi_mod.f, 393]             XSI.CALC_XSI
    Use   [xsi_mod.f, 400]             XSI.CALC_XSI
    Use   [xsi_mod.f, 405]             XSI.CALC_XSI
    Use   [xsi_mod.f, 405]             XSI.CALC_XSI
    Set   [xsi_mod.f, 412]             XSI.CALC_XSI
    Use   [xsi_mod.f, 413]             XSI.CALC_XSI
    Use   [xsi_mod.f, 414]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 415]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 418]    XSI.CALC_XSI
    Use   [xsi_mod.f, 419]             XSI.CALC_XSI
    Use   [xsi_mod.f, 425]             XSI.CALC_XSI
    Use   [xsi_mod.f, 425]             XSI.CALC_XSI
    Use   [xsi_mod.f, 427]             XSI.CALC_XSI
    Use   [xsi_mod.f, 428]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 429]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 432]    XSI.CALC_XSI
    Use   [xsi_mod.f, 433]             XSI.CALC_XSI
    Use   [xsi_mod.f, 439]             XSI.CALC_XSI
    Use   [xsi_mod.f, 439]             XSI.CALC_XSI
    Use   [xsi_mod.f, 442]             XSI.CALC_XSI
    Use   [xsi_mod.f, 443]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 444]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 447]    XSI.CALC_XSI
    Use   [xsi_mod.f, 448]             XSI.CALC_XSI
    Use   [xsi_mod.f, 454]             XSI.CALC_XSI
    Use   [xsi_mod.f, 454]             XSI.CALC_XSI
    Set   [xsi_mod.f, 460]             XSI.CALC_XSI
    Use   [xsi_mod.f, 461]             XSI.CALC_XSI
    Use   [xsi_mod.f, 462]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 463]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 466]    XSI.CALC_XSI
    Use   [xsi_mod.f, 467]             XSI.CALC_XSI
    Use   [xsi_mod.f, 473]             XSI.CALC_XSI
    Use   [xsi_mod.f, 473]             XSI.CALC_XSI
    Use   [xsi_mod.f, 475]             XSI.CALC_XSI
    Use   [xsi_mod.f, 476]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 477]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 480]    XSI.CALC_XSI
    Use   [xsi_mod.f, 481]             XSI.CALC_XSI
    Use   [xsi_mod.f, 487]             XSI.CALC_XSI
    Use   [xsi_mod.f, 487]             XSI.CALC_XSI
    Use   [xsi_mod.f, 490]             XSI.CALC_XSI
    Use   [xsi_mod.f, 491]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 492]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 495]    XSI.CALC_XSI
    Use   [xsi_mod.f, 496]             XSI.CALC_XSI
    Use   [xsi_mod.f, 502]             XSI.CALC_XSI
    Use   [xsi_mod.f, 502]             XSI.CALC_XSI
    Set   [xsi_mod.f, 510]             XSI.CALC_XSI
    Use   [xsi_mod.f, 511]             XSI.CALC_XSI
    Use   [xsi_mod.f, 512]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 513]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 516]    XSI.CALC_XSI
    Use   [xsi_mod.f, 517]             XSI.CALC_XSI
    Use   [xsi_mod.f, 523]             XSI.CALC_XSI
    Use   [xsi_mod.f, 523]             XSI.CALC_XSI
    Use   [xsi_mod.f, 526]             XSI.CALC_XSI
    Use   [xsi_mod.f, 527]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 528]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 531]    XSI.CALC_XSI
    Use   [xsi_mod.f, 532]             XSI.CALC_XSI
    Use   [xsi_mod.f, 538]             XSI.CALC_XSI
    Use   [xsi_mod.f, 538]             XSI.CALC_XSI
    Use   [xsi_mod.f, 542]             XSI.CALC_XSI
    Use   [xsi_mod.f, 543]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 544]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 547]    XSI.CALC_XSI
    Use   [xsi_mod.f, 548]             XSI.CALC_XSI
    Use   [xsi_mod.f, 554]             XSI.CALC_XSI
    Use   [xsi_mod.f, 554]             XSI.CALC_XSI

XSI.CALC_XSI.IJKC    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 67]           XSI.CALC_XSI
    Set   [xsi_mod.f, 106]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 108]    XSI.CALC_XSI
    Set   [xsi_mod.f, 110]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 112]    XSI.CALC_XSI
    Use   [xsi_mod.f, 115]             XSI.CALC_XSI
    Set   [xsi_mod.f, 120]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 122]    XSI.CALC_XSI
    Set   [xsi_mod.f, 124]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 126]    XSI.CALC_XSI
    Use   [xsi_mod.f, 129]             XSI.CALC_XSI
    Set   [xsi_mod.f, 135]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 137]    XSI.CALC_XSI
    Set   [xsi_mod.f, 139]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 141]    XSI.CALC_XSI
    Use   [xsi_mod.f, 144]             XSI.CALC_XSI
    Set   [xsi_mod.f, 156]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 158]    XSI.CALC_XSI
    Set   [xsi_mod.f, 160]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 162]    XSI.CALC_XSI
    Use   [xsi_mod.f, 165]             XSI.CALC_XSI
    Set   [xsi_mod.f, 176]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 178]    XSI.CALC_XSI
    Set   [xsi_mod.f, 180]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 182]    XSI.CALC_XSI
    Use   [xsi_mod.f, 185]             XSI.CALC_XSI
    Set   [xsi_mod.f, 197]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 199]    XSI.CALC_XSI
    Set   [xsi_mod.f, 201]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 203]    XSI.CALC_XSI
    Use   [xsi_mod.f, 206]             XSI.CALC_XSI
    Set   [xsi_mod.f, 223]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 225]    XSI.CALC_XSI
    Set   [xsi_mod.f, 227]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 229]    XSI.CALC_XSI
    Use   [xsi_mod.f, 232]             XSI.CALC_XSI
    Set   [xsi_mod.f, 239]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 241]    XSI.CALC_XSI
    Set   [xsi_mod.f, 243]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 245]    XSI.CALC_XSI
    Use   [xsi_mod.f, 248]             XSI.CALC_XSI
    Set   [xsi_mod.f, 256]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 258]    XSI.CALC_XSI
    Set   [xsi_mod.f, 260]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 262]    XSI.CALC_XSI
    Use   [xsi_mod.f, 265]             XSI.CALC_XSI
    Set   [xsi_mod.f, 281]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 283]    XSI.CALC_XSI
    Set   [xsi_mod.f, 287]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 289]    XSI.CALC_XSI
    Use   [xsi_mod.f, 294]             XSI.CALC_XSI
    Set   [xsi_mod.f, 301]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 303]    XSI.CALC_XSI
    Set   [xsi_mod.f, 307]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 309]    XSI.CALC_XSI
    Use   [xsi_mod.f, 314]             XSI.CALC_XSI
    Set   [xsi_mod.f, 322]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 324]    XSI.CALC_XSI
    Set   [xsi_mod.f, 328]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 330]    XSI.CALC_XSI
    Use   [xsi_mod.f, 335]             XSI.CALC_XSI
    Set   [xsi_mod.f, 347]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 349]    XSI.CALC_XSI
    Set   [xsi_mod.f, 351]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 353]    XSI.CALC_XSI
    Use   [xsi_mod.f, 356]             XSI.CALC_XSI
    Set   [xsi_mod.f, 367]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 369]    XSI.CALC_XSI
    Set   [xsi_mod.f, 371]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 373]    XSI.CALC_XSI
    Use   [xsi_mod.f, 376]             XSI.CALC_XSI
    Set   [xsi_mod.f, 388]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 390]    XSI.CALC_XSI
    Set   [xsi_mod.f, 392]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 394]    XSI.CALC_XSI
    Use   [xsi_mod.f, 397]             XSI.CALC_XSI
    Set   [xsi_mod.f, 414]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 416]    XSI.CALC_XSI
    Set   [xsi_mod.f, 418]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 420]    XSI.CALC_XSI
    Use   [xsi_mod.f, 423]             XSI.CALC_XSI
    Set   [xsi_mod.f, 428]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 430]    XSI.CALC_XSI
    Set   [xsi_mod.f, 432]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 434]    XSI.CALC_XSI
    Use   [xsi_mod.f, 437]             XSI.CALC_XSI
    Set   [xsi_mod.f, 443]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 445]    XSI.CALC_XSI
    Set   [xsi_mod.f, 447]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 449]    XSI.CALC_XSI
    Use   [xsi_mod.f, 452]             XSI.CALC_XSI
    Set   [xsi_mod.f, 462]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 464]    XSI.CALC_XSI
    Set   [xsi_mod.f, 466]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 468]    XSI.CALC_XSI
    Use   [xsi_mod.f, 471]             XSI.CALC_XSI
    Set   [xsi_mod.f, 476]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 478]    XSI.CALC_XSI
    Set   [xsi_mod.f, 480]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 482]    XSI.CALC_XSI
    Use   [xsi_mod.f, 485]             XSI.CALC_XSI
    Set   [xsi_mod.f, 491]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 493]    XSI.CALC_XSI
    Set   [xsi_mod.f, 495]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 497]    XSI.CALC_XSI
    Use   [xsi_mod.f, 500]             XSI.CALC_XSI
    Set   [xsi_mod.f, 512]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 514]    XSI.CALC_XSI
    Set   [xsi_mod.f, 516]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 518]    XSI.CALC_XSI
    Use   [xsi_mod.f, 521]             XSI.CALC_XSI
    Set   [xsi_mod.f, 527]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 529]    XSI.CALC_XSI
    Set   [xsi_mod.f, 531]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 533]    XSI.CALC_XSI
    Use   [xsi_mod.f, 536]             XSI.CALC_XSI
    Set   [xsi_mod.f, 543]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 545]    XSI.CALC_XSI
    Set   [xsi_mod.f, 547]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 549]    XSI.CALC_XSI
    Use   [xsi_mod.f, 552]             XSI.CALC_XSI

XSI.CALC_XSI.IJKD    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 67]           XSI.CALC_XSI
    Set   [xsi_mod.f, 107]             XSI.CALC_XSI
    Set   [xsi_mod.f, 111]             XSI.CALC_XSI
    Use   [xsi_mod.f, 115]             XSI.CALC_XSI
    Set   [xsi_mod.f, 121]             XSI.CALC_XSI
    Set   [xsi_mod.f, 125]             XSI.CALC_XSI
    Use   [xsi_mod.f, 129]             XSI.CALC_XSI
    Set   [xsi_mod.f, 136]             XSI.CALC_XSI
    Set   [xsi_mod.f, 140]             XSI.CALC_XSI
    Use   [xsi_mod.f, 144]             XSI.CALC_XSI
    Set   [xsi_mod.f, 157]             XSI.CALC_XSI
    Set   [xsi_mod.f, 161]             XSI.CALC_XSI
    Use   [xsi_mod.f, 165]             XSI.CALC_XSI
    Set   [xsi_mod.f, 177]             XSI.CALC_XSI
    Set   [xsi_mod.f, 181]             XSI.CALC_XSI
    Use   [xsi_mod.f, 185]             XSI.CALC_XSI
    Set   [xsi_mod.f, 198]             XSI.CALC_XSI
    Set   [xsi_mod.f, 202]             XSI.CALC_XSI
    Use   [xsi_mod.f, 206]             XSI.CALC_XSI
    Set   [xsi_mod.f, 224]             XSI.CALC_XSI
    Set   [xsi_mod.f, 228]             XSI.CALC_XSI
    Use   [xsi_mod.f, 232]             XSI.CALC_XSI
    Set   [xsi_mod.f, 240]             XSI.CALC_XSI
    Set   [xsi_mod.f, 244]             XSI.CALC_XSI
    Use   [xsi_mod.f, 248]             XSI.CALC_XSI
    Set   [xsi_mod.f, 257]             XSI.CALC_XSI
    Set   [xsi_mod.f, 261]             XSI.CALC_XSI
    Use   [xsi_mod.f, 265]             XSI.CALC_XSI
    Set   [xsi_mod.f, 282]             XSI.CALC_XSI
    Set   [xsi_mod.f, 288]             XSI.CALC_XSI
    Use   [xsi_mod.f, 294]             XSI.CALC_XSI
    Set   [xsi_mod.f, 302]             XSI.CALC_XSI
    Set   [xsi_mod.f, 308]             XSI.CALC_XSI
    Use   [xsi_mod.f, 314]             XSI.CALC_XSI
    Set   [xsi_mod.f, 323]             XSI.CALC_XSI
    Set   [xsi_mod.f, 329]             XSI.CALC_XSI
    Use   [xsi_mod.f, 335]             XSI.CALC_XSI
    Set   [xsi_mod.f, 348]             XSI.CALC_XSI
    Set   [xsi_mod.f, 352]             XSI.CALC_XSI
    Use   [xsi_mod.f, 356]             XSI.CALC_XSI
    Set   [xsi_mod.f, 368]             XSI.CALC_XSI
    Set   [xsi_mod.f, 372]             XSI.CALC_XSI
    Use   [xsi_mod.f, 376]             XSI.CALC_XSI
    Set   [xsi_mod.f, 389]             XSI.CALC_XSI
    Set   [xsi_mod.f, 393]             XSI.CALC_XSI
    Use   [xsi_mod.f, 397]             XSI.CALC_XSI
    Set   [xsi_mod.f, 415]             XSI.CALC_XSI
    Set   [xsi_mod.f, 419]             XSI.CALC_XSI
    Use   [xsi_mod.f, 423]             XSI.CALC_XSI
    Set   [xsi_mod.f, 429]             XSI.CALC_XSI
    Set   [xsi_mod.f, 433]             XSI.CALC_XSI
    Use   [xsi_mod.f, 437]             XSI.CALC_XSI
    Set   [xsi_mod.f, 444]             XSI.CALC_XSI
    Set   [xsi_mod.f, 448]             XSI.CALC_XSI
    Use   [xsi_mod.f, 452]             XSI.CALC_XSI
    Set   [xsi_mod.f, 463]             XSI.CALC_XSI
    Set   [xsi_mod.f, 467]             XSI.CALC_XSI
    Use   [xsi_mod.f, 471]             XSI.CALC_XSI
    Set   [xsi_mod.f, 477]             XSI.CALC_XSI
    Set   [xsi_mod.f, 481]             XSI.CALC_XSI
    Use   [xsi_mod.f, 485]             XSI.CALC_XSI
    Set   [xsi_mod.f, 492]             XSI.CALC_XSI
    Set   [xsi_mod.f, 496]             XSI.CALC_XSI
    Use   [xsi_mod.f, 500]             XSI.CALC_XSI
    Set   [xsi_mod.f, 513]             XSI.CALC_XSI
    Set   [xsi_mod.f, 517]             XSI.CALC_XSI
    Use   [xsi_mod.f, 521]             XSI.CALC_XSI
    Set   [xsi_mod.f, 528]             XSI.CALC_XSI
    Set   [xsi_mod.f, 532]             XSI.CALC_XSI
    Use   [xsi_mod.f, 536]             XSI.CALC_XSI
    Set   [xsi_mod.f, 544]             XSI.CALC_XSI
    Set   [xsi_mod.f, 548]             XSI.CALC_XSI
    Use   [xsi_mod.f, 552]             XSI.CALC_XSI

XSI.CALC_XSI.IJKU    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 67]           XSI.CALC_XSI
    Set   [xsi_mod.f, 108]             XSI.CALC_XSI
    Set   [xsi_mod.f, 112]             XSI.CALC_XSI
    Use   [xsi_mod.f, 115]             XSI.CALC_XSI
    Set   [xsi_mod.f, 122]             XSI.CALC_XSI
    Set   [xsi_mod.f, 126]             XSI.CALC_XSI
    Use   [xsi_mod.f, 129]             XSI.CALC_XSI
    Set   [xsi_mod.f, 137]             XSI.CALC_XSI
    Set   [xsi_mod.f, 141]             XSI.CALC_XSI
    Use   [xsi_mod.f, 144]             XSI.CALC_XSI
    Set   [xsi_mod.f, 158]             XSI.CALC_XSI
    Set   [xsi_mod.f, 162]             XSI.CALC_XSI
    Use   [xsi_mod.f, 165]             XSI.CALC_XSI
    Set   [xsi_mod.f, 178]             XSI.CALC_XSI
    Set   [xsi_mod.f, 182]             XSI.CALC_XSI
    Use   [xsi_mod.f, 185]             XSI.CALC_XSI
    Set   [xsi_mod.f, 199]             XSI.CALC_XSI
    Set   [xsi_mod.f, 203]             XSI.CALC_XSI
    Use   [xsi_mod.f, 206]             XSI.CALC_XSI
    Set   [xsi_mod.f, 225]             XSI.CALC_XSI
    Set   [xsi_mod.f, 229]             XSI.CALC_XSI
    Use   [xsi_mod.f, 232]             XSI.CALC_XSI
    Set   [xsi_mod.f, 241]             XSI.CALC_XSI
    Set   [xsi_mod.f, 245]             XSI.CALC_XSI
    Use   [xsi_mod.f, 248]             XSI.CALC_XSI
    Set   [xsi_mod.f, 258]             XSI.CALC_XSI
    Set   [xsi_mod.f, 262]             XSI.CALC_XSI
    Use   [xsi_mod.f, 265]             XSI.CALC_XSI
    Set   [xsi_mod.f, 283]             XSI.CALC_XSI
    Set   [xsi_mod.f, 289]             XSI.CALC_XSI
    Use   [xsi_mod.f, 294]             XSI.CALC_XSI
    Set   [xsi_mod.f, 303]             XSI.CALC_XSI
    Set   [xsi_mod.f, 309]             XSI.CALC_XSI
    Use   [xsi_mod.f, 314]             XSI.CALC_XSI
    Set   [xsi_mod.f, 324]             XSI.CALC_XSI
    Set   [xsi_mod.f, 330]             XSI.CALC_XSI
    Use   [xsi_mod.f, 335]             XSI.CALC_XSI
    Set   [xsi_mod.f, 349]             XSI.CALC_XSI
    Set   [xsi_mod.f, 353]             XSI.CALC_XSI
    Use   [xsi_mod.f, 356]             XSI.CALC_XSI
    Set   [xsi_mod.f, 369]             XSI.CALC_XSI
    Set   [xsi_mod.f, 373]             XSI.CALC_XSI
    Use   [xsi_mod.f, 376]             XSI.CALC_XSI
    Set   [xsi_mod.f, 390]             XSI.CALC_XSI
    Set   [xsi_mod.f, 394]             XSI.CALC_XSI
    Use   [xsi_mod.f, 397]             XSI.CALC_XSI
    Set   [xsi_mod.f, 416]             XSI.CALC_XSI
    Set   [xsi_mod.f, 420]             XSI.CALC_XSI
    Use   [xsi_mod.f, 423]             XSI.CALC_XSI
    Set   [xsi_mod.f, 430]             XSI.CALC_XSI
    Set   [xsi_mod.f, 434]             XSI.CALC_XSI
    Use   [xsi_mod.f, 437]             XSI.CALC_XSI
    Set   [xsi_mod.f, 445]             XSI.CALC_XSI
    Set   [xsi_mod.f, 449]             XSI.CALC_XSI
    Use   [xsi_mod.f, 452]             XSI.CALC_XSI
    Set   [xsi_mod.f, 464]             XSI.CALC_XSI
    Set   [xsi_mod.f, 468]             XSI.CALC_XSI
    Use   [xsi_mod.f, 471]             XSI.CALC_XSI
    Set   [xsi_mod.f, 478]             XSI.CALC_XSI
    Set   [xsi_mod.f, 482]             XSI.CALC_XSI
    Use   [xsi_mod.f, 485]             XSI.CALC_XSI
    Set   [xsi_mod.f, 493]             XSI.CALC_XSI
    Set   [xsi_mod.f, 497]             XSI.CALC_XSI
    Use   [xsi_mod.f, 500]             XSI.CALC_XSI
    Set   [xsi_mod.f, 514]             XSI.CALC_XSI
    Set   [xsi_mod.f, 518]             XSI.CALC_XSI
    Use   [xsi_mod.f, 521]             XSI.CALC_XSI
    Set   [xsi_mod.f, 529]             XSI.CALC_XSI
    Set   [xsi_mod.f, 533]             XSI.CALC_XSI
    Use   [xsi_mod.f, 536]             XSI.CALC_XSI
    Set   [xsi_mod.f, 545]             XSI.CALC_XSI
    Set   [xsi_mod.f, 549]             XSI.CALC_XSI
    Use   [xsi_mod.f, 552]             XSI.CALC_XSI

XSI.CALC_XSI.incr    (Dummy Argument)  Declared as: INTEGER
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 83]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI

XSI.CALC_XSI.J    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 67]           XSI.CALC_XSI
    Set   [xsi_mod.f, 237]             XSI.CALC_XSI
    Use   [xsi_mod.f, 249]             XSI.CALC_XSI
    Set   [xsi_mod.f, 299]             XSI.CALC_XSI
    Use   [xsi_mod.f, 304]             XSI.CALC_XSI
    Use   [xsi_mod.f, 305]             XSI.CALC_XSI
    Use   [xsi_mod.f, 310]             XSI.CALC_XSI
    Use   [xsi_mod.f, 311]             XSI.CALC_XSI
    Use   [xsi_mod.f, 315]             XSI.CALC_XSI
    Use   [xsi_mod.f, 316]             XSI.CALC_XSI

XSI.CALC_XSI.K    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 67]           XSI.CALC_XSI
    Set   [xsi_mod.f, 254]             XSI.CALC_XSI
    Use   [xsi_mod.f, 266]             XSI.CALC_XSI
    Set   [xsi_mod.f, 320]             XSI.CALC_XSI
    Use   [xsi_mod.f, 325]             XSI.CALC_XSI
    Use   [xsi_mod.f, 326]             XSI.CALC_XSI
    Use   [xsi_mod.f, 331]             XSI.CALC_XSI
    Use   [xsi_mod.f, 332]             XSI.CALC_XSI
    Use   [xsi_mod.f, 336]             XSI.CALC_XSI
    Use   [xsi_mod.f, 337]             XSI.CALC_XSI

XSI.CALC_XSI.LINE    (Local Variable)  Declared as: CHARACTER
    Define   [xsi_mod.f, 70]           XSI.CALC_XSI
    Set   [xsi_mod.f, 560]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 561]    XSI.CALC_XSI

XSI.CALC_XSI.oDXc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 81]           XSI.CALC_XSI
    Set   [xsi_mod.f, 284]             XSI.CALC_XSI
    Set   [xsi_mod.f, 290]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 296]    XSI.CALC_XSI

XSI.CALC_XSI.oDXuc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 81]           XSI.CALC_XSI
    Set   [xsi_mod.f, 285]             XSI.CALC_XSI
    Set   [xsi_mod.f, 291]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 296]    XSI.CALC_XSI

XSI.CALC_XSI.oDYc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 81]           XSI.CALC_XSI
    Set   [xsi_mod.f, 304]             XSI.CALC_XSI
    Set   [xsi_mod.f, 310]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 316]    XSI.CALC_XSI

XSI.CALC_XSI.oDYuc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 81]           XSI.CALC_XSI
    Set   [xsi_mod.f, 305]             XSI.CALC_XSI
    Set   [xsi_mod.f, 311]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 316]    XSI.CALC_XSI

XSI.CALC_XSI.oDZc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 81]           XSI.CALC_XSI
    Set   [xsi_mod.f, 325]             XSI.CALC_XSI
    Set   [xsi_mod.f, 331]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 337]    XSI.CALC_XSI

XSI.CALC_XSI.oDZuc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 81]           XSI.CALC_XSI
    Set   [xsi_mod.f, 326]             XSI.CALC_XSI
    Set   [xsi_mod.f, 332]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 337]    XSI.CALC_XSI

XSI.CALC_XSI.PHI    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 57]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 115]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 115]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 115]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 129]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 129]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 129]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 144]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 144]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 144]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 165]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 165]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 165]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 185]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 185]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 185]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 206]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 206]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 206]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 232]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 232]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 232]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 248]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 248]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 248]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 265]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 265]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 265]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 294]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 294]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 294]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 314]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 314]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 314]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 335]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 335]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 335]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 356]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 356]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 356]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 376]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 376]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 376]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 397]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 397]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 397]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 423]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 423]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 423]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 437]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 437]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 437]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 452]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 452]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 452]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 471]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 471]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 471]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 485]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 485]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 485]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 500]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 500]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 500]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 521]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 521]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 521]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 536]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 536]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 536]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 552]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 552]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 552]    XSI.CALC_XSI

XSI.CALC_XSI.PHI_C    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 72]           XSI.CALC_XSI
    Set   [xsi_mod.f, 115]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 116]    XSI.CALC_XSI
    Set   [xsi_mod.f, 129]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 130]    XSI.CALC_XSI
    Set   [xsi_mod.f, 144]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 146]    XSI.CALC_XSI
    Set   [xsi_mod.f, 165]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 168]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 170]    XSI.CALC_XSI
    Set   [xsi_mod.f, 185]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 188]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 190]    XSI.CALC_XSI
    Set   [xsi_mod.f, 206]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 209]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 211]    XSI.CALC_XSI
    Set   [xsi_mod.f, 232]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 234]    XSI.CALC_XSI
    Set   [xsi_mod.f, 248]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 250]    XSI.CALC_XSI
    Set   [xsi_mod.f, 265]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 267]    XSI.CALC_XSI
    Set   [xsi_mod.f, 294]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 296]    XSI.CALC_XSI
    Set   [xsi_mod.f, 314]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 316]    XSI.CALC_XSI
    Set   [xsi_mod.f, 335]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 337]    XSI.CALC_XSI
    Set   [xsi_mod.f, 356]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 359]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 361]    XSI.CALC_XSI
    Set   [xsi_mod.f, 376]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 379]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 381]    XSI.CALC_XSI
    Set   [xsi_mod.f, 397]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 400]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 402]    XSI.CALC_XSI
    Set   [xsi_mod.f, 423]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 424]    XSI.CALC_XSI
    Set   [xsi_mod.f, 437]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 438]    XSI.CALC_XSI
    Set   [xsi_mod.f, 452]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 453]    XSI.CALC_XSI
    Set   [xsi_mod.f, 471]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 472]    XSI.CALC_XSI
    Set   [xsi_mod.f, 485]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 486]    XSI.CALC_XSI
    Set   [xsi_mod.f, 500]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 501]    XSI.CALC_XSI
    Set   [xsi_mod.f, 521]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 522]    XSI.CALC_XSI
    Set   [xsi_mod.f, 536]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 537]    XSI.CALC_XSI
    Set   [xsi_mod.f, 552]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 553]    XSI.CALC_XSI

XSI.CALC_XSI.U    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 60]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 97]     XSI.CALC_XSI
    Use   [xsi_mod.f, 105]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 117]    XSI.CALC_XSI
    Use   [xsi_mod.f, 155]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 173]    XSI.CALC_XSI
    Use   [xsi_mod.f, 222]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 233]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 235]    XSI.CALC_XSI
    Use   [xsi_mod.f, 280]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 295]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 297]    XSI.CALC_XSI
    Use   [xsi_mod.f, 346]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 364]    XSI.CALC_XSI
    Use   [xsi_mod.f, 413]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 425]    XSI.CALC_XSI
    Use   [xsi_mod.f, 461]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 473]    XSI.CALC_XSI
    Use   [xsi_mod.f, 511]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 523]    XSI.CALC_XSI

XSI.CALC_XSI.V    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 60]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 98]     XSI.CALC_XSI
    Use   [xsi_mod.f, 119]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 131]    XSI.CALC_XSI
    Use   [xsi_mod.f, 175]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 193]    XSI.CALC_XSI
    Use   [xsi_mod.f, 238]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 249]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 251]    XSI.CALC_XSI
    Use   [xsi_mod.f, 300]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 315]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 317]    XSI.CALC_XSI
    Use   [xsi_mod.f, 366]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 384]    XSI.CALC_XSI
    Use   [xsi_mod.f, 427]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 439]    XSI.CALC_XSI
    Use   [xsi_mod.f, 475]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 487]    XSI.CALC_XSI
    Use   [xsi_mod.f, 526]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 538]    XSI.CALC_XSI

XSI.CALC_XSI.W    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 60]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 99]     XSI.CALC_XSI
    Use   [xsi_mod.f, 134]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 148]    XSI.CALC_XSI
    Use   [xsi_mod.f, 196]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 214]    XSI.CALC_XSI
    Use   [xsi_mod.f, 255]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 266]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 269]    XSI.CALC_XSI
    Use   [xsi_mod.f, 321]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 336]    XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 339]    XSI.CALC_XSI
    Use   [xsi_mod.f, 387]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 405]    XSI.CALC_XSI
    Use   [xsi_mod.f, 442]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 454]    XSI.CALC_XSI
    Use   [xsi_mod.f, 490]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 502]    XSI.CALC_XSI
    Use   [xsi_mod.f, 542]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 554]    XSI.CALC_XSI

XSI.CALC_XSI.XSI_e    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 63]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Set   [xsi_mod.f, 97]              XSI.CALC_XSI
    Set   [xsi_mod.f, 117]             XSI.CALC_XSI
    Set   [xsi_mod.f, 173]             XSI.CALC_XSI
    Set   [xsi_mod.f, 235]             XSI.CALC_XSI
    Set   [xsi_mod.f, 297]             XSI.CALC_XSI
    Set   [xsi_mod.f, 364]             XSI.CALC_XSI
    Set   [xsi_mod.f, 425]             XSI.CALC_XSI
    Set   [xsi_mod.f, 473]             XSI.CALC_XSI
    Set   [xsi_mod.f, 523]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 567]    XSI.CALC_XSI

XSI.CALC_XSI.XSI_n    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 63]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Set   [xsi_mod.f, 98]              XSI.CALC_XSI
    Set   [xsi_mod.f, 131]             XSI.CALC_XSI
    Set   [xsi_mod.f, 193]             XSI.CALC_XSI
    Set   [xsi_mod.f, 251]             XSI.CALC_XSI
    Set   [xsi_mod.f, 317]             XSI.CALC_XSI
    Set   [xsi_mod.f, 384]             XSI.CALC_XSI
    Set   [xsi_mod.f, 439]             XSI.CALC_XSI
    Set   [xsi_mod.f, 487]             XSI.CALC_XSI
    Set   [xsi_mod.f, 538]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 568]    XSI.CALC_XSI

XSI.CALC_XSI.XSI_t    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 24]           XSI.CALC_XSI
    Declare   [xsi_mod.f, 64]          XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 88]     XSI.CALC_XSI
    Set   [xsi_mod.f, 99]              XSI.CALC_XSI
    Set   [xsi_mod.f, 148]             XSI.CALC_XSI
    Set   [xsi_mod.f, 214]             XSI.CALC_XSI
    Set   [xsi_mod.f, 269]             XSI.CALC_XSI
    Set   [xsi_mod.f, 339]             XSI.CALC_XSI
    Set   [xsi_mod.f, 405]             XSI.CALC_XSI
    Set   [xsi_mod.f, 454]             XSI.CALC_XSI
    Set   [xsi_mod.f, 502]             XSI.CALC_XSI
    Set   [xsi_mod.f, 554]             XSI.CALC_XSI
    Use Argument   [xsi_mod.f, 569]    XSI.CALC_XSI

XSI.CXS.DISCR    (Dummy Argument)  Declared as: INTEGER
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 595]         XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS

XSI.CXS.DWFE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 597]          XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Use Argument   [xsi_mod.f, 674]    XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Use Argument   [xsi_mod.f, 746]    XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS
    Use Argument   [xsi_mod.f, 822]    XSI.CXS

XSI.CXS.DWFN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 597]          XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Use Argument   [xsi_mod.f, 675]    XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Use Argument   [xsi_mod.f, 747]    XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS
    Use Argument   [xsi_mod.f, 823]    XSI.CXS

XSI.CXS.DWFT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 597]          XSI.CXS
    Set   [xsi_mod.f, 669]             XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Use Argument   [xsi_mod.f, 676]    XSI.CXS
    Set   [xsi_mod.f, 740]             XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Use Argument   [xsi_mod.f, 748]    XSI.CXS
    Set   [xsi_mod.f, 813]             XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS
    Use Argument   [xsi_mod.f, 824]    XSI.CXS

XSI.CXS.I    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 595]          XSI.CXS
    Set   [xsi_mod.f, 611]             XSI.CXS
    Use   [xsi_mod.f, 619]             XSI.CXS
    Use   [xsi_mod.f, 620]             XSI.CXS
    Use   [xsi_mod.f, 628]             XSI.CXS
    Use   [xsi_mod.f, 630]             XSI.CXS
    Use   [xsi_mod.f, 631]             XSI.CXS

XSI.CXS.IJK    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 595]          XSI.CXS
    Set   [xsi_mod.f, 609]             XSI.CXS
    Use   [xsi_mod.f, 611]             XSI.CXS
    Use   [xsi_mod.f, 612]             XSI.CXS
    Use   [xsi_mod.f, 612]             XSI.CXS
    Use   [xsi_mod.f, 612]             XSI.CXS
    Use   [xsi_mod.f, 614]             XSI.CXS
    Use   [xsi_mod.f, 615]             XSI.CXS
    Use Argument   [xsi_mod.f, 616]    XSI.CXS
    Use Argument   [xsi_mod.f, 625]    XSI.CXS
    Use   [xsi_mod.f, 626]             XSI.CXS
    Use   [xsi_mod.f, 634]             XSI.CXS
    Use   [xsi_mod.f, 635]             XSI.CXS
    Use Argument   [xsi_mod.f, 636]    XSI.CXS
    Use Argument   [xsi_mod.f, 642]    XSI.CXS
    Use   [xsi_mod.f, 643]             XSI.CXS
    Use   [xsi_mod.f, 651]             XSI.CXS
    Use   [xsi_mod.f, 652]             XSI.CXS
    Use Argument   [xsi_mod.f, 653]    XSI.CXS
    Use Argument   [xsi_mod.f, 656]    XSI.CXS
    Use   [xsi_mod.f, 657]             XSI.CXS
    Use   [xsi_mod.f, 668]             XSI.CXS
    Use   [xsi_mod.f, 672]             XSI.CXS
    Use   [xsi_mod.f, 672]             XSI.CXS
    Use   [xsi_mod.f, 672]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Use   [xsi_mod.f, 674]             XSI.CXS
    Use   [xsi_mod.f, 674]             XSI.CXS
    Use   [xsi_mod.f, 675]             XSI.CXS
    Use   [xsi_mod.f, 675]             XSI.CXS
    Use   [xsi_mod.f, 676]             XSI.CXS
    Use   [xsi_mod.f, 676]             XSI.CXS
    Use   [xsi_mod.f, 678]             XSI.CXS
    Use   [xsi_mod.f, 678]             XSI.CXS
    Use   [xsi_mod.f, 678]             XSI.CXS
    Set   [xsi_mod.f, 687]             XSI.CXS
    Use   [xsi_mod.f, 689]             XSI.CXS
    Use   [xsi_mod.f, 689]             XSI.CXS
    Use   [xsi_mod.f, 689]             XSI.CXS
    Use   [xsi_mod.f, 690]             XSI.CXS
    Use   [xsi_mod.f, 691]             XSI.CXS
    Use Argument   [xsi_mod.f, 692]    XSI.CXS
    Use Argument   [xsi_mod.f, 698]    XSI.CXS
    Use   [xsi_mod.f, 699]             XSI.CXS
    Use   [xsi_mod.f, 706]             XSI.CXS
    Use   [xsi_mod.f, 707]             XSI.CXS
    Use Argument   [xsi_mod.f, 708]    XSI.CXS
    Use Argument   [xsi_mod.f, 714]    XSI.CXS
    Use   [xsi_mod.f, 715]             XSI.CXS
    Use   [xsi_mod.f, 723]             XSI.CXS
    Use   [xsi_mod.f, 724]             XSI.CXS
    Use Argument   [xsi_mod.f, 725]    XSI.CXS
    Use Argument   [xsi_mod.f, 728]    XSI.CXS
    Use   [xsi_mod.f, 729]             XSI.CXS
    Use   [xsi_mod.f, 739]             XSI.CXS
    Use   [xsi_mod.f, 743]             XSI.CXS
    Use   [xsi_mod.f, 743]             XSI.CXS
    Use   [xsi_mod.f, 743]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Use   [xsi_mod.f, 746]             XSI.CXS
    Use   [xsi_mod.f, 746]             XSI.CXS
    Use   [xsi_mod.f, 747]             XSI.CXS
    Use   [xsi_mod.f, 747]             XSI.CXS
    Use   [xsi_mod.f, 748]             XSI.CXS
    Use   [xsi_mod.f, 748]             XSI.CXS
    Use   [xsi_mod.f, 750]             XSI.CXS
    Use   [xsi_mod.f, 750]             XSI.CXS
    Use   [xsi_mod.f, 750]             XSI.CXS
    Set   [xsi_mod.f, 759]             XSI.CXS
    Use   [xsi_mod.f, 761]             XSI.CXS
    Use   [xsi_mod.f, 761]             XSI.CXS
    Use   [xsi_mod.f, 761]             XSI.CXS
    Use   [xsi_mod.f, 762]             XSI.CXS
    Use   [xsi_mod.f, 763]             XSI.CXS
    Use Argument   [xsi_mod.f, 764]    XSI.CXS
    Use Argument   [xsi_mod.f, 771]    XSI.CXS
    Use   [xsi_mod.f, 772]             XSI.CXS
    Use   [xsi_mod.f, 779]             XSI.CXS
    Use   [xsi_mod.f, 780]             XSI.CXS
    Use Argument   [xsi_mod.f, 781]    XSI.CXS
    Use Argument   [xsi_mod.f, 787]    XSI.CXS
    Use   [xsi_mod.f, 788]             XSI.CXS
    Use   [xsi_mod.f, 796]             XSI.CXS
    Use   [xsi_mod.f, 797]             XSI.CXS
    Use Argument   [xsi_mod.f, 798]    XSI.CXS
    Use Argument   [xsi_mod.f, 801]    XSI.CXS
    Use   [xsi_mod.f, 802]             XSI.CXS
    Use   [xsi_mod.f, 812]             XSI.CXS
    Use   [xsi_mod.f, 818]             XSI.CXS
    Use   [xsi_mod.f, 818]             XSI.CXS
    Use   [xsi_mod.f, 818]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS
    Use   [xsi_mod.f, 822]             XSI.CXS
    Use   [xsi_mod.f, 822]             XSI.CXS
    Use   [xsi_mod.f, 823]             XSI.CXS
    Use   [xsi_mod.f, 823]             XSI.CXS
    Use   [xsi_mod.f, 824]             XSI.CXS
    Use   [xsi_mod.f, 824]             XSI.CXS
    Use   [xsi_mod.f, 826]             XSI.CXS
    Use   [xsi_mod.f, 826]             XSI.CXS
    Use   [xsi_mod.f, 826]             XSI.CXS

XSI.CXS.IJKC    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 595]          XSI.CXS
    Set   [xsi_mod.f, 615]             XSI.CXS
    Use Argument   [xsi_mod.f, 617]    XSI.CXS
    Use   [xsi_mod.f, 618]             XSI.CXS
    Set   [xsi_mod.f, 625]             XSI.CXS
    Use Argument   [xsi_mod.f, 627]    XSI.CXS
    Use   [xsi_mod.f, 628]             XSI.CXS
    Set   [xsi_mod.f, 635]             XSI.CXS
    Use Argument   [xsi_mod.f, 637]    XSI.CXS
    Use   [xsi_mod.f, 638]             XSI.CXS
    Set   [xsi_mod.f, 642]             XSI.CXS
    Use Argument   [xsi_mod.f, 644]    XSI.CXS
    Use   [xsi_mod.f, 645]             XSI.CXS
    Set   [xsi_mod.f, 652]             XSI.CXS
    Use Argument   [xsi_mod.f, 654]    XSI.CXS
    Set   [xsi_mod.f, 656]             XSI.CXS
    Use Argument   [xsi_mod.f, 658]    XSI.CXS
    Use   [xsi_mod.f, 660]             XSI.CXS
    Set   [xsi_mod.f, 691]             XSI.CXS
    Use Argument   [xsi_mod.f, 693]    XSI.CXS
    Use   [xsi_mod.f, 694]             XSI.CXS
    Set   [xsi_mod.f, 698]             XSI.CXS
    Use Argument   [xsi_mod.f, 700]    XSI.CXS
    Use   [xsi_mod.f, 701]             XSI.CXS
    Set   [xsi_mod.f, 707]             XSI.CXS
    Use Argument   [xsi_mod.f, 709]    XSI.CXS
    Use   [xsi_mod.f, 710]             XSI.CXS
    Set   [xsi_mod.f, 714]             XSI.CXS
    Use Argument   [xsi_mod.f, 716]    XSI.CXS
    Use   [xsi_mod.f, 717]             XSI.CXS
    Set   [xsi_mod.f, 724]             XSI.CXS
    Use Argument   [xsi_mod.f, 726]    XSI.CXS
    Set   [xsi_mod.f, 728]             XSI.CXS
    Use Argument   [xsi_mod.f, 730]    XSI.CXS
    Use   [xsi_mod.f, 732]             XSI.CXS
    Set   [xsi_mod.f, 763]             XSI.CXS
    Use Argument   [xsi_mod.f, 765]    XSI.CXS
    Use   [xsi_mod.f, 766]             XSI.CXS
    Set   [xsi_mod.f, 771]             XSI.CXS
    Use Argument   [xsi_mod.f, 773]    XSI.CXS
    Use   [xsi_mod.f, 774]             XSI.CXS
    Set   [xsi_mod.f, 780]             XSI.CXS
    Use Argument   [xsi_mod.f, 782]    XSI.CXS
    Use   [xsi_mod.f, 783]             XSI.CXS
    Set   [xsi_mod.f, 787]             XSI.CXS
    Use Argument   [xsi_mod.f, 789]    XSI.CXS
    Use   [xsi_mod.f, 790]             XSI.CXS
    Set   [xsi_mod.f, 797]             XSI.CXS
    Use Argument   [xsi_mod.f, 799]    XSI.CXS
    Set   [xsi_mod.f, 801]             XSI.CXS
    Use Argument   [xsi_mod.f, 803]    XSI.CXS
    Use   [xsi_mod.f, 805]             XSI.CXS

XSI.CXS.IJKD    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 595]          XSI.CXS
    Set   [xsi_mod.f, 616]             XSI.CXS
    Use   [xsi_mod.f, 619]             XSI.CXS
    Set   [xsi_mod.f, 626]             XSI.CXS
    Use   [xsi_mod.f, 629]             XSI.CXS
    Set   [xsi_mod.f, 636]             XSI.CXS
    Use   [xsi_mod.f, 639]             XSI.CXS
    Set   [xsi_mod.f, 643]             XSI.CXS
    Use   [xsi_mod.f, 646]             XSI.CXS
    Set   [xsi_mod.f, 653]             XSI.CXS
    Set   [xsi_mod.f, 657]             XSI.CXS
    Use   [xsi_mod.f, 661]             XSI.CXS
    Set   [xsi_mod.f, 692]             XSI.CXS
    Use   [xsi_mod.f, 695]             XSI.CXS
    Set   [xsi_mod.f, 699]             XSI.CXS
    Use   [xsi_mod.f, 702]             XSI.CXS
    Set   [xsi_mod.f, 708]             XSI.CXS
    Use   [xsi_mod.f, 711]             XSI.CXS
    Set   [xsi_mod.f, 715]             XSI.CXS
    Use   [xsi_mod.f, 718]             XSI.CXS
    Set   [xsi_mod.f, 725]             XSI.CXS
    Set   [xsi_mod.f, 729]             XSI.CXS
    Use   [xsi_mod.f, 733]             XSI.CXS
    Set   [xsi_mod.f, 764]             XSI.CXS
    Use   [xsi_mod.f, 767]             XSI.CXS
    Set   [xsi_mod.f, 772]             XSI.CXS
    Use   [xsi_mod.f, 775]             XSI.CXS
    Set   [xsi_mod.f, 781]             XSI.CXS
    Use   [xsi_mod.f, 784]             XSI.CXS
    Set   [xsi_mod.f, 788]             XSI.CXS
    Use   [xsi_mod.f, 791]             XSI.CXS
    Set   [xsi_mod.f, 798]             XSI.CXS
    Set   [xsi_mod.f, 802]             XSI.CXS
    Use   [xsi_mod.f, 806]             XSI.CXS

XSI.CXS.IJKU    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 595]          XSI.CXS
    Set   [xsi_mod.f, 617]             XSI.CXS
    Use   [xsi_mod.f, 620]             XSI.CXS
    Set   [xsi_mod.f, 627]             XSI.CXS
    Use   [xsi_mod.f, 630]             XSI.CXS
    Set   [xsi_mod.f, 637]             XSI.CXS
    Use   [xsi_mod.f, 640]             XSI.CXS
    Set   [xsi_mod.f, 644]             XSI.CXS
    Use   [xsi_mod.f, 647]             XSI.CXS
    Set   [xsi_mod.f, 654]             XSI.CXS
    Set   [xsi_mod.f, 658]             XSI.CXS
    Use   [xsi_mod.f, 662]             XSI.CXS
    Set   [xsi_mod.f, 693]             XSI.CXS
    Use   [xsi_mod.f, 696]             XSI.CXS
    Set   [xsi_mod.f, 700]             XSI.CXS
    Use   [xsi_mod.f, 703]             XSI.CXS
    Set   [xsi_mod.f, 709]             XSI.CXS
    Use   [xsi_mod.f, 712]             XSI.CXS
    Set   [xsi_mod.f, 716]             XSI.CXS
    Use   [xsi_mod.f, 719]             XSI.CXS
    Set   [xsi_mod.f, 726]             XSI.CXS
    Set   [xsi_mod.f, 730]             XSI.CXS
    Use   [xsi_mod.f, 734]             XSI.CXS
    Set   [xsi_mod.f, 765]             XSI.CXS
    Use   [xsi_mod.f, 768]             XSI.CXS
    Set   [xsi_mod.f, 773]             XSI.CXS
    Use   [xsi_mod.f, 776]             XSI.CXS
    Set   [xsi_mod.f, 782]             XSI.CXS
    Use   [xsi_mod.f, 785]             XSI.CXS
    Set   [xsi_mod.f, 789]             XSI.CXS
    Use   [xsi_mod.f, 792]             XSI.CXS
    Set   [xsi_mod.f, 799]             XSI.CXS
    Set   [xsi_mod.f, 803]             XSI.CXS
    Use   [xsi_mod.f, 807]             XSI.CXS

XSI.CXS.incr    (Dummy Argument)  Declared as: INTEGER
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 595]         XSI.CXS
    Use   [xsi_mod.f, 603]             XSI.CXS
    Use   [xsi_mod.f, 682]             XSI.CXS
    Use   [xsi_mod.f, 754]             XSI.CXS

XSI.CXS.PHI    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 597]         XSI.CXS
    Use   [xsi_mod.f, 618]             XSI.CXS
    Use   [xsi_mod.f, 619]             XSI.CXS
    Use   [xsi_mod.f, 620]             XSI.CXS
    Use   [xsi_mod.f, 628]             XSI.CXS
    Use   [xsi_mod.f, 629]             XSI.CXS
    Use   [xsi_mod.f, 630]             XSI.CXS
    Use   [xsi_mod.f, 638]             XSI.CXS
    Use   [xsi_mod.f, 639]             XSI.CXS
    Use   [xsi_mod.f, 640]             XSI.CXS
    Use   [xsi_mod.f, 645]             XSI.CXS
    Use   [xsi_mod.f, 646]             XSI.CXS
    Use   [xsi_mod.f, 647]             XSI.CXS
    Use   [xsi_mod.f, 660]             XSI.CXS
    Use   [xsi_mod.f, 661]             XSI.CXS
    Use   [xsi_mod.f, 662]             XSI.CXS
    Use   [xsi_mod.f, 694]             XSI.CXS
    Use   [xsi_mod.f, 695]             XSI.CXS
    Use   [xsi_mod.f, 696]             XSI.CXS
    Use   [xsi_mod.f, 701]             XSI.CXS
    Use   [xsi_mod.f, 702]             XSI.CXS
    Use   [xsi_mod.f, 703]             XSI.CXS
    Use   [xsi_mod.f, 710]             XSI.CXS
    Use   [xsi_mod.f, 711]             XSI.CXS
    Use   [xsi_mod.f, 712]             XSI.CXS
    Use   [xsi_mod.f, 717]             XSI.CXS
    Use   [xsi_mod.f, 718]             XSI.CXS
    Use   [xsi_mod.f, 719]             XSI.CXS
    Use   [xsi_mod.f, 732]             XSI.CXS
    Use   [xsi_mod.f, 733]             XSI.CXS
    Use   [xsi_mod.f, 734]             XSI.CXS
    Use   [xsi_mod.f, 766]             XSI.CXS
    Use   [xsi_mod.f, 767]             XSI.CXS
    Use   [xsi_mod.f, 768]             XSI.CXS
    Use   [xsi_mod.f, 774]             XSI.CXS
    Use   [xsi_mod.f, 775]             XSI.CXS
    Use   [xsi_mod.f, 776]             XSI.CXS
    Use   [xsi_mod.f, 783]             XSI.CXS
    Use   [xsi_mod.f, 784]             XSI.CXS
    Use   [xsi_mod.f, 785]             XSI.CXS
    Use   [xsi_mod.f, 790]             XSI.CXS
    Use   [xsi_mod.f, 791]             XSI.CXS
    Use   [xsi_mod.f, 792]             XSI.CXS
    Use   [xsi_mod.f, 805]             XSI.CXS
    Use   [xsi_mod.f, 806]             XSI.CXS
    Use   [xsi_mod.f, 807]             XSI.CXS

XSI.CXS.PHICU    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 598]          XSI.CXS
    Set   [xsi_mod.f, 618]             XSI.CXS
    Set   [xsi_mod.f, 628]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Set   [xsi_mod.f, 694]             XSI.CXS
    Set   [xsi_mod.f, 701]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Set   [xsi_mod.f, 766]             XSI.CXS
    Set   [xsi_mod.f, 774]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS

XSI.CXS.PHICV    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 598]          XSI.CXS
    Set   [xsi_mod.f, 638]             XSI.CXS
    Set   [xsi_mod.f, 645]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Set   [xsi_mod.f, 710]             XSI.CXS
    Set   [xsi_mod.f, 717]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Set   [xsi_mod.f, 783]             XSI.CXS
    Set   [xsi_mod.f, 790]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS

XSI.CXS.PHICW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 599]          XSI.CXS
    Set   [xsi_mod.f, 660]             XSI.CXS
    Set   [xsi_mod.f, 665]             XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Set   [xsi_mod.f, 732]             XSI.CXS
    Set   [xsi_mod.f, 736]             XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Set   [xsi_mod.f, 805]             XSI.CXS
    Set   [xsi_mod.f, 809]             XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS

XSI.CXS.PHIDU    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 598]          XSI.CXS
    Set   [xsi_mod.f, 619]             XSI.CXS
    Set   [xsi_mod.f, 629]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Set   [xsi_mod.f, 695]             XSI.CXS
    Set   [xsi_mod.f, 702]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Set   [xsi_mod.f, 767]             XSI.CXS
    Set   [xsi_mod.f, 775]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS

XSI.CXS.PHIDV    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 598]          XSI.CXS
    Set   [xsi_mod.f, 639]             XSI.CXS
    Set   [xsi_mod.f, 646]             XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Set   [xsi_mod.f, 711]             XSI.CXS
    Set   [xsi_mod.f, 718]             XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Set   [xsi_mod.f, 784]             XSI.CXS
    Set   [xsi_mod.f, 791]             XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS

XSI.CXS.PHIDW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 599]          XSI.CXS
    Set   [xsi_mod.f, 661]             XSI.CXS
    Set   [xsi_mod.f, 666]             XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Set   [xsi_mod.f, 733]             XSI.CXS
    Set   [xsi_mod.f, 737]             XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Set   [xsi_mod.f, 806]             XSI.CXS
    Set   [xsi_mod.f, 810]             XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS

XSI.CXS.PHIUU    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 598]          XSI.CXS
    Set   [xsi_mod.f, 620]             XSI.CXS
    Set   [xsi_mod.f, 630]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Set   [xsi_mod.f, 696]             XSI.CXS
    Set   [xsi_mod.f, 703]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Set   [xsi_mod.f, 768]             XSI.CXS
    Set   [xsi_mod.f, 776]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS

XSI.CXS.PHIUV    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 598]          XSI.CXS
    Set   [xsi_mod.f, 640]             XSI.CXS
    Set   [xsi_mod.f, 647]             XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Set   [xsi_mod.f, 712]             XSI.CXS
    Set   [xsi_mod.f, 719]             XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Set   [xsi_mod.f, 785]             XSI.CXS
    Set   [xsi_mod.f, 792]             XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS

XSI.CXS.PHIUW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 599]          XSI.CXS
    Set   [xsi_mod.f, 662]             XSI.CXS
    Set   [xsi_mod.f, 667]             XSI.CXS
    Use Argument   [xsi_mod.f, 673]    XSI.CXS
    Set   [xsi_mod.f, 734]             XSI.CXS
    Set   [xsi_mod.f, 738]             XSI.CXS
    Use Argument   [xsi_mod.f, 744]    XSI.CXS
    Set   [xsi_mod.f, 807]             XSI.CXS
    Set   [xsi_mod.f, 811]             XSI.CXS
    Use Argument   [xsi_mod.f, 819]    XSI.CXS

XSI.CXS.SRT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 601]          XSI.CXS
    Set   [xsi_mod.f, 604]             XSI.CXS
    Use   [xsi_mod.f, 619]             XSI.CXS
    Use   [xsi_mod.f, 620]             XSI.CXS
    Use   [xsi_mod.f, 628]             XSI.CXS
    Use   [xsi_mod.f, 630]             XSI.CXS
    Use   [xsi_mod.f, 631]             XSI.CXS

XSI.CXS.U    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 596]         XSI.CXS
    Use   [xsi_mod.f, 614]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Use Argument   [xsi_mod.f, 674]    XSI.CXS
    Use   [xsi_mod.f, 690]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Use Argument   [xsi_mod.f, 746]    XSI.CXS
    Use   [xsi_mod.f, 762]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS
    Use Argument   [xsi_mod.f, 822]    XSI.CXS

XSI.CXS.V    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 596]         XSI.CXS
    Set   [xsi_mod.f, 612]             XSI.CXS
    Use   [xsi_mod.f, 612]             XSI.CXS
    Use   [xsi_mod.f, 634]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Use Argument   [xsi_mod.f, 675]    XSI.CXS
    Set   [xsi_mod.f, 678]             XSI.CXS
    Use   [xsi_mod.f, 678]             XSI.CXS
    Set   [xsi_mod.f, 689]             XSI.CXS
    Use   [xsi_mod.f, 689]             XSI.CXS
    Use   [xsi_mod.f, 706]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Use Argument   [xsi_mod.f, 747]    XSI.CXS
    Set   [xsi_mod.f, 750]             XSI.CXS
    Use   [xsi_mod.f, 750]             XSI.CXS
    Set   [xsi_mod.f, 761]             XSI.CXS
    Use   [xsi_mod.f, 761]             XSI.CXS
    Use   [xsi_mod.f, 779]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS
    Use Argument   [xsi_mod.f, 823]    XSI.CXS
    Set   [xsi_mod.f, 826]             XSI.CXS
    Use   [xsi_mod.f, 826]             XSI.CXS

XSI.CXS.W    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 596]         XSI.CXS
    Use   [xsi_mod.f, 651]             XSI.CXS
    Set   [xsi_mod.f, 668]             XSI.CXS
    Use Argument   [xsi_mod.f, 672]    XSI.CXS
    Use Argument   [xsi_mod.f, 676]    XSI.CXS
    Use   [xsi_mod.f, 723]             XSI.CXS
    Set   [xsi_mod.f, 739]             XSI.CXS
    Use Argument   [xsi_mod.f, 743]    XSI.CXS
    Use Argument   [xsi_mod.f, 748]    XSI.CXS
    Use   [xsi_mod.f, 796]             XSI.CXS
    Set   [xsi_mod.f, 812]             XSI.CXS
    Use Argument   [xsi_mod.f, 818]    XSI.CXS
    Use Argument   [xsi_mod.f, 824]    XSI.CXS

XSI.CXS.XSI_E    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 600]         XSI.CXS
    Set   [xsi_mod.f, 674]             XSI.CXS
    Set   [xsi_mod.f, 746]             XSI.CXS
    Set   [xsi_mod.f, 822]             XSI.CXS
    Use Argument   [xsi_mod.f, 833]    XSI.CXS

XSI.CXS.XSI_N    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 600]         XSI.CXS
    Set   [xsi_mod.f, 675]             XSI.CXS
    Set   [xsi_mod.f, 747]             XSI.CXS
    Set   [xsi_mod.f, 823]             XSI.CXS
    Use Argument   [xsi_mod.f, 834]    XSI.CXS

XSI.CXS.XSI_T    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 580]          XSI.CXS
    Declare   [xsi_mod.f, 601]         XSI.CXS
    Set   [xsi_mod.f, 676]             XSI.CXS
    Set   [xsi_mod.f, 748]             XSI.CXS
    Set   [xsi_mod.f, 824]             XSI.CXS
    Use Argument   [xsi_mod.f, 835]    XSI.CXS

XSI.DW.CF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 886]          XSI.DW
    Set   [xsi_mod.f, 927]             XSI.DW
    Use Argument   [xsi_mod.f, 928]    XSI.DW
    Set   [xsi_mod.f, 931]             XSI.DW
    Use Argument   [xsi_mod.f, 932]    XSI.DW
    Set   [xsi_mod.f, 938]             XSI.DW
    Use Argument   [xsi_mod.f, 939]    XSI.DW
    Set   [xsi_mod.f, 955]             XSI.DW
    Use Argument   [xsi_mod.f, 956]    XSI.DW
    Set   [xsi_mod.f, 968]             XSI.DW
    Use Argument   [xsi_mod.f, 969]    XSI.DW
    Set   [xsi_mod.f, 982]             XSI.DW
    Use Argument   [xsi_mod.f, 983]    XSI.DW

XSI.DW.DISCR    (Dummy Argument)  Declared as: INTEGER
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 872]         XSI.DW
    Use   [xsi_mod.f, 889]             XSI.DW
    Use   [xsi_mod.f, 1023]            XSI.DW

XSI.DW.DWFE    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 880]         XSI.DW
    Set   [xsi_mod.f, 892]             XSI.DW
    Set   [xsi_mod.f, 897]             XSI.DW
    Set   [xsi_mod.f, 910]             XSI.DW
    Set   [xsi_mod.f, 928]             XSI.DW
    Set   [xsi_mod.f, 956]             XSI.DW
    Set   [xsi_mod.f, 988]             XSI.DW
    Set   [xsi_mod.f, 1001]            XSI.DW
    Set   [xsi_mod.f, 1013]            XSI.DW

XSI.DW.DWFN    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 881]         XSI.DW
    Set   [xsi_mod.f, 893]             XSI.DW
    Set   [xsi_mod.f, 900]             XSI.DW
    Set   [xsi_mod.f, 913]             XSI.DW
    Set   [xsi_mod.f, 932]             XSI.DW
    Set   [xsi_mod.f, 969]             XSI.DW
    Set   [xsi_mod.f, 991]             XSI.DW
    Set   [xsi_mod.f, 1004]            XSI.DW
    Set   [xsi_mod.f, 1016]            XSI.DW

XSI.DW.DWFT    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 882]         XSI.DW
    Set   [xsi_mod.f, 894]             XSI.DW
    Set   [xsi_mod.f, 904]             XSI.DW
    Set   [xsi_mod.f, 917]             XSI.DW
    Set   [xsi_mod.f, 939]             XSI.DW
    Set   [xsi_mod.f, 983]             XSI.DW
    Set   [xsi_mod.f, 995]             XSI.DW
    Set   [xsi_mod.f, 1008]            XSI.DW
    Set   [xsi_mod.f, 1020]            XSI.DW

XSI.DW.DZUC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 886]          XSI.DW
    Set   [xsi_mod.f, 978]             XSI.DW

XSI.DW.I    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 875]          XSI.DW
    Set   [xsi_mod.f, 922]             XSI.DW
    Use   [xsi_mod.f, 927]             XSI.DW
    Use   [xsi_mod.f, 938]             XSI.DW
    Set   [xsi_mod.f, 943]             XSI.DW
    Use   [xsi_mod.f, 947]             XSI.DW
    Use   [xsi_mod.f, 948]             XSI.DW
    Use   [xsi_mod.f, 950]             XSI.DW
    Use   [xsi_mod.f, 951]             XSI.DW
    Use   [xsi_mod.f, 955]             XSI.DW
    Use   [xsi_mod.f, 956]             XSI.DW
    Use   [xsi_mod.f, 982]             XSI.DW

XSI.DW.IJK    (Dummy Argument)  Declared as: INTEGER
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 875]         XSI.DW
    Use   [xsi_mod.f, 922]             XSI.DW
    Use   [xsi_mod.f, 923]             XSI.DW
    Use   [xsi_mod.f, 936]             XSI.DW
    Use   [xsi_mod.f, 943]             XSI.DW
    Use   [xsi_mod.f, 944]             XSI.DW
    Use   [xsi_mod.f, 972]             XSI.DW

XSI.DW.J    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 875]          XSI.DW
    Set   [xsi_mod.f, 923]             XSI.DW
    Use   [xsi_mod.f, 931]             XSI.DW
    Set   [xsi_mod.f, 944]             XSI.DW
    Use   [xsi_mod.f, 960]             XSI.DW
    Use   [xsi_mod.f, 961]             XSI.DW
    Use   [xsi_mod.f, 963]             XSI.DW
    Use   [xsi_mod.f, 964]             XSI.DW
    Use   [xsi_mod.f, 968]             XSI.DW
    Use   [xsi_mod.f, 969]             XSI.DW

XSI.DW.K    (Local Variable)  Declared as: INTEGER
    Define   [xsi_mod.f, 875]          XSI.DW
    Set   [xsi_mod.f, 936]             XSI.DW
    Use   [xsi_mod.f, 938]             XSI.DW
    Set   [xsi_mod.f, 972]             XSI.DW
    Use   [xsi_mod.f, 974]             XSI.DW
    Use   [xsi_mod.f, 975]             XSI.DW
    Use   [xsi_mod.f, 977]             XSI.DW
    Use   [xsi_mod.f, 978]             XSI.DW
    Use   [xsi_mod.f, 982]             XSI.DW
    Use   [xsi_mod.f, 983]             XSI.DW

XSI.DW.oDXc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 885]          XSI.DW
    Set   [xsi_mod.f, 947]             XSI.DW
    Set   [xsi_mod.f, 950]             XSI.DW
    Use Argument   [xsi_mod.f, 956]    XSI.DW

XSI.DW.oDXuc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 885]          XSI.DW
    Set   [xsi_mod.f, 948]             XSI.DW
    Set   [xsi_mod.f, 951]             XSI.DW
    Use Argument   [xsi_mod.f, 956]    XSI.DW

XSI.DW.oDYc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 885]          XSI.DW
    Set   [xsi_mod.f, 960]             XSI.DW
    Set   [xsi_mod.f, 963]             XSI.DW
    Use Argument   [xsi_mod.f, 969]    XSI.DW

XSI.DW.oDYuc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 885]          XSI.DW
    Set   [xsi_mod.f, 961]             XSI.DW
    Set   [xsi_mod.f, 964]             XSI.DW
    Use Argument   [xsi_mod.f, 969]    XSI.DW

XSI.DW.oDZc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 885]          XSI.DW
    Set   [xsi_mod.f, 974]             XSI.DW
    Set   [xsi_mod.f, 977]             XSI.DW
    Use Argument   [xsi_mod.f, 983]    XSI.DW

XSI.DW.oDZuc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 885]          XSI.DW
    Set   [xsi_mod.f, 975]             XSI.DW
    Use Argument   [xsi_mod.f, 983]    XSI.DW

XSI.DW.PHI_C    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 877]          XSI.DW
    Set   [xsi_mod.f, 896]             XSI.DW
    Use Argument   [xsi_mod.f, 897]    XSI.DW
    Set   [xsi_mod.f, 899]             XSI.DW
    Use Argument   [xsi_mod.f, 900]    XSI.DW
    Set   [xsi_mod.f, 903]             XSI.DW
    Use Argument   [xsi_mod.f, 904]    XSI.DW
    Set   [xsi_mod.f, 909]             XSI.DW
    Use Argument   [xsi_mod.f, 910]    XSI.DW
    Set   [xsi_mod.f, 912]             XSI.DW
    Use Argument   [xsi_mod.f, 913]    XSI.DW
    Set   [xsi_mod.f, 916]             XSI.DW
    Use Argument   [xsi_mod.f, 917]    XSI.DW
    Set   [xsi_mod.f, 926]             XSI.DW
    Use Argument   [xsi_mod.f, 928]    XSI.DW
    Set   [xsi_mod.f, 930]             XSI.DW
    Use Argument   [xsi_mod.f, 932]    XSI.DW
    Set   [xsi_mod.f, 937]             XSI.DW
    Use Argument   [xsi_mod.f, 939]    XSI.DW
    Set   [xsi_mod.f, 954]             XSI.DW
    Use Argument   [xsi_mod.f, 956]    XSI.DW
    Set   [xsi_mod.f, 967]             XSI.DW
    Use Argument   [xsi_mod.f, 969]    XSI.DW
    Set   [xsi_mod.f, 981]             XSI.DW
    Use Argument   [xsi_mod.f, 983]    XSI.DW
    Set   [xsi_mod.f, 987]             XSI.DW
    Use Argument   [xsi_mod.f, 988]    XSI.DW
    Set   [xsi_mod.f, 990]             XSI.DW
    Use Argument   [xsi_mod.f, 991]    XSI.DW
    Set   [xsi_mod.f, 994]             XSI.DW
    Use Argument   [xsi_mod.f, 995]    XSI.DW
    Set   [xsi_mod.f, 1000]            XSI.DW
    Use Argument   [xsi_mod.f, 1001]   XSI.DW
    Set   [xsi_mod.f, 1003]            XSI.DW
    Use Argument   [xsi_mod.f, 1004]   XSI.DW
    Set   [xsi_mod.f, 1007]            XSI.DW
    Use Argument   [xsi_mod.f, 1008]   XSI.DW
    Set   [xsi_mod.f, 1012]            XSI.DW
    Use Argument   [xsi_mod.f, 1013]   XSI.DW
    Set   [xsi_mod.f, 1015]            XSI.DW
    Use Argument   [xsi_mod.f, 1016]   XSI.DW
    Set   [xsi_mod.f, 1019]            XSI.DW
    Use Argument   [xsi_mod.f, 1020]   XSI.DW

XSI.DW.PHICU    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 880]         XSI.DW
    Use Argument   [xsi_mod.f, 896]    XSI.DW
    Use Argument   [xsi_mod.f, 909]    XSI.DW
    Use Argument   [xsi_mod.f, 926]    XSI.DW
    Use Argument   [xsi_mod.f, 954]    XSI.DW
    Use Argument   [xsi_mod.f, 987]    XSI.DW
    Use Argument   [xsi_mod.f, 1000]   XSI.DW
    Use Argument   [xsi_mod.f, 1012]   XSI.DW

XSI.DW.PHICV    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 881]         XSI.DW
    Use Argument   [xsi_mod.f, 899]    XSI.DW
    Use Argument   [xsi_mod.f, 912]    XSI.DW
    Use Argument   [xsi_mod.f, 930]    XSI.DW
    Use Argument   [xsi_mod.f, 967]    XSI.DW
    Use Argument   [xsi_mod.f, 990]    XSI.DW
    Use Argument   [xsi_mod.f, 1003]   XSI.DW
    Use Argument   [xsi_mod.f, 1015]   XSI.DW

XSI.DW.PHICW    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 882]         XSI.DW
    Use Argument   [xsi_mod.f, 903]    XSI.DW
    Use Argument   [xsi_mod.f, 916]    XSI.DW
    Use Argument   [xsi_mod.f, 937]    XSI.DW
    Use Argument   [xsi_mod.f, 981]    XSI.DW
    Use Argument   [xsi_mod.f, 994]    XSI.DW
    Use Argument   [xsi_mod.f, 1007]   XSI.DW
    Use Argument   [xsi_mod.f, 1019]   XSI.DW

XSI.DW.PHIDU    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 880]         XSI.DW
    Use Argument   [xsi_mod.f, 896]    XSI.DW
    Use Argument   [xsi_mod.f, 909]    XSI.DW
    Use Argument   [xsi_mod.f, 926]    XSI.DW
    Use Argument   [xsi_mod.f, 954]    XSI.DW
    Use Argument   [xsi_mod.f, 987]    XSI.DW
    Use Argument   [xsi_mod.f, 1000]   XSI.DW
    Use Argument   [xsi_mod.f, 1012]   XSI.DW

XSI.DW.PHIDV    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 881]         XSI.DW
    Use Argument   [xsi_mod.f, 899]    XSI.DW
    Use Argument   [xsi_mod.f, 912]    XSI.DW
    Use Argument   [xsi_mod.f, 930]    XSI.DW
    Use Argument   [xsi_mod.f, 967]    XSI.DW
    Use Argument   [xsi_mod.f, 990]    XSI.DW
    Use Argument   [xsi_mod.f, 1003]   XSI.DW
    Use Argument   [xsi_mod.f, 1015]   XSI.DW

XSI.DW.PHIDW    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 882]         XSI.DW
    Use Argument   [xsi_mod.f, 903]    XSI.DW
    Use Argument   [xsi_mod.f, 916]    XSI.DW
    Use Argument   [xsi_mod.f, 937]    XSI.DW
    Use Argument   [xsi_mod.f, 981]    XSI.DW
    Use Argument   [xsi_mod.f, 994]    XSI.DW
    Use Argument   [xsi_mod.f, 1007]   XSI.DW
    Use Argument   [xsi_mod.f, 1019]   XSI.DW

XSI.DW.PHIUU    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 880]         XSI.DW
    Use Argument   [xsi_mod.f, 896]    XSI.DW
    Use Argument   [xsi_mod.f, 909]    XSI.DW
    Use Argument   [xsi_mod.f, 926]    XSI.DW
    Use Argument   [xsi_mod.f, 954]    XSI.DW
    Use Argument   [xsi_mod.f, 987]    XSI.DW
    Use Argument   [xsi_mod.f, 1000]   XSI.DW
    Use Argument   [xsi_mod.f, 1012]   XSI.DW

XSI.DW.PHIUV    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 881]         XSI.DW
    Use Argument   [xsi_mod.f, 899]    XSI.DW
    Use Argument   [xsi_mod.f, 912]    XSI.DW
    Use Argument   [xsi_mod.f, 930]    XSI.DW
    Use Argument   [xsi_mod.f, 967]    XSI.DW
    Use Argument   [xsi_mod.f, 990]    XSI.DW
    Use Argument   [xsi_mod.f, 1003]   XSI.DW
    Use Argument   [xsi_mod.f, 1015]   XSI.DW

XSI.DW.PHIUW    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 852]          XSI.DW
    Declare   [xsi_mod.f, 882]         XSI.DW
    Use Argument   [xsi_mod.f, 903]    XSI.DW
    Use Argument   [xsi_mod.f, 916]    XSI.DW
    Use Argument   [xsi_mod.f, 937]    XSI.DW
    Use Argument   [xsi_mod.f, 981]    XSI.DW
    Use Argument   [xsi_mod.f, 994]    XSI.DW
    Use Argument   [xsi_mod.f, 1007]   XSI.DW
    Use Argument   [xsi_mod.f, 1019]   XSI.DW

XSI.DW.UU    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 880]         XSI.DW
    Use Argument   [xsi_mod.f, 927]    XSI.DW
    Use   [xsi_mod.f, 946]             XSI.DW
    Use Argument   [xsi_mod.f, 955]    XSI.DW

XSI.DW.VV    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 881]         XSI.DW
    Use Argument   [xsi_mod.f, 931]    XSI.DW
    Use   [xsi_mod.f, 958]             XSI.DW
    Use Argument   [xsi_mod.f, 968]    XSI.DW

XSI.DW.WW    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 851]          XSI.DW
    Declare   [xsi_mod.f, 882]         XSI.DW
    Use Argument   [xsi_mod.f, 938]    XSI.DW
    Use   [xsi_mod.f, 973]             XSI.DW
    Use Argument   [xsi_mod.f, 982]    XSI.DW

XSI.XSI_func.XXXdwf    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 1040]         XSI.XSI_func
    Declare   [xsi_mod.f, 1042]        XSI.XSI_func
    Use   [xsi_mod.f, 1044]            XSI.XSI_func

XSI.XSI_func.XXXv    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [xsi_mod.f, 1040]         XSI.XSI_func
    Declare   [xsi_mod.f, 1042]        XSI.XSI_func
    Use   [xsi_mod.f, 1043]            XSI.XSI_func
    Use Argument   [xsi_mod.f, 1044]   XSI.XSI_func

xsi_array.lock_xsi_array.myPE    (Local Variable)  Declared as: INTEGER (implicit)
    Use   [xsi_array_mod.f, 29]        xsi_array.lock_xsi_array

xsi_array.xsi_array_locked    (Variable)  Declared as: LOGICAL
    Define   [xsi_array_mod.f, 23]     xsi_array
    Set   [xsi_array_mod.f, 23]        xsi_array
    Use   [xsi_array_mod.f, 27]        xsi_array.lock_xsi_array
    Set   [xsi_array_mod.f, 31]        xsi_array.lock_xsi_array
    Set   [xsi_array_mod.f, 36]        xsi_array.unlock_xsi_array

xsi_array.XSI_e    (Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [xsi_array_mod.f, 16]     xsi_array
    Set   [allocate_arrays.f, 285]     ALLOCATE_ARRAYS
    Use Argument   [conv_rop_s.f, 244]   CONV_ROP_S1
    Use   [conv_rop_s.f, 264]          CONV_ROP_S1
    Use   [conv_rop_s.f, 265]          CONV_ROP_S1
    Use   [conv_rop_s.f, 278]          CONV_ROP_S1
    Use Argument   [check_mass_balance.f, 737]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 752]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 752]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 757]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 757]   Calc_mass_flux_spHR
    Use Argument   [conv_dif_phi.f, 841]   CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 896]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 898]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 963]        CONV_DIF_PHI1
    Use Argument   [conv_dif_phi.f, 529]   CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 592]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 592]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 657]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 657]        CONV_DIF_PHI_DC
    Use Argument   [conv_dif_u_s.f, 889]   STORE_A_U_S1
    Use   [conv_dif_u_s.f, 941]        STORE_A_U_S1
    Use   [conv_dif_u_s.f, 942]        STORE_A_U_S1
    Use   [conv_dif_u_s.f, 1006]       STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 512]   STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 574]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 575]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 659]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 660]        STORE_A_U_SDC
    Use Argument   [conv_rop.f, 285]   CONV_ROP1
    Use   [conv_rop.f, 300]            CONV_ROP1
    Use   [conv_rop.f, 300]            CONV_ROP1
    Use   [conv_rop.f, 314]            CONV_ROP1
    Use   [conv_rop.f, 314]            CONV_ROP1
    Use Argument   [conv_dif_w_g.f, 991]   STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1059]       STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1061]       STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1129]       STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 567]   STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 640]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 641]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 738]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 739]        STORE_A_W_GDC
    Use Argument   [conv_source_epp.f, 405]   CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 451]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 451]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 452]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 455]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 460]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 460]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 462]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 464]     CONV_SOURCE_EPP1
    Use Argument   [conv_dif_w_s.f, 875]   STORE_A_W_S1
    Use   [conv_dif_w_s.f, 935]        STORE_A_W_S1
    Use   [conv_dif_w_s.f, 936]        STORE_A_W_S1
    Use   [conv_dif_w_s.f, 997]        STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 506]   STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 570]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 571]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 653]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 654]        STORE_A_W_SDC
    Use Argument   [conv_dif_v_g.f, 1008]   STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1072]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1074]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1152]       STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 584]   STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 653]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 653]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 756]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 756]        STORE_A_V_GDC
    Use Argument   [conv_dif_v_s.f, 888]   STORE_A_V_S1
    Use   [conv_dif_v_s.f, 945]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 946]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 1012]       STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 509]   STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 571]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 572]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 660]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 661]        STORE_A_V_SDC
    Use Argument   [conv_rop_g.f, 223]   CONV_ROP_G1
    Use   [conv_rop_g.f, 244]          CONV_ROP_G1
    Use   [conv_rop_g.f, 245]          CONV_ROP_G1
    Use   [conv_rop_g.f, 260]          CONV_ROP_G1
    Use Argument   [conv_dif_u_g.f, 1023]   STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1083]       STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1085]       STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1163]       STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 586]   STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 651]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 652]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 756]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 757]        STORE_A_U_GDC

xsi_array.XSI_n    (Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [xsi_array_mod.f, 16]     xsi_array
    Set   [allocate_arrays.f, 286]     ALLOCATE_ARRAYS
    Use Argument   [conv_rop_s.f, 244]   CONV_ROP_S1
    Use   [conv_rop_s.f, 268]          CONV_ROP_S1
    Use   [conv_rop_s.f, 269]          CONV_ROP_S1
    Use   [conv_rop_s.f, 280]          CONV_ROP_S1
    Use Argument   [check_mass_balance.f, 737]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 762]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 762]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 767]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 767]   Calc_mass_flux_spHR
    Use Argument   [conv_dif_phi.f, 841]   CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 915]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 917]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 986]        CONV_DIF_PHI1
    Use Argument   [conv_dif_phi.f, 529]   CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 611]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 611]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 678]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 678]        CONV_DIF_PHI_DC
    Use Argument   [conv_dif_u_s.f, 889]   STORE_A_U_S1
    Use   [conv_dif_u_s.f, 961]        STORE_A_U_S1
    Use   [conv_dif_u_s.f, 962]        STORE_A_U_S1
    Use   [conv_dif_u_s.f, 1032]       STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 512]   STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 599]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 600]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 689]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 690]        STORE_A_U_SDC
    Use Argument   [conv_rop.f, 285]   CONV_ROP1
    Use   [conv_rop.f, 303]            CONV_ROP1
    Use   [conv_rop.f, 303]            CONV_ROP1
    Use   [conv_rop.f, 321]            CONV_ROP1
    Use   [conv_rop.f, 321]            CONV_ROP1
    Use Argument   [conv_dif_w_g.f, 991]   STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1082]       STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1084]       STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1156]       STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 567]   STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 671]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 672]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 774]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 775]        STORE_A_W_GDC
    Use Argument   [conv_source_epp.f, 405]   CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 470]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 470]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 471]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 474]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 480]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 480]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 482]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 484]     CONV_SOURCE_EPP1
    Use Argument   [conv_dif_w_s.f, 875]   STORE_A_W_S1
    Use   [conv_dif_w_s.f, 955]        STORE_A_W_S1
    Use   [conv_dif_w_s.f, 956]        STORE_A_W_S1
    Use   [conv_dif_w_s.f, 1023]       STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 506]   STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 596]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 597]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 684]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 685]        STORE_A_W_SDC
    Use Argument   [conv_dif_v_g.f, 1008]   STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1093]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1095]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1177]       STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 584]   STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 683]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 683]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 789]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 789]        STORE_A_V_GDC
    Use Argument   [conv_dif_v_s.f, 888]   STORE_A_V_S1
    Use   [conv_dif_v_s.f, 961]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 962]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 1032]       STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 509]   STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 597]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 598]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 689]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 690]        STORE_A_V_SDC
    Use Argument   [conv_rop_g.f, 224]   CONV_ROP_G1
    Use   [conv_rop_g.f, 248]          CONV_ROP_G1
    Use   [conv_rop_g.f, 249]          CONV_ROP_G1
    Use   [conv_rop_g.f, 262]          CONV_ROP_G1
    Use Argument   [conv_dif_u_g.f, 1023]   STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1107]       STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1109]       STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1192]       STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 586]   STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 682]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 683]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 793]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 794]        STORE_A_U_GDC

xsi_array.XSI_t    (Variable)  Declared as: DOUBLE PRECISION ALLOCATABLE
    Define   [xsi_array_mod.f, 16]     xsi_array
    Set   [allocate_arrays.f, 287]     ALLOCATE_ARRAYS
    Use Argument   [conv_rop_s.f, 244]   CONV_ROP_S1
    Use   [conv_rop_s.f, 273]          CONV_ROP_S1
    Use   [conv_rop_s.f, 274]          CONV_ROP_S1
    Use   [conv_rop_s.f, 283]          CONV_ROP_S1
    Use Argument   [check_mass_balance.f, 737]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 772]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 772]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 777]   Calc_mass_flux_spHR
    Use   [check_mass_balance.f, 777]   Calc_mass_flux_spHR
    Use Argument   [conv_dif_phi.f, 841]   CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 938]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 940]        CONV_DIF_PHI1
    Use   [conv_dif_phi.f, 1010]       CONV_DIF_PHI1
    Use Argument   [conv_dif_phi.f, 529]   CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 633]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 633]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 699]        CONV_DIF_PHI_DC
    Use   [conv_dif_phi.f, 699]        CONV_DIF_PHI_DC
    Use Argument   [conv_dif_u_s.f, 890]   STORE_A_U_S1
    Use   [conv_dif_u_s.f, 985]        STORE_A_U_S1
    Use   [conv_dif_u_s.f, 986]        STORE_A_U_S1
    Use   [conv_dif_u_s.f, 1059]       STORE_A_U_S1
    Use Argument   [conv_dif_u_s.f, 513]   STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 628]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 629]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 720]        STORE_A_U_SDC
    Use   [conv_dif_u_s.f, 721]        STORE_A_U_SDC
    Use Argument   [conv_rop.f, 285]   CONV_ROP1
    Use   [conv_rop.f, 307]            CONV_ROP1
    Use   [conv_rop.f, 307]            CONV_ROP1
    Use   [conv_rop.f, 329]            CONV_ROP1
    Use   [conv_rop.f, 329]            CONV_ROP1
    Use Argument   [conv_dif_w_g.f, 992]   STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1102]       STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1103]       STORE_A_W_G1
    Use   [conv_dif_w_g.f, 1179]       STORE_A_W_G1
    Use Argument   [conv_dif_w_g.f, 568]   STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 702]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 703]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 808]        STORE_A_W_GDC
    Use   [conv_dif_w_g.f, 809]        STORE_A_W_GDC
    Use Argument   [conv_source_epp.f, 405]   CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 491]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 491]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 493]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 495]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 500]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 500]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 503]     CONV_SOURCE_EPP1
    Use   [conv_source_epp.f, 505]     CONV_SOURCE_EPP1
    Use Argument   [conv_dif_w_s.f, 876]   STORE_A_W_S1
    Use   [conv_dif_w_s.f, 971]        STORE_A_W_S1
    Use   [conv_dif_w_s.f, 972]        STORE_A_W_S1
    Use   [conv_dif_w_s.f, 1043]       STORE_A_W_S1
    Use Argument   [conv_dif_w_s.f, 507]   STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 622]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 623]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 713]        STORE_A_W_SDC
    Use   [conv_dif_w_s.f, 714]        STORE_A_W_SDC
    Use Argument   [conv_dif_v_g.f, 1008]   STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1121]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1123]       STORE_A_V_G1
    Use   [conv_dif_v_g.f, 1208]       STORE_A_V_G1
    Use Argument   [conv_dif_v_g.f, 584]   STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 717]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 717]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 825]        STORE_A_V_GDC
    Use   [conv_dif_v_g.f, 825]        STORE_A_V_GDC
    Use Argument   [conv_dif_v_s.f, 889]   STORE_A_V_S1
    Use   [conv_dif_v_s.f, 985]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 986]        STORE_A_V_S1
    Use   [conv_dif_v_s.f, 1059]       STORE_A_V_S1
    Use Argument   [conv_dif_v_s.f, 510]   STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 627]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 628]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 721]        STORE_A_V_SDC
    Use   [conv_dif_v_s.f, 722]        STORE_A_V_SDC
    Use Argument   [conv_rop_g.f, 224]   CONV_ROP_G1
    Use   [conv_rop_g.f, 253]          CONV_ROP_G1
    Use   [conv_rop_g.f, 254]          CONV_ROP_G1
    Use   [conv_rop_g.f, 265]          CONV_ROP_G1
    Use Argument   [conv_dif_u_g.f, 1023]   STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1136]       STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1138]       STORE_A_U_G1
    Use   [conv_dif_u_g.f, 1224]       STORE_A_U_G1
    Use Argument   [conv_dif_u_g.f, 586]   STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 717]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 718]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 831]        STORE_A_U_GDC
    Use   [conv_dif_u_g.f, 832]        STORE_A_U_GDC

Xsi_Pope    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [k_epsilon_prop.f, 143]   K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 309]      K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 313]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 313]      K_Epsilon_PROP
    Set   [k_epsilon_prop.f, 320]      K_Epsilon_PROP
    Use   [k_epsilon_prop.f, 320]      K_Epsilon_PROP

XSLICE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 3074]         SETUP_VTK_REGION
    Set   [vtk_out.f, 3110]            SETUP_VTK_REGION
    Use Argument   [vtk_out.f, 3111]   SETUP_VTK_REGION

XSTART_IC    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [generate_particle_config.f, 504]   GENERATE_PARTICLE_CONFIG_DEM
    Set   [generate_particle_config.f, 587]   GENERATE_PARTICLE_CONFIG_DEM
    Use   [generate_particle_config.f, 598]   GENERATE_PARTICLE_CONFIG_DEM

XSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [test_lin_eq.f, 52]       TEST_LIN_EQ
    Set   [test_lin_eq.f, 129]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 145]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 145]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 148]         TEST_LIN_EQ
    Use   [test_lin_eq.f, 149]         TEST_LIN_EQ

xt    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 100]   GET_F_QUADRIC
    Set   [define_quadrics.f, 144]     GET_F_QUADRIC
    Use   [define_quadrics.f, 151]     GET_F_QUADRIC
    Use   [define_quadrics.f, 151]     GET_F_QUADRIC
    Set   [define_quadrics.f, 156]     GET_F_QUADRIC
    Use   [define_quadrics.f, 160]     GET_F_QUADRIC
    Set   [define_quadrics.f, 183]     GET_F_QUADRIC
    Use   [define_quadrics.f, 187]     GET_F_QUADRIC
    Use   [define_quadrics.f, 188]     GET_F_QUADRIC
    Set   [define_quadrics.f, 223]     GET_F_QUADRIC
    Use   [define_quadrics.f, 228]     GET_F_QUADRIC
    Use   [define_quadrics.f, 230]     GET_F_QUADRIC
    Set   [define_quadrics.f, 289]     GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 300]   GET_F_QUADRIC
    Set   [define_quadrics.f, 345]     GET_F_QUADRIC
    Use   [define_quadrics.f, 349]     GET_F_QUADRIC
    Use   [define_quadrics.f, 350]     GET_F_QUADRIC
    Set   [define_quadrics.f, 357]     GET_F_QUADRIC
    Use   [define_quadrics.f, 361]     GET_F_QUADRIC
    Set   [define_quadrics.f, 371]     GET_F_QUADRIC
    Use   [define_quadrics.f, 375]     GET_F_QUADRIC
    Use   [define_quadrics.f, 376]     GET_F_QUADRIC
    Set   [define_quadrics.f, 392]     GET_F_QUADRIC
    Use   [define_quadrics.f, 397]     GET_F_QUADRIC
    Set   [define_quadrics.f, 429]     GET_F_QUADRIC
    Use   [define_quadrics.f, 434]     GET_F_QUADRIC

Xt    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 33]         GET_3D_ALPHA_U_CUT_CELL
    Set   [get_alpha.f, 310]           GET_3D_ALPHA_U_CUT_CELL
    Use Argument   [get_alpha.f, 315]   GET_3D_ALPHA_U_CUT_CELL

Xt    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 452]        GET_3D_ALPHA_V_CUT_CELL
    Set   [get_alpha.f, 735]           GET_3D_ALPHA_V_CUT_CELL
    Use Argument   [get_alpha.f, 741]   GET_3D_ALPHA_V_CUT_CELL

Xt    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_alpha.f, 878]        GET_3D_ALPHA_W_CUT_CELL
    Set   [get_alpha.f, 1139]          GET_3D_ALPHA_W_CUT_CELL
    Use Argument   [get_alpha.f, 1146]   GET_3D_ALPHA_W_CUT_CELL

xTc    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [read_database.f, 69]     READ_DATABASE
    Set   [read_database.f, 139]       READ_DATABASE
    Use   [read_database.f, 140]       READ_DATABASE
    Set   [read_database.f, 143]       READ_DATABASE
    Use   [read_database.f, 144]       READ_DATABASE

xtr    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 100]   GET_F_QUADRIC
    Set   [define_quadrics.f, 160]     GET_F_QUADRIC
    Use   [define_quadrics.f, 167]     GET_F_QUADRIC
    Use   [define_quadrics.f, 167]     GET_F_QUADRIC
    Set   [define_quadrics.f, 187]     GET_F_QUADRIC
    Use   [define_quadrics.f, 206]     GET_F_QUADRIC
    Use   [define_quadrics.f, 206]     GET_F_QUADRIC
    Set   [define_quadrics.f, 228]     GET_F_QUADRIC
    Use   [define_quadrics.f, 244]     GET_F_QUADRIC
    Use   [define_quadrics.f, 244]     GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 247]   GET_F_QUADRIC
    Use   [define_quadrics.f, 251]     GET_F_QUADRIC
    Use   [define_quadrics.f, 251]     GET_F_QUADRIC
    Use Argument   [define_quadrics.f, 255]   GET_F_QUADRIC
    Use   [define_quadrics.f, 259]     GET_F_QUADRIC
    Use   [define_quadrics.f, 259]     GET_F_QUADRIC
    Set   [define_quadrics.f, 349]     GET_F_QUADRIC
    Use   [define_quadrics.f, 353]     GET_F_QUADRIC
    Set   [define_quadrics.f, 361]     GET_F_QUADRIC
    Use   [define_quadrics.f, 365]     GET_F_QUADRIC
    Use   [define_quadrics.f, 365]     GET_F_QUADRIC
    Set   [define_quadrics.f, 375]     GET_F_QUADRIC
    Use   [define_quadrics.f, 379]     GET_F_QUADRIC
    Set   [define_quadrics.f, 397]     GET_F_QUADRIC
    Use   [define_quadrics.f, 420]     GET_F_QUADRIC
    Set   [define_quadrics.f, 434]     GET_F_QUADRIC
    Use   [define_quadrics.f, 503]     GET_F_QUADRIC

XV1    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 158]    EVAL_POLY_FCT
    Set   [get_poly_data.f, 208]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 215]       EVAL_POLY_FCT
    Use Argument   [get_poly_data.f, 225]   EVAL_POLY_FCT
    Use Argument   [get_poly_data.f, 226]   EVAL_POLY_FCT
    Use   [get_poly_data.f, 238]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 239]       EVAL_POLY_FCT

XV2    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_poly_data.f, 158]    EVAL_POLY_FCT
    Set   [get_poly_data.f, 209]       EVAL_POLY_FCT
    Use   [get_poly_data.f, 216]       EVAL_POLY_FCT
    Use Argument   [get_poly_data.f, 225]   EVAL_POLY_FCT
    Use Argument   [get_poly_data.f, 226]   EVAL_POLY_FCT
    Use   [get_poly_data.f, 238]       EVAL_POLY_FCT

xvec    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [cooling_rate.f, 14]      cooling_rate
    Declare   [cooling_rate.f, 29]     cooling_rate
    Set   [cooling_rate.f, 45]         cooling_rate
    Use Argument   [cooling_rate.f, 48]   cooling_rate

XW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 3073]         SETUP_VTK_REGION
    Set   [vtk_out.f, 3080]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3110]            SETUP_VTK_REGION
    Use   [vtk_out.f, 3110]            SETUP_VTK_REGION

Xw    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_connectivity.f, 352]   GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 392]    GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 407]    GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 422]    GET_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 437]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 459]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 464]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 474]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 484]    GET_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 494]    GET_CELL_NODE_COORDINATES

Xw    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_connectivity.f, 542]   GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 579]    GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 594]    GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 609]    GET_GLOBAL_CELL_NODE_COORDINATES
    Set   [get_connectivity.f, 624]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 646]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 651]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 661]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 671]    GET_GLOBAL_CELL_NODE_COORDINATES
    Use   [get_connectivity.f, 681]    GET_GLOBAL_CELL_NODE_COORDINATES

XX    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [usr_dqmom.f, 34]         USR_DQMOM

XXVAL    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [comp_mean_fields0.f, 470]   DRAG_WEIGHTFACTOR
    Set   [comp_mean_fields0.f, 482]   DRAG_WEIGHTFACTOR
    Set   [comp_mean_fields0.f, 484]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 490]   DRAG_WEIGHTFACTOR
    Use   [comp_mean_fields0.f, 502]   DRAG_WEIGHTFACTOR

XXVAL    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des0.f, 504]     DRAG_INTERPOLATION
    Set   [drag_gs_des0.f, 516]        DRAG_INTERPOLATION
    Set   [drag_gs_des0.f, 518]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 526]        DRAG_INTERPOLATION
    Use   [drag_gs_des0.f, 539]        DRAG_INTERPOLATION

xyz_dim    (Local Variable)  Declared as: INTEGER
    Define   [read_res1.f, 382]        read_res1_netcdf
    Use Argument   [read_res1.f, 455]   read_res1_netcdf

xyz_dimid    (Local Variable)  Declared as: INTEGER
    Define   [write_res1.f, 295]       write_res1_netcdf
    Use Argument   [write_res1.f, 355]   write_res1_netcdf
    Use   [write_res1.f, 362]          write_res1_netcdf

xyz_id    (Local Variable)  Declared as: INTEGER
    Define   [read_res1.f, 382]        read_res1_netcdf
    Use Argument   [read_res1.f, 454]   read_res1_netcdf
    Use Argument   [read_res1.f, 455]   read_res1_netcdf

Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ