Object Cross Reference


Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 56]            BC_PHI
    Set   [bc_phi.f, 224]              BC_PHI
    Use Argument   [bc_phi.f, 225]     BC_PHI
    Use   [bc_phi.f, 226]              BC_PHI
    Use   [bc_phi.f, 227]              BC_PHI
    Use   [bc_phi.f, 228]              BC_PHI
    Use   [bc_phi.f, 229]              BC_PHI
    Use   [bc_phi.f, 230]              BC_PHI
    Use   [bc_phi.f, 231]              BC_PHI
    Use   [bc_phi.f, 232]              BC_PHI
    Use   [bc_phi.f, 233]              BC_PHI
    Use   [bc_phi.f, 234]              BC_PHI
    Use   [bc_phi.f, 258]              BC_PHI
    Use   [bc_phi.f, 262]              BC_PHI
    Use   [bc_phi.f, 266]              BC_PHI
    Use   [bc_phi.f, 267]              BC_PHI
    Use   [bc_phi.f, 268]              BC_PHI
    Use   [bc_phi.f, 268]              BC_PHI
    Use   [bc_phi.f, 269]              BC_PHI
    Use   [bc_phi.f, 272]              BC_PHI
    Use   [bc_phi.f, 275]              BC_PHI
    Use   [bc_phi.f, 277]              BC_PHI
    Use   [bc_phi.f, 278]              BC_PHI
    Use   [bc_phi.f, 279]              BC_PHI
    Use   [bc_phi.f, 279]              BC_PHI
    Use   [bc_phi.f, 280]              BC_PHI
    Use   [bc_phi.f, 283]              BC_PHI
    Use   [bc_phi.f, 286]              BC_PHI
    Use   [bc_phi.f, 288]              BC_PHI
    Use   [bc_phi.f, 289]              BC_PHI
    Use   [bc_phi.f, 290]              BC_PHI
    Use   [bc_phi.f, 290]              BC_PHI
    Use   [bc_phi.f, 291]              BC_PHI
    Use   [bc_phi.f, 294]              BC_PHI
    Use   [bc_phi.f, 297]              BC_PHI
    Use   [bc_phi.f, 299]              BC_PHI
    Use   [bc_phi.f, 300]              BC_PHI
    Use   [bc_phi.f, 301]              BC_PHI
    Use   [bc_phi.f, 301]              BC_PHI
    Use   [bc_phi.f, 302]              BC_PHI
    Use   [bc_phi.f, 305]              BC_PHI
    Use   [bc_phi.f, 308]              BC_PHI
    Use   [bc_phi.f, 310]              BC_PHI
    Use   [bc_phi.f, 311]              BC_PHI
    Use   [bc_phi.f, 312]              BC_PHI
    Use   [bc_phi.f, 312]              BC_PHI
    Use   [bc_phi.f, 313]              BC_PHI
    Use   [bc_phi.f, 316]              BC_PHI
    Use   [bc_phi.f, 319]              BC_PHI
    Use   [bc_phi.f, 321]              BC_PHI
    Use   [bc_phi.f, 323]              BC_PHI
    Use   [bc_phi.f, 325]              BC_PHI
    Use   [bc_phi.f, 325]              BC_PHI
    Use   [bc_phi.f, 326]              BC_PHI
    Set   [bc_phi.f, 343]              BC_PHI
    Use Argument   [bc_phi.f, 344]     BC_PHI
    Use   [bc_phi.f, 345]              BC_PHI
    Use   [bc_phi.f, 346]              BC_PHI
    Use   [bc_phi.f, 347]              BC_PHI
    Use   [bc_phi.f, 348]              BC_PHI
    Use   [bc_phi.f, 349]              BC_PHI
    Use   [bc_phi.f, 350]              BC_PHI
    Use   [bc_phi.f, 351]              BC_PHI
    Use   [bc_phi.f, 352]              BC_PHI
    Use   [bc_phi.f, 353]              BC_PHI
    Use Argument   [bc_phi.f, 372]     BC_PHI
    Use   [bc_phi.f, 395]              BC_PHI
    Use   [bc_phi.f, 396]              BC_PHI
    Use   [bc_phi.f, 402]              BC_PHI
    Use   [bc_phi.f, 403]              BC_PHI
    Use   [bc_phi.f, 404]              BC_PHI
    Use   [bc_phi.f, 405]              BC_PHI
    Use   [bc_phi.f, 406]              BC_PHI
    Use   [bc_phi.f, 407]              BC_PHI

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_phi.f, 502]           BC_PHI_CG
    Set   [bc_phi.f, 547]              BC_PHI_CG
    Use   [bc_phi.f, 548]              BC_PHI_CG
    Use   [bc_phi.f, 551]              BC_PHI_CG
    Use   [bc_phi.f, 553]              BC_PHI_CG
    Use   [bc_phi.f, 554]              BC_PHI_CG
    Use   [bc_phi.f, 555]              BC_PHI_CG
    Use   [bc_phi.f, 555]              BC_PHI_CG
    Use   [bc_phi.f, 555]              BC_PHI_CG
    Set   [bc_phi.f, 568]              BC_PHI_CG
    Use   [bc_phi.f, 569]              BC_PHI_CG
    Use   [bc_phi.f, 572]              BC_PHI_CG
    Use   [bc_phi.f, 574]              BC_PHI_CG
    Use   [bc_phi.f, 575]              BC_PHI_CG
    Use   [bc_phi.f, 576]              BC_PHI_CG
    Use   [bc_phi.f, 576]              BC_PHI_CG
    Use   [bc_phi.f, 576]              BC_PHI_CG
    Set   [bc_phi.f, 589]              BC_PHI_CG
    Use   [bc_phi.f, 590]              BC_PHI_CG
    Use   [bc_phi.f, 593]              BC_PHI_CG
    Use   [bc_phi.f, 595]              BC_PHI_CG
    Use   [bc_phi.f, 596]              BC_PHI_CG
    Use   [bc_phi.f, 597]              BC_PHI_CG
    Use   [bc_phi.f, 597]              BC_PHI_CG
    Use   [bc_phi.f, 597]              BC_PHI_CG
    Set   [bc_phi.f, 610]              BC_PHI_CG
    Use   [bc_phi.f, 611]              BC_PHI_CG
    Use   [bc_phi.f, 614]              BC_PHI_CG
    Use   [bc_phi.f, 616]              BC_PHI_CG
    Use   [bc_phi.f, 617]              BC_PHI_CG
    Use   [bc_phi.f, 618]              BC_PHI_CG
    Use   [bc_phi.f, 618]              BC_PHI_CG
    Use   [bc_phi.f, 618]              BC_PHI_CG
    Set   [bc_phi.f, 631]              BC_PHI_CG
    Use   [bc_phi.f, 632]              BC_PHI_CG
    Use   [bc_phi.f, 635]              BC_PHI_CG
    Use   [bc_phi.f, 637]              BC_PHI_CG
    Use   [bc_phi.f, 638]              BC_PHI_CG
    Use   [bc_phi.f, 639]              BC_PHI_CG
    Use   [bc_phi.f, 639]              BC_PHI_CG
    Use   [bc_phi.f, 639]              BC_PHI_CG
    Set   [bc_phi.f, 652]              BC_PHI_CG
    Use   [bc_phi.f, 653]              BC_PHI_CG
    Use   [bc_phi.f, 656]              BC_PHI_CG
    Use   [bc_phi.f, 658]              BC_PHI_CG
    Use   [bc_phi.f, 659]              BC_PHI_CG
    Use   [bc_phi.f, 660]              BC_PHI_CG
    Use   [bc_phi.f, 660]              BC_PHI_CG
    Use   [bc_phi.f, 660]              BC_PHI_CG
    Set   [bc_phi.f, 677]              BC_PHI_CG
    Use   [bc_phi.f, 685]              BC_PHI_CG

L    (Local Variable)  Declared as: INTEGER
    Define   [solve_granular_energy.f, 60]   SOLVE_GRANULAR_ENERGY
    Set   [solve_granular_energy.f, 380]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 381]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 381]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 382]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 383]   SOLVE_GRANULAR_ENERGY
    Use   [solve_granular_energy.f, 384]   SOLVE_GRANULAR_ENERGY

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_w_s.f, 1004]      JJ_BC_W_S
    Declare   [source_w_s.f, 1035]     JJ_BC_W_S
    Use Argument   [source_w_s.f, 1077]   JJ_BC_W_S
    Use   [source_w_s.f, 1079]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1080]   JJ_BC_W_S
    Use Argument   [source_w_s.f, 1083]   JJ_BC_W_S
    Use Argument   [source_w_s.f, 1105]   JJ_BC_W_S
    Use   [source_w_s.f, 1107]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1108]   JJ_BC_W_S
    Use Argument   [source_w_s.f, 1111]   JJ_BC_W_S
    Use Argument   [source_w_s.f, 1133]   JJ_BC_W_S
    Use   [source_w_s.f, 1135]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1136]   JJ_BC_W_S
    Use Argument   [source_w_s.f, 1139]   JJ_BC_W_S
    Use Argument   [source_w_s.f, 1156]   JJ_BC_W_S
    Use   [source_w_s.f, 1158]         JJ_BC_W_S
    Use Argument   [source_w_s.f, 1159]   JJ_BC_W_S
    Use Argument   [source_w_s.f, 1162]   JJ_BC_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 80]        SOURCE_W_S
    Set   [source_w_s.f, 148]          SOURCE_W_S
    Use   [source_w_s.f, 149]          SOURCE_W_S
    Use   [source_w_s.f, 149]          SOURCE_W_S
    Use   [source_w_s.f, 150]          SOURCE_W_S
    Use   [source_w_s.f, 151]          SOURCE_W_S
    Use   [source_w_s.f, 153]          SOURCE_W_S
    Use   [source_w_s.f, 156]          SOURCE_W_S
    Use   [source_w_s.f, 156]          SOURCE_W_S
    Set   [source_w_s.f, 204]          SOURCE_W_S
    Use   [source_w_s.f, 205]          SOURCE_W_S
    Use   [source_w_s.f, 206]          SOURCE_W_S
    Use   [source_w_s.f, 207]          SOURCE_W_S
    Use   [source_w_s.f, 208]          SOURCE_W_S
    Use   [source_w_s.f, 209]          SOURCE_W_S
    Use   [source_w_s.f, 210]          SOURCE_W_S
    Set   [source_w_s.f, 357]          SOURCE_W_S
    Use   [source_w_s.f, 358]          SOURCE_W_S
    Use   [source_w_s.f, 358]          SOURCE_W_S
    Set   [source_w_s.f, 390]          SOURCE_W_S
    Use   [source_w_s.f, 391]          SOURCE_W_S
    Use   [source_w_s.f, 391]          SOURCE_W_S
    Use   [source_w_s.f, 393]          SOURCE_W_S
    Use   [source_w_s.f, 393]          SOURCE_W_S
    Use   [source_w_s.f, 393]          SOURCE_W_S
    Set   [source_w_s.f, 401]          SOURCE_W_S
    Use   [source_w_s.f, 402]          SOURCE_W_S
    Use   [source_w_s.f, 403]          SOURCE_W_S
    Use   [source_w_s.f, 403]          SOURCE_W_S
    Use   [source_w_s.f, 404]          SOURCE_W_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 563]       SOURCE_W_S_BC
    Set   [source_w_s.f, 687]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 688]   SOURCE_W_S_BC
    Use   [source_w_s.f, 691]          SOURCE_W_S_BC
    Use   [source_w_s.f, 692]          SOURCE_W_S_BC
    Use   [source_w_s.f, 693]          SOURCE_W_S_BC
    Use   [source_w_s.f, 694]          SOURCE_W_S_BC
    Use   [source_w_s.f, 695]          SOURCE_W_S_BC
    Use   [source_w_s.f, 696]          SOURCE_W_S_BC
    Use   [source_w_s.f, 697]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 698]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 727]   SOURCE_W_S_BC
    Use   [source_w_s.f, 730]          SOURCE_W_S_BC
    Use   [source_w_s.f, 731]          SOURCE_W_S_BC
    Use   [source_w_s.f, 732]          SOURCE_W_S_BC
    Use   [source_w_s.f, 733]          SOURCE_W_S_BC
    Use   [source_w_s.f, 734]          SOURCE_W_S_BC
    Use   [source_w_s.f, 735]          SOURCE_W_S_BC
    Use   [source_w_s.f, 736]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 737]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 766]   SOURCE_W_S_BC
    Use   [source_w_s.f, 769]          SOURCE_W_S_BC
    Use   [source_w_s.f, 770]          SOURCE_W_S_BC
    Use   [source_w_s.f, 771]          SOURCE_W_S_BC
    Use   [source_w_s.f, 772]          SOURCE_W_S_BC
    Use   [source_w_s.f, 773]          SOURCE_W_S_BC
    Use   [source_w_s.f, 774]          SOURCE_W_S_BC
    Use   [source_w_s.f, 775]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 776]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 795]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 798]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 801]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 803]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 806]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 807]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 809]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 809]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 812]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 815]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 818]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 820]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 823]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 825]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 828]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 828]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 831]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 834]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 836]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 837]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 838]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 838]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 841]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 844]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 846]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 847]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 848]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 848]   SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 855]   SOURCE_W_S_BC
    Use   [source_w_s.f, 859]          SOURCE_W_S_BC
    Use   [source_w_s.f, 859]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 860]   SOURCE_W_S_BC
    Use   [source_w_s.f, 861]          SOURCE_W_S_BC
    Use   [source_w_s.f, 862]          SOURCE_W_S_BC
    Use   [source_w_s.f, 863]          SOURCE_W_S_BC
    Use   [source_w_s.f, 864]          SOURCE_W_S_BC
    Use   [source_w_s.f, 865]          SOURCE_W_S_BC
    Use   [source_w_s.f, 866]          SOURCE_W_S_BC
    Use   [source_w_s.f, 886]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 887]   SOURCE_W_S_BC
    Use   [source_w_s.f, 888]          SOURCE_W_S_BC
    Use   [source_w_s.f, 889]          SOURCE_W_S_BC
    Use   [source_w_s.f, 890]          SOURCE_W_S_BC
    Use   [source_w_s.f, 891]          SOURCE_W_S_BC
    Use   [source_w_s.f, 892]          SOURCE_W_S_BC
    Use   [source_w_s.f, 893]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 920]   SOURCE_W_S_BC
    Use   [source_w_s.f, 921]          SOURCE_W_S_BC
    Use   [source_w_s.f, 922]          SOURCE_W_S_BC
    Use   [source_w_s.f, 923]          SOURCE_W_S_BC
    Use   [source_w_s.f, 924]          SOURCE_W_S_BC
    Use   [source_w_s.f, 925]          SOURCE_W_S_BC
    Use   [source_w_s.f, 926]          SOURCE_W_S_BC
    Use   [source_w_s.f, 949]          SOURCE_W_S_BC
    Use   [source_w_s.f, 950]          SOURCE_W_S_BC
    Use   [source_w_s.f, 951]          SOURCE_W_S_BC
    Use   [source_w_s.f, 952]          SOURCE_W_S_BC
    Use   [source_w_s.f, 953]          SOURCE_W_S_BC
    Use   [source_w_s.f, 954]          SOURCE_W_S_BC
    Use Argument   [source_w_s.f, 969]   SOURCE_W_S_BC

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [drag_ss.f, 11]           DRAG_SS
    Declare   [drag_ss.f, 28]          DRAG_SS
    Use Argument   [drag_ss.f, 37]     DRAG_SS
    Use   [drag_ss.f, 40]              DRAG_SS
    Use Argument   [drag_ss.f, 45]     DRAG_SS
    Use Argument   [drag_ss.f, 47]     DRAG_SS
    Use Argument   [drag_ss.f, 63]     DRAG_SS

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [drag_ss.f, 241]          DRAG_SS_IA
    Declare   [drag_ss.f, 259]         DRAG_SS_IA
    Use Argument   [drag_ss.f, 285]    DRAG_SS_IA
    Use   [drag_ss.f, 295]             DRAG_SS_IA
    Use   [drag_ss.f, 297]             DRAG_SS_IA
    Use   [drag_ss.f, 299]             DRAG_SS_IA
    Use   [drag_ss.f, 300]             DRAG_SS_IA
    Use   [drag_ss.f, 329]             DRAG_SS_IA
    Use   [drag_ss.f, 333]             DRAG_SS_IA

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [drag_ss.f, 86]           DRAG_SS_SYAM
    Declare   [drag_ss.f, 106]         DRAG_SS_SYAM
    Use Argument   [drag_ss.f, 129]    DRAG_SS_SYAM
    Use   [drag_ss.f, 143]             DRAG_SS_SYAM
    Use   [drag_ss.f, 143]             DRAG_SS_SYAM
    Use   [drag_ss.f, 144]             DRAG_SS_SYAM
    Use   [drag_ss.f, 144]             DRAG_SS_SYAM
    Use   [drag_ss.f, 145]             DRAG_SS_SYAM
    Use   [drag_ss.f, 145]             DRAG_SS_SYAM
    Use   [drag_ss.f, 157]             DRAG_SS_SYAM
    Use   [drag_ss.f, 159]             DRAG_SS_SYAM
    Use   [drag_ss.f, 160]             DRAG_SS_SYAM
    Use   [drag_ss.f, 164]             DRAG_SS_SYAM
    Use   [drag_ss.f, 168]             DRAG_SS_SYAM

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_u_s.f, 117]    CALC_IA_MOMSOURCE_U_S
    Set   [kintheory_u_s.f, 182]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 183]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 188]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 189]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 190]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 190]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 191]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 191]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 193]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 193]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 194]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 194]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 195]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 195]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 196]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 196]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 197]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 197]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 198]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 198]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 200]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 200]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 201]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 201]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 202]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 202]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 203]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 203]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 204]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 204]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 205]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 205]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 208]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 209]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 212]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 212]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 216]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 216]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 217]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 217]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 218]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 218]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 219]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 219]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 227]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 227]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 228]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 228]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 233]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 233]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 235]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 235]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 236]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 236]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 242]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 252]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 253]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 259]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 260]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 263]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 263]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 273]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 273]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 278]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 279]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 281]       CALC_IA_MOMSOURCE_U_S
    Use   [kintheory_u_s.f, 281]       CALC_IA_MOMSOURCE_U_S

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [kintheory_u_s.f, 329]    COLL_MOMENTUM_COEFF_IA
    Declare   [kintheory_u_s.f, 352]   COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 373]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 374]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 375]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 376]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 380]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 383]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 387]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 389]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 391]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 393]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 395]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 415]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 420]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 425]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 427]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 434]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 441]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 446]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 447]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 449]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 450]       COLL_MOMENTUM_COEFF_IA
    Use   [kintheory_u_s.f, 451]       COLL_MOMENTUM_COEFF_IA

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

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 219]   CALC_DES_BEDHEIGHT
    Set   [des_granular_temperature.f, 260]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 262]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 264]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 264]   CALC_DES_BEDHEIGHT
    Use Argument   [des_granular_temperature.f, 264]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 266]   CALC_DES_BEDHEIGHT
    Use   [des_granular_temperature.f, 267]   CALC_DES_BEDHEIGHT

L    (Local Variable)  Declared as: INTEGER
    Define   [conv_dif_phi.f, 756]     DIF_PHI_IS
    Set   [conv_dif_phi.f, 766]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 767]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 768]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 769]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 770]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 771]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 772]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 773]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 783]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 799]        DIF_PHI_IS
    Use   [conv_dif_phi.f, 815]        DIF_PHI_IS

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 86]        SOURCE_V_G
    Set   [source_v_g.f, 300]          SOURCE_V_G
    Use   [source_v_g.f, 301]          SOURCE_V_G
    Use   [source_v_g.f, 301]          SOURCE_V_G
    Use   [source_v_g.f, 303]          SOURCE_V_G
    Use   [source_v_g.f, 303]          SOURCE_V_G
    Use   [source_v_g.f, 303]          SOURCE_V_G
    Set   [source_v_g.f, 312]          SOURCE_V_G
    Use   [source_v_g.f, 313]          SOURCE_V_G
    Use   [source_v_g.f, 314]          SOURCE_V_G
    Use   [source_v_g.f, 314]          SOURCE_V_G
    Use   [source_v_g.f, 315]          SOURCE_V_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 420]       SOURCE_V_G_BC
    Set   [source_v_g.f, 569]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 570]   SOURCE_V_G_BC
    Use   [source_v_g.f, 574]          SOURCE_V_G_BC
    Use   [source_v_g.f, 575]          SOURCE_V_G_BC
    Use   [source_v_g.f, 576]          SOURCE_V_G_BC
    Use   [source_v_g.f, 577]          SOURCE_V_G_BC
    Use   [source_v_g.f, 578]          SOURCE_V_G_BC
    Use   [source_v_g.f, 579]          SOURCE_V_G_BC
    Use   [source_v_g.f, 580]          SOURCE_V_G_BC
    Use   [source_v_g.f, 609]          SOURCE_V_G_BC
    Use   [source_v_g.f, 610]          SOURCE_V_G_BC
    Use   [source_v_g.f, 611]          SOURCE_V_G_BC
    Use   [source_v_g.f, 612]          SOURCE_V_G_BC
    Use   [source_v_g.f, 613]          SOURCE_V_G_BC
    Use   [source_v_g.f, 614]          SOURCE_V_G_BC
    Use   [source_v_g.f, 615]          SOURCE_V_G_BC
    Use   [source_v_g.f, 644]          SOURCE_V_G_BC
    Use   [source_v_g.f, 645]          SOURCE_V_G_BC
    Use   [source_v_g.f, 646]          SOURCE_V_G_BC
    Use   [source_v_g.f, 647]          SOURCE_V_G_BC
    Use   [source_v_g.f, 648]          SOURCE_V_G_BC
    Use   [source_v_g.f, 649]          SOURCE_V_G_BC
    Use   [source_v_g.f, 650]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 669]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 672]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 674]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 675]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 676]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 676]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 679]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 682]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 684]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 685]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 686]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 686]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 689]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 692]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 694]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 695]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 696]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 696]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 699]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 702]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 704]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 705]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 706]   SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 706]   SOURCE_V_G_BC
    Use   [source_v_g.f, 714]          SOURCE_V_G_BC
    Use   [source_v_g.f, 715]          SOURCE_V_G_BC
    Use   [source_v_g.f, 716]          SOURCE_V_G_BC
    Use   [source_v_g.f, 718]          SOURCE_V_G_BC
    Use   [source_v_g.f, 719]          SOURCE_V_G_BC
    Use   [source_v_g.f, 720]          SOURCE_V_G_BC
    Use   [source_v_g.f, 721]          SOURCE_V_G_BC
    Use   [source_v_g.f, 722]          SOURCE_V_G_BC
    Use   [source_v_g.f, 723]          SOURCE_V_G_BC
    Use   [source_v_g.f, 745]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 745]   SOURCE_V_G_BC
    Use   [source_v_g.f, 750]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 750]   SOURCE_V_G_BC
    Use   [source_v_g.f, 755]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 755]   SOURCE_V_G_BC
    Use   [source_v_g.f, 760]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 760]   SOURCE_V_G_BC
    Use   [source_v_g.f, 770]          SOURCE_V_G_BC
    Use   [source_v_g.f, 770]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 771]   SOURCE_V_G_BC
    Use   [source_v_g.f, 775]          SOURCE_V_G_BC
    Use   [source_v_g.f, 776]          SOURCE_V_G_BC
    Use   [source_v_g.f, 777]          SOURCE_V_G_BC
    Use   [source_v_g.f, 778]          SOURCE_V_G_BC
    Use   [source_v_g.f, 779]          SOURCE_V_G_BC
    Use   [source_v_g.f, 780]          SOURCE_V_G_BC
    Use   [source_v_g.f, 804]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 805]   SOURCE_V_G_BC
    Use   [source_v_g.f, 806]          SOURCE_V_G_BC
    Use   [source_v_g.f, 807]          SOURCE_V_G_BC
    Use   [source_v_g.f, 808]          SOURCE_V_G_BC
    Use   [source_v_g.f, 809]          SOURCE_V_G_BC
    Use   [source_v_g.f, 810]          SOURCE_V_G_BC
    Use   [source_v_g.f, 811]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 838]   SOURCE_V_G_BC
    Use   [source_v_g.f, 839]          SOURCE_V_G_BC
    Use   [source_v_g.f, 840]          SOURCE_V_G_BC
    Use   [source_v_g.f, 841]          SOURCE_V_G_BC
    Use   [source_v_g.f, 842]          SOURCE_V_G_BC
    Use   [source_v_g.f, 843]          SOURCE_V_G_BC
    Use   [source_v_g.f, 844]          SOURCE_V_G_BC
    Use   [source_v_g.f, 872]          SOURCE_V_G_BC
    Use   [source_v_g.f, 873]          SOURCE_V_G_BC
    Use   [source_v_g.f, 874]          SOURCE_V_G_BC
    Use   [source_v_g.f, 875]          SOURCE_V_G_BC
    Use   [source_v_g.f, 876]          SOURCE_V_G_BC
    Use   [source_v_g.f, 877]          SOURCE_V_G_BC
    Use Argument   [source_v_g.f, 893]   SOURCE_V_G_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [cfnewvalues.f, 43]       CFNEWVALUES
    Set   [cfnewvalues.f, 53]          CFNEWVALUES
    Use Argument   [cfnewvalues.f, 54]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 55]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 55]   CFNEWVALUES
    Use Argument   [cfnewvalues.f, 56]   CFNEWVALUES
    Use   [cfnewvalues.f, 57]          CFNEWVALUES
    Use   [cfnewvalues.f, 57]          CFNEWVALUES
    Use   [cfnewvalues.f, 57]          CFNEWVALUES
    Use   [cfnewvalues.f, 58]          CFNEWVALUES
    Use   [cfnewvalues.f, 58]          CFNEWVALUES
    Set   [cfnewvalues.f, 204]         CFNEWVALUES
    Use   [cfnewvalues.f, 205]         CFNEWVALUES
    Use   [cfnewvalues.f, 205]         CFNEWVALUES
    Use   [cfnewvalues.f, 205]         CFNEWVALUES
    Use   [cfnewvalues.f, 209]         CFNEWVALUES
    Use   [cfnewvalues.f, 212]         CFNEWVALUES
    Use   [cfnewvalues.f, 212]         CFNEWVALUES
    Use   [cfnewvalues.f, 213]         CFNEWVALUES
    Use   [cfnewvalues.f, 214]         CFNEWVALUES
    Set   [cfnewvalues.f, 225]         CFNEWVALUES
    Use   [cfnewvalues.f, 227]         CFNEWVALUES
    Use   [cfnewvalues.f, 227]         CFNEWVALUES
    Use   [cfnewvalues.f, 228]         CFNEWVALUES
    Use   [cfnewvalues.f, 228]         CFNEWVALUES
    Use   [cfnewvalues.f, 229]         CFNEWVALUES
    Use   [cfnewvalues.f, 229]         CFNEWVALUES
    Use   [cfnewvalues.f, 230]         CFNEWVALUES

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

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 217]     PARTIAL_ELIM_IA
    Set   [partial_elim.f, 244]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 245]        PARTIAL_ELIM_IA
    Use Argument   [partial_elim.f, 246]   PARTIAL_ELIM_IA
    Use   [partial_elim.f, 247]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 249]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 249]        PARTIAL_ELIM_IA
    Set   [partial_elim.f, 269]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 275]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 276]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 280]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 280]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 283]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 283]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 284]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 284]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 284]        PARTIAL_ELIM_IA

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 68]      PARTIAL_ELIM_S
    Set   [partial_elim.f, 97]         PARTIAL_ELIM_S
    Use   [partial_elim.f, 98]         PARTIAL_ELIM_S
    Use   [partial_elim.f, 99]         PARTIAL_ELIM_S
    Use   [partial_elim.f, 101]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 103]        PARTIAL_ELIM_S
    Set   [partial_elim.f, 132]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 138]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 140]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 142]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 147]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 147]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 149]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 149]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 150]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 150]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 150]        PARTIAL_ELIM_S

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 361]     PARTIAL_ELIM_U
    Set   [partial_elim.f, 394]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 395]        PARTIAL_ELIM_U
    Use Argument   [partial_elim.f, 396]   PARTIAL_ELIM_U
    Use   [partial_elim.f, 400]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 403]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 403]        PARTIAL_ELIM_U
    Set   [partial_elim.f, 433]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 440]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 448]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 450]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 452]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 457]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 457]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 459]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 459]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 460]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 460]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 460]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 464]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 465]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 466]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 468]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 468]        PARTIAL_ELIM_U

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 546]     PARTIAL_ELIM_V
    Set   [partial_elim.f, 579]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 580]        PARTIAL_ELIM_V
    Use Argument   [partial_elim.f, 581]   PARTIAL_ELIM_V
    Use   [partial_elim.f, 585]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 588]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 588]        PARTIAL_ELIM_V
    Set   [partial_elim.f, 619]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 620]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 626]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 628]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 630]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 635]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 635]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 637]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 637]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 638]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 638]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 638]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 642]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 643]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 644]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 646]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 646]        PARTIAL_ELIM_V

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 724]     PARTIAL_ELIM_W
    Set   [partial_elim.f, 757]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 758]        PARTIAL_ELIM_W
    Use Argument   [partial_elim.f, 759]   PARTIAL_ELIM_W
    Use   [partial_elim.f, 763]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 766]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 766]        PARTIAL_ELIM_W
    Set   [partial_elim.f, 797]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 798]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 804]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 806]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 808]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 813]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 813]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 815]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 815]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 816]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 816]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 816]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 820]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 821]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 822]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 824]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 824]        PARTIAL_ELIM_W

L    (Local Variable)  Declared as: INTEGER
    Define   [set_flags.f, 64]         SET_FLAGS
    Set   [set_flags.f, 225]           SET_FLAGS
    Use   [set_flags.f, 227]           SET_FLAGS
    Use   [set_flags.f, 228]           SET_FLAGS
    Use   [set_flags.f, 229]           SET_FLAGS
    Use   [set_flags.f, 231]           SET_FLAGS
    Use   [set_flags.f, 232]           SET_FLAGS
    Use   [set_flags.f, 233]           SET_FLAGS
    Use   [set_flags.f, 235]           SET_FLAGS
    Use   [set_flags.f, 239]           SET_FLAGS
    Use   [set_flags.f, 239]           SET_FLAGS
    Use   [set_flags.f, 240]           SET_FLAGS
    Use   [set_flags.f, 241]           SET_FLAGS
    Use   [set_flags.f, 242]           SET_FLAGS
    Use   [set_flags.f, 242]           SET_FLAGS
    Use   [set_flags.f, 243]           SET_FLAGS
    Use   [set_flags.f, 243]           SET_FLAGS
    Use   [set_flags.f, 250]           SET_FLAGS
    Use   [set_flags.f, 251]           SET_FLAGS
    Use   [set_flags.f, 252]           SET_FLAGS
    Use   [set_flags.f, 252]           SET_FLAGS
    Use   [set_flags.f, 253]           SET_FLAGS
    Use   [set_flags.f, 253]           SET_FLAGS
    Use   [set_flags.f, 254]           SET_FLAGS
    Use   [set_flags.f, 254]           SET_FLAGS
    Use   [set_flags.f, 264]           SET_FLAGS
    Use   [set_flags.f, 264]           SET_FLAGS
    Use   [set_flags.f, 265]           SET_FLAGS
    Use   [set_flags.f, 266]           SET_FLAGS
    Use   [set_flags.f, 267]           SET_FLAGS
    Use   [set_flags.f, 267]           SET_FLAGS
    Use   [set_flags.f, 268]           SET_FLAGS
    Use   [set_flags.f, 268]           SET_FLAGS
    Use   [set_flags.f, 275]           SET_FLAGS
    Use   [set_flags.f, 276]           SET_FLAGS
    Use   [set_flags.f, 277]           SET_FLAGS
    Use   [set_flags.f, 277]           SET_FLAGS
    Use   [set_flags.f, 278]           SET_FLAGS
    Use   [set_flags.f, 278]           SET_FLAGS
    Use   [set_flags.f, 279]           SET_FLAGS
    Use   [set_flags.f, 279]           SET_FLAGS
    Use   [set_flags.f, 289]           SET_FLAGS
    Use   [set_flags.f, 289]           SET_FLAGS
    Use   [set_flags.f, 290]           SET_FLAGS
    Use   [set_flags.f, 291]           SET_FLAGS
    Use   [set_flags.f, 292]           SET_FLAGS
    Use   [set_flags.f, 292]           SET_FLAGS
    Use   [set_flags.f, 293]           SET_FLAGS
    Use   [set_flags.f, 293]           SET_FLAGS
    Use   [set_flags.f, 300]           SET_FLAGS
    Use   [set_flags.f, 301]           SET_FLAGS
    Use   [set_flags.f, 302]           SET_FLAGS
    Use   [set_flags.f, 302]           SET_FLAGS
    Use   [set_flags.f, 303]           SET_FLAGS
    Use   [set_flags.f, 303]           SET_FLAGS
    Use   [set_flags.f, 304]           SET_FLAGS
    Use   [set_flags.f, 304]           SET_FLAGS

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_v_s.f, 57]     CG_SOURCE_V_S
    Set   [CG_source_v_s.f, 103]       CG_SOURCE_V_S
    Use   [CG_source_v_s.f, 104]       CG_SOURCE_V_S
    Use   [CG_source_v_s.f, 104]       CG_SOURCE_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [bc_theta.f, 67]          BC_THETA
    Set   [bc_theta.f, 76]             BC_THETA
    Use Argument   [bc_theta.f, 77]    BC_THETA
    Use   [bc_theta.f, 78]             BC_THETA
    Use   [bc_theta.f, 79]             BC_THETA
    Use   [bc_theta.f, 80]             BC_THETA
    Use   [bc_theta.f, 81]             BC_THETA
    Use   [bc_theta.f, 82]             BC_THETA
    Use   [bc_theta.f, 83]             BC_THETA
    Use   [bc_theta.f, 84]             BC_THETA
    Use   [bc_theta.f, 85]             BC_THETA
    Use   [bc_theta.f, 86]             BC_THETA
    Use Argument   [bc_theta.f, 88]    BC_THETA
    Use Argument   [bc_theta.f, 117]   BC_THETA
    Use Argument   [bc_theta.f, 127]   BC_THETA
    Use Argument   [bc_theta.f, 129]   BC_THETA
    Use Argument   [bc_theta.f, 135]   BC_THETA
    Use Argument   [bc_theta.f, 146]   BC_THETA
    Use Argument   [bc_theta.f, 152]   BC_THETA
    Use Argument   [bc_theta.f, 153]   BC_THETA
    Use Argument   [bc_theta.f, 159]   BC_THETA
    Use Argument   [bc_theta.f, 170]   BC_THETA
    Use Argument   [bc_theta.f, 176]   BC_THETA
    Use Argument   [bc_theta.f, 177]   BC_THETA
    Use Argument   [bc_theta.f, 183]   BC_THETA
    Use Argument   [bc_theta.f, 194]   BC_THETA
    Use Argument   [bc_theta.f, 200]   BC_THETA
    Use Argument   [bc_theta.f, 201]   BC_THETA
    Use Argument   [bc_theta.f, 207]   BC_THETA
    Use Argument   [bc_theta.f, 218]   BC_THETA
    Use Argument   [bc_theta.f, 224]   BC_THETA
    Use Argument   [bc_theta.f, 225]   BC_THETA
    Use Argument   [bc_theta.f, 231]   BC_THETA
    Use Argument   [bc_theta.f, 242]   BC_THETA
    Use Argument   [bc_theta.f, 248]   BC_THETA
    Use Argument   [bc_theta.f, 249]   BC_THETA
    Use Argument   [bc_theta.f, 255]   BC_THETA

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [bc_theta.f, 291]         CALC_THETA_BC
    Declare   [bc_theta.f, 325]        CALC_THETA_BC
    Use Argument   [bc_theta.f, 447]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 447]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 492]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 492]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 537]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 537]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 582]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 582]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 627]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 627]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 672]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 672]   CALC_THETA_BC
    Use Argument   [bc_theta.f, 686]   CALC_THETA_BC

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

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

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

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

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 34]   GET_CUT_CELL_VOLUME_AND_AREAS
    Set   [get_cut_cell_volume_area.f, 111]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 112]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 113]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 114]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 115]   GET_CUT_CELL_VOLUME_AND_AREAS
    Use   [get_cut_cell_volume_area.f, 121]   GET_CUT_CELL_VOLUME_AND_AREAS

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [usr_properties.f, 655]   USR_PROP_Fss
    Declare   [usr_properties.f, 681]   USR_PROP_Fss
    Use Argument   [usr_properties.f, 696]   USR_PROP_Fss
    Use   [usr_properties.f, 701]      USR_PROP_Fss

L    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 241]   INIT_PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 261]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 263]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 268]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 270]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 272]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 274]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 278]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 280]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 282]   INIT_PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 287]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 290]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 290]   INIT_PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 291]   INIT_PARTICLES_IN_CELL

L    (Local Variable)  Declared as: INTEGER
    Define   [particles_in_cell.f, 54]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 72]    PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 74]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 76]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 78]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 81]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 82]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 84]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 85]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 87]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 88]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 91]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 96]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 98]    PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 101]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 102]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 104]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 105]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 107]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 108]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 111]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 120]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 122]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 125]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 126]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 128]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 129]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 131]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 132]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 135]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 145]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 146]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 147]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 148]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 151]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 151]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 152]   PARTICLES_IN_CELL
    Set   [particles_in_cell.f, 184]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 188]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 192]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 192]   PARTICLES_IN_CELL
    Use Argument   [particles_in_cell.f, 192]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 193]   PARTICLES_IN_CELL
    Use   [particles_in_cell.f, 195]   PARTICLES_IN_CELL

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_set_bc0.f, 64]        CG_SET_BC0
    Set   [CG_set_bc0.f, 99]           CG_SET_BC0
    Use   [CG_set_bc0.f, 101]          CG_SET_BC0
    Use   [CG_set_bc0.f, 102]          CG_SET_BC0
    Use   [CG_set_bc0.f, 105]          CG_SET_BC0
    Use   [CG_set_bc0.f, 107]          CG_SET_BC0
    Use   [CG_set_bc0.f, 107]          CG_SET_BC0
    Use   [CG_set_bc0.f, 108]          CG_SET_BC0
    Use   [CG_set_bc0.f, 109]          CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 116]   CG_SET_BC0
    Use   [CG_set_bc0.f, 117]          CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 122]   CG_SET_BC0
    Use   [CG_set_bc0.f, 123]          CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 127]   CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 127]   CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 128]   CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 128]   CG_SET_BC0
    Use   [CG_set_bc0.f, 132]          CG_SET_BC0
    Use   [CG_set_bc0.f, 132]          CG_SET_BC0
    Use   [CG_set_bc0.f, 133]          CG_SET_BC0
    Use   [CG_set_bc0.f, 133]          CG_SET_BC0
    Use   [CG_set_bc0.f, 134]          CG_SET_BC0
    Use   [CG_set_bc0.f, 134]          CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 137]   CG_SET_BC0
    Use   [CG_set_bc0.f, 138]          CG_SET_BC0
    Use   [CG_set_bc0.f, 143]          CG_SET_BC0
    Use   [CG_set_bc0.f, 147]          CG_SET_BC0
    Use   [CG_set_bc0.f, 148]          CG_SET_BC0
    Use   [CG_set_bc0.f, 149]          CG_SET_BC0
    Use   [CG_set_bc0.f, 152]          CG_SET_BC0
    Use   [CG_set_bc0.f, 156]          CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 160]   CG_SET_BC0
    Use Argument   [CG_set_bc0.f, 161]   CG_SET_BC0
    Use   [CG_set_bc0.f, 165]          CG_SET_BC0
    Use   [CG_set_bc0.f, 166]          CG_SET_BC0
    Use   [CG_set_bc0.f, 167]          CG_SET_BC0
    Use   [CG_set_bc0.f, 170]          CG_SET_BC0
    Use   [CG_set_bc0.f, 175]          CG_SET_BC0
    Use   [CG_set_bc0.f, 176]          CG_SET_BC0
    Use   [CG_set_bc0.f, 178]          CG_SET_BC0
    Use   [CG_set_bc0.f, 182]          CG_SET_BC0
    Use   [CG_set_bc0.f, 183]          CG_SET_BC0
    Use   [CG_set_bc0.f, 185]          CG_SET_BC0
    Use   [CG_set_bc0.f, 188]          CG_SET_BC0
    Use   [CG_set_bc0.f, 189]          CG_SET_BC0
    Use   [CG_set_bc0.f, 191]          CG_SET_BC0
    Use   [CG_set_bc0.f, 199]          CG_SET_BC0
    Use   [CG_set_bc0.f, 200]          CG_SET_BC0
    Use   [CG_set_bc0.f, 202]          CG_SET_BC0
    Use   [CG_set_bc0.f, 207]          CG_SET_BC0
    Use   [CG_set_bc0.f, 208]          CG_SET_BC0
    Use   [CG_set_bc0.f, 210]          CG_SET_BC0
    Use   [CG_set_bc0.f, 215]          CG_SET_BC0
    Use   [CG_set_bc0.f, 216]          CG_SET_BC0
    Use   [CG_set_bc0.f, 218]          CG_SET_BC0
    Use   [CG_set_bc0.f, 227]          CG_SET_BC0
    Use   [CG_set_bc0.f, 228]          CG_SET_BC0
    Use   [CG_set_bc0.f, 230]          CG_SET_BC0
    Use   [CG_set_bc0.f, 233]          CG_SET_BC0
    Use   [CG_set_bc0.f, 234]          CG_SET_BC0
    Use   [CG_set_bc0.f, 236]          CG_SET_BC0
    Use   [CG_set_bc0.f, 239]          CG_SET_BC0
    Use   [CG_set_bc0.f, 240]          CG_SET_BC0
    Use   [CG_set_bc0.f, 242]          CG_SET_BC0
    Use   [CG_set_bc0.f, 250]          CG_SET_BC0
    Use   [CG_set_bc0.f, 251]          CG_SET_BC0
    Use   [CG_set_bc0.f, 253]          CG_SET_BC0
    Use   [CG_set_bc0.f, 258]          CG_SET_BC0
    Use   [CG_set_bc0.f, 259]          CG_SET_BC0
    Use   [CG_set_bc0.f, 261]          CG_SET_BC0
    Use   [CG_set_bc0.f, 266]          CG_SET_BC0
    Use   [CG_set_bc0.f, 267]          CG_SET_BC0
    Use   [CG_set_bc0.f, 269]          CG_SET_BC0

L    (Local Variable)  Declared as: INTEGER
    Define   [set_fluidbed_p.f, 65]    SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 80]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 81]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 82]       SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 83]       SET_FLUIDBED_P
    Set   [set_fluidbed_p.f, 151]      SET_FLUIDBED_P
    Use Argument   [set_fluidbed_p.f, 152]   SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 152]      SET_FLUIDBED_P
    Use   [set_fluidbed_p.f, 152]      SET_FLUIDBED_P

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

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_phi_bc_des.f, 39]    DIF_PHI_BC_DES
    Set   [dif_phi_bc_des.f, 174]      DIF_PHI_BC_DES
    Use Argument   [dif_phi_bc_des.f, 175]   DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 177]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 178]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 179]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 180]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 181]      DIF_PHI_BC_DES
    Use   [dif_phi_bc_des.f, 182]      DIF_PHI_BC_DES

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

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_v_s.f, 957]       JJ_BC_V_S
    Declare   [source_v_s.f, 987]      JJ_BC_V_S
    Use Argument   [source_v_s.f, 1030]   JJ_BC_V_S
    Use   [source_v_s.f, 1034]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1035]   JJ_BC_V_S
    Use Argument   [source_v_s.f, 1040]   JJ_BC_V_S
    Use Argument   [source_v_s.f, 1059]   JJ_BC_V_S
    Use   [source_v_s.f, 1061]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1062]   JJ_BC_V_S
    Use Argument   [source_v_s.f, 1065]   JJ_BC_V_S
    Use Argument   [source_v_s.f, 1082]   JJ_BC_V_S
    Use   [source_v_s.f, 1084]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1085]   JJ_BC_V_S
    Use Argument   [source_v_s.f, 1088]   JJ_BC_V_S
    Use Argument   [source_v_s.f, 1105]   JJ_BC_V_S
    Use   [source_v_s.f, 1107]         JJ_BC_V_S
    Use Argument   [source_v_s.f, 1108]   JJ_BC_V_S
    Use Argument   [source_v_s.f, 1111]   JJ_BC_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 82]        SOURCE_V_S
    Set   [source_v_s.f, 151]          SOURCE_V_S
    Use   [source_v_s.f, 152]          SOURCE_V_S
    Use   [source_v_s.f, 152]          SOURCE_V_S
    Use   [source_v_s.f, 153]          SOURCE_V_S
    Use   [source_v_s.f, 154]          SOURCE_V_S
    Use   [source_v_s.f, 156]          SOURCE_V_S
    Use   [source_v_s.f, 159]          SOURCE_V_S
    Use   [source_v_s.f, 159]          SOURCE_V_S
    Set   [source_v_s.f, 207]          SOURCE_V_S
    Use   [source_v_s.f, 208]          SOURCE_V_S
    Use   [source_v_s.f, 209]          SOURCE_V_S
    Use   [source_v_s.f, 210]          SOURCE_V_S
    Use   [source_v_s.f, 211]          SOURCE_V_S
    Use   [source_v_s.f, 213]          SOURCE_V_S
    Use   [source_v_s.f, 214]          SOURCE_V_S
    Set   [source_v_s.f, 362]          SOURCE_V_S
    Use   [source_v_s.f, 363]          SOURCE_V_S
    Use   [source_v_s.f, 363]          SOURCE_V_S
    Set   [source_v_s.f, 395]          SOURCE_V_S
    Use   [source_v_s.f, 396]          SOURCE_V_S
    Use   [source_v_s.f, 396]          SOURCE_V_S
    Use   [source_v_s.f, 398]          SOURCE_V_S
    Use   [source_v_s.f, 398]          SOURCE_V_S
    Use   [source_v_s.f, 399]          SOURCE_V_S
    Set   [source_v_s.f, 407]          SOURCE_V_S
    Use   [source_v_s.f, 408]          SOURCE_V_S
    Use   [source_v_s.f, 409]          SOURCE_V_S
    Use   [source_v_s.f, 409]          SOURCE_V_S
    Use   [source_v_s.f, 410]          SOURCE_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 525]       SOURCE_V_S_BC
    Set   [source_v_s.f, 650]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 651]   SOURCE_V_S_BC
    Use   [source_v_s.f, 654]          SOURCE_V_S_BC
    Use   [source_v_s.f, 655]          SOURCE_V_S_BC
    Use   [source_v_s.f, 656]          SOURCE_V_S_BC
    Use   [source_v_s.f, 657]          SOURCE_V_S_BC
    Use   [source_v_s.f, 658]          SOURCE_V_S_BC
    Use   [source_v_s.f, 659]          SOURCE_V_S_BC
    Use   [source_v_s.f, 660]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 661]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 691]   SOURCE_V_S_BC
    Use   [source_v_s.f, 694]          SOURCE_V_S_BC
    Use   [source_v_s.f, 695]          SOURCE_V_S_BC
    Use   [source_v_s.f, 696]          SOURCE_V_S_BC
    Use   [source_v_s.f, 697]          SOURCE_V_S_BC
    Use   [source_v_s.f, 698]          SOURCE_V_S_BC
    Use   [source_v_s.f, 699]          SOURCE_V_S_BC
    Use   [source_v_s.f, 700]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 701]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 730]   SOURCE_V_S_BC
    Use   [source_v_s.f, 733]          SOURCE_V_S_BC
    Use   [source_v_s.f, 734]          SOURCE_V_S_BC
    Use   [source_v_s.f, 735]          SOURCE_V_S_BC
    Use   [source_v_s.f, 736]          SOURCE_V_S_BC
    Use   [source_v_s.f, 737]          SOURCE_V_S_BC
    Use   [source_v_s.f, 738]          SOURCE_V_S_BC
    Use   [source_v_s.f, 739]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 740]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 759]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 762]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 764]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 765]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 766]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 766]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 769]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 772]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 774]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 775]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 776]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 776]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 779]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 782]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 784]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 786]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 788]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 788]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 791]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 794]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 796]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 798]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 800]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 800]   SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 807]   SOURCE_V_S_BC
    Use   [source_v_s.f, 811]          SOURCE_V_S_BC
    Use   [source_v_s.f, 811]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 812]   SOURCE_V_S_BC
    Use   [source_v_s.f, 813]          SOURCE_V_S_BC
    Use   [source_v_s.f, 814]          SOURCE_V_S_BC
    Use   [source_v_s.f, 815]          SOURCE_V_S_BC
    Use   [source_v_s.f, 816]          SOURCE_V_S_BC
    Use   [source_v_s.f, 817]          SOURCE_V_S_BC
    Use   [source_v_s.f, 818]          SOURCE_V_S_BC
    Use   [source_v_s.f, 838]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 839]   SOURCE_V_S_BC
    Use   [source_v_s.f, 840]          SOURCE_V_S_BC
    Use   [source_v_s.f, 841]          SOURCE_V_S_BC
    Use   [source_v_s.f, 842]          SOURCE_V_S_BC
    Use   [source_v_s.f, 843]          SOURCE_V_S_BC
    Use   [source_v_s.f, 844]          SOURCE_V_S_BC
    Use   [source_v_s.f, 845]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 872]   SOURCE_V_S_BC
    Use   [source_v_s.f, 873]          SOURCE_V_S_BC
    Use   [source_v_s.f, 874]          SOURCE_V_S_BC
    Use   [source_v_s.f, 875]          SOURCE_V_S_BC
    Use   [source_v_s.f, 876]          SOURCE_V_S_BC
    Use   [source_v_s.f, 877]          SOURCE_V_S_BC
    Use   [source_v_s.f, 878]          SOURCE_V_S_BC
    Use   [source_v_s.f, 901]          SOURCE_V_S_BC
    Use   [source_v_s.f, 902]          SOURCE_V_S_BC
    Use   [source_v_s.f, 903]          SOURCE_V_S_BC
    Use   [source_v_s.f, 904]          SOURCE_V_S_BC
    Use   [source_v_s.f, 905]          SOURCE_V_S_BC
    Use   [source_v_s.f, 906]          SOURCE_V_S_BC
    Use Argument   [source_v_s.f, 921]   SOURCE_V_S_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs.f, 78]           DRAG_GS
    Set   [drag_gs.f, 123]             DRAG_GS
    Use   [drag_gs.f, 126]             DRAG_GS
    Use   [drag_gs.f, 127]             DRAG_GS
    Use   [drag_gs.f, 128]             DRAG_GS
    Use   [drag_gs.f, 130]             DRAG_GS
    Use   [drag_gs.f, 130]             DRAG_GS
    Use   [drag_gs.f, 131]             DRAG_GS
    Use   [drag_gs.f, 131]             DRAG_GS
    Use   [drag_gs.f, 132]             DRAG_GS
    Use   [drag_gs.f, 132]             DRAG_GS
    Set   [drag_gs.f, 171]             DRAG_GS
    Use   [drag_gs.f, 173]             DRAG_GS
    Set   [drag_gs.f, 180]             DRAG_GS
    Use   [drag_gs.f, 182]             DRAG_GS
    Use   [drag_gs.f, 183]             DRAG_GS
    Use   [drag_gs.f, 185]             DRAG_GS
    Set   [drag_gs.f, 256]             DRAG_GS
    Use   [drag_gs.f, 257]             DRAG_GS
    Use   [drag_gs.f, 258]             DRAG_GS
    Use   [drag_gs.f, 258]             DRAG_GS
    Use   [drag_gs.f, 259]             DRAG_GS
    Use   [drag_gs.f, 260]             DRAG_GS
    Use   [drag_gs.f, 260]             DRAG_GS
    Use   [drag_gs.f, 261]             DRAG_GS
    Use   [drag_gs.f, 262]             DRAG_GS
    Use   [drag_gs.f, 262]             DRAG_GS

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs.f, 1391]         DRAG_HYS
    Set   [drag_gs.f, 1430]            DRAG_HYS
    Use   [drag_gs.f, 1431]            DRAG_HYS
    Set   [drag_gs.f, 1456]            DRAG_HYS
    Use   [drag_gs.f, 1457]            DRAG_HYS
    Use   [drag_gs.f, 1458]            DRAG_HYS
    Use   [drag_gs.f, 1461]            DRAG_HYS
    Use   [drag_gs.f, 1462]            DRAG_HYS
    Use   [drag_gs.f, 1467]            DRAG_HYS
    Use   [drag_gs.f, 1470]            DRAG_HYS
    Use   [drag_gs.f, 1471]            DRAG_HYS
    Use   [drag_gs.f, 1471]            DRAG_HYS
    Use   [drag_gs.f, 1472]            DRAG_HYS
    Use   [drag_gs.f, 1473]            DRAG_HYS

L    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 776]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 866]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 896]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 896]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 900]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 900]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 901]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 902]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 903]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 904]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 905]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 906]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 909]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 910]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 912]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 912]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 913]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 913]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 917]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 917]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 919]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 919]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 922]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 922]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 924]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 924]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 928]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 928]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 930]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 930]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 932]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 932]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 934]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 934]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 936]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 937]    CHECK_SOLIDS_DEM_COLL_HERTZ

L    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 500]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 603]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 620]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 620]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 625]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 626]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 626]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 628]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 630]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 630]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 633]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 633]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 634]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 634]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 638]    CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 679]    CHECK_SOLIDS_DEM_COLL_LSD

L    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 63]   CHECK_SOLIDS_DEM_ENERGY
    Set   [check_solids_dem.f, 150]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 152]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 154]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 154]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 158]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 158]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 159]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 160]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 161]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 165]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 168]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 168]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 174]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 174]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 176]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 177]    CHECK_SOLIDS_DEM_ENERGY

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

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_w_is.f, 43]          DIF_W_IS
    Set   [dif_w_is.f, 50]             DIF_W_IS
    Use   [dif_w_is.f, 51]             DIF_W_IS
    Use   [dif_w_is.f, 52]             DIF_W_IS
    Use   [dif_w_is.f, 53]             DIF_W_IS
    Use   [dif_w_is.f, 54]             DIF_W_IS
    Use   [dif_w_is.f, 55]             DIF_W_IS
    Use   [dif_w_is.f, 56]             DIF_W_IS
    Use   [dif_w_is.f, 57]             DIF_W_IS
    Use   [dif_w_is.f, 59]             DIF_W_IS
    Use   [dif_w_is.f, 81]             DIF_W_IS

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 86]        SOURCE_U_G
    Set   [source_u_g.f, 304]          SOURCE_U_G
    Use   [source_u_g.f, 305]          SOURCE_U_G
    Use   [source_u_g.f, 305]          SOURCE_U_G
    Use   [source_u_g.f, 307]          SOURCE_U_G
    Use   [source_u_g.f, 307]          SOURCE_U_G
    Use   [source_u_g.f, 307]          SOURCE_U_G
    Set   [source_u_g.f, 316]          SOURCE_U_G
    Use   [source_u_g.f, 317]          SOURCE_U_G
    Use   [source_u_g.f, 318]          SOURCE_U_G
    Use   [source_u_g.f, 318]          SOURCE_U_G
    Use   [source_u_g.f, 319]          SOURCE_U_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 431]       SOURCE_U_G_BC
    Set   [source_u_g.f, 580]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 581]   SOURCE_U_G_BC
    Use   [source_u_g.f, 585]          SOURCE_U_G_BC
    Use   [source_u_g.f, 586]          SOURCE_U_G_BC
    Use   [source_u_g.f, 587]          SOURCE_U_G_BC
    Use   [source_u_g.f, 588]          SOURCE_U_G_BC
    Use   [source_u_g.f, 589]          SOURCE_U_G_BC
    Use   [source_u_g.f, 590]          SOURCE_U_G_BC
    Use   [source_u_g.f, 591]          SOURCE_U_G_BC
    Use   [source_u_g.f, 620]          SOURCE_U_G_BC
    Use   [source_u_g.f, 621]          SOURCE_U_G_BC
    Use   [source_u_g.f, 622]          SOURCE_U_G_BC
    Use   [source_u_g.f, 623]          SOURCE_U_G_BC
    Use   [source_u_g.f, 624]          SOURCE_U_G_BC
    Use   [source_u_g.f, 625]          SOURCE_U_G_BC
    Use   [source_u_g.f, 626]          SOURCE_U_G_BC
    Use   [source_u_g.f, 655]          SOURCE_U_G_BC
    Use   [source_u_g.f, 656]          SOURCE_U_G_BC
    Use   [source_u_g.f, 657]          SOURCE_U_G_BC
    Use   [source_u_g.f, 658]          SOURCE_U_G_BC
    Use   [source_u_g.f, 659]          SOURCE_U_G_BC
    Use   [source_u_g.f, 660]          SOURCE_U_G_BC
    Use   [source_u_g.f, 661]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 680]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 683]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 685]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 686]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 687]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 687]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 690]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 693]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 695]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 696]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 697]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 697]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 700]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 703]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 705]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 706]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 707]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 707]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 710]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 713]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 715]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 717]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 719]   SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 719]   SOURCE_U_G_BC
    Use   [source_u_g.f, 727]          SOURCE_U_G_BC
    Use   [source_u_g.f, 728]          SOURCE_U_G_BC
    Use   [source_u_g.f, 729]          SOURCE_U_G_BC
    Use   [source_u_g.f, 731]          SOURCE_U_G_BC
    Use   [source_u_g.f, 732]          SOURCE_U_G_BC
    Use   [source_u_g.f, 733]          SOURCE_U_G_BC
    Use   [source_u_g.f, 734]          SOURCE_U_G_BC
    Use   [source_u_g.f, 735]          SOURCE_U_G_BC
    Use   [source_u_g.f, 736]          SOURCE_U_G_BC
    Use   [source_u_g.f, 758]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 758]   SOURCE_U_G_BC
    Use   [source_u_g.f, 763]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 763]   SOURCE_U_G_BC
    Use   [source_u_g.f, 768]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 768]   SOURCE_U_G_BC
    Use   [source_u_g.f, 773]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 773]   SOURCE_U_G_BC
    Use   [source_u_g.f, 783]          SOURCE_U_G_BC
    Use   [source_u_g.f, 783]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 784]   SOURCE_U_G_BC
    Use   [source_u_g.f, 788]          SOURCE_U_G_BC
    Use   [source_u_g.f, 789]          SOURCE_U_G_BC
    Use   [source_u_g.f, 790]          SOURCE_U_G_BC
    Use   [source_u_g.f, 791]          SOURCE_U_G_BC
    Use   [source_u_g.f, 792]          SOURCE_U_G_BC
    Use   [source_u_g.f, 793]          SOURCE_U_G_BC
    Use   [source_u_g.f, 817]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 818]   SOURCE_U_G_BC
    Use   [source_u_g.f, 819]          SOURCE_U_G_BC
    Use   [source_u_g.f, 820]          SOURCE_U_G_BC
    Use   [source_u_g.f, 821]          SOURCE_U_G_BC
    Use   [source_u_g.f, 822]          SOURCE_U_G_BC
    Use   [source_u_g.f, 823]          SOURCE_U_G_BC
    Use   [source_u_g.f, 824]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 852]   SOURCE_U_G_BC
    Use   [source_u_g.f, 853]          SOURCE_U_G_BC
    Use   [source_u_g.f, 854]          SOURCE_U_G_BC
    Use   [source_u_g.f, 855]          SOURCE_U_G_BC
    Use   [source_u_g.f, 856]          SOURCE_U_G_BC
    Use   [source_u_g.f, 857]          SOURCE_U_G_BC
    Use   [source_u_g.f, 858]          SOURCE_U_G_BC
    Use   [source_u_g.f, 887]          SOURCE_U_G_BC
    Use   [source_u_g.f, 888]          SOURCE_U_G_BC
    Use   [source_u_g.f, 889]          SOURCE_U_G_BC
    Use   [source_u_g.f, 890]          SOURCE_U_G_BC
    Use   [source_u_g.f, 891]          SOURCE_U_G_BC
    Use   [source_u_g.f, 892]          SOURCE_U_G_BC
    Use Argument   [source_u_g.f, 908]   SOURCE_U_G_BC

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_u_s.f, 60]     CG_SOURCE_U_S
    Set   [CG_source_u_s.f, 107]       CG_SOURCE_U_S
    Use   [CG_source_u_s.f, 108]       CG_SOURCE_U_S
    Use   [CG_source_u_s.f, 108]       CG_SOURCE_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [write_out0.f, 51]        WRITE_OUT0
    Set   [write_out0.f, 162]          WRITE_OUT0
    Use   [write_out0.f, 163]          WRITE_OUT0
    Use   [write_out0.f, 163]          WRITE_OUT0
    Use   [write_out0.f, 186]          WRITE_OUT0
    Use   [write_out0.f, 186]          WRITE_OUT0
    Use   [write_out0.f, 187]          WRITE_OUT0
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 189]          WRITE_OUT0
    Set   [write_out0.f, 189]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use   [write_out0.f, 192]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use   [write_out0.f, 194]          WRITE_OUT0
    Set   [write_out0.f, 194]          WRITE_OUT0
    Set   [write_out0.f, 197]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Use   [write_out0.f, 198]          WRITE_OUT0
    Set   [write_out0.f, 418]          WRITE_OUT0
    Use   [write_out0.f, 419]          WRITE_OUT0
    Use   [write_out0.f, 420]          WRITE_OUT0
    Use   [write_out0.f, 421]          WRITE_OUT0
    Use   [write_out0.f, 421]          WRITE_OUT0
    Use   [write_out0.f, 422]          WRITE_OUT0
    Use   [write_out0.f, 422]          WRITE_OUT0
    Use   [write_out0.f, 423]          WRITE_OUT0
    Use   [write_out0.f, 423]          WRITE_OUT0
    Use   [write_out0.f, 424]          WRITE_OUT0
    Use   [write_out0.f, 424]          WRITE_OUT0
    Use   [write_out0.f, 425]          WRITE_OUT0
    Use   [write_out0.f, 425]          WRITE_OUT0
    Use   [write_out0.f, 426]          WRITE_OUT0
    Use   [write_out0.f, 426]          WRITE_OUT0
    Use   [write_out0.f, 427]          WRITE_OUT0
    Use   [write_out0.f, 427]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 430]          WRITE_OUT0
    Use   [write_out0.f, 430]          WRITE_OUT0
    Use   [write_out0.f, 430]          WRITE_OUT0
    Use   [write_out0.f, 430]          WRITE_OUT0
    Use   [write_out0.f, 431]          WRITE_OUT0
    Use   [write_out0.f, 431]          WRITE_OUT0
    Use   [write_out0.f, 432]          WRITE_OUT0
    Use   [write_out0.f, 433]          WRITE_OUT0
    Use   [write_out0.f, 433]          WRITE_OUT0
    Use   [write_out0.f, 434]          WRITE_OUT0
    Use   [write_out0.f, 438]          WRITE_OUT0
    Use   [write_out0.f, 441]          WRITE_OUT0
    Use   [write_out0.f, 441]          WRITE_OUT0
    Use   [write_out0.f, 442]          WRITE_OUT0
    Use   [write_out0.f, 444]          WRITE_OUT0
    Use   [write_out0.f, 444]          WRITE_OUT0
    Use   [write_out0.f, 444]          WRITE_OUT0
    Use   [write_out0.f, 446]          WRITE_OUT0
    Use   [write_out0.f, 447]          WRITE_OUT0
    Use   [write_out0.f, 455]          WRITE_OUT0
    Use   [write_out0.f, 460]          WRITE_OUT0
    Use   [write_out0.f, 461]          WRITE_OUT0
    Use   [write_out0.f, 461]          WRITE_OUT0
    Use   [write_out0.f, 463]          WRITE_OUT0
    Use   [write_out0.f, 463]          WRITE_OUT0
    Use   [write_out0.f, 463]          WRITE_OUT0
    Use   [write_out0.f, 465]          WRITE_OUT0
    Use   [write_out0.f, 465]          WRITE_OUT0
    Use   [write_out0.f, 466]          WRITE_OUT0
    Use   [write_out0.f, 466]          WRITE_OUT0
    Set   [write_out0.f, 483]          WRITE_OUT0
    Use Argument   [write_out0.f, 484]   WRITE_OUT0
    Use   [write_out0.f, 485]          WRITE_OUT0
    Use   [write_out0.f, 486]          WRITE_OUT0
    Use   [write_out0.f, 487]          WRITE_OUT0
    Use   [write_out0.f, 505]          WRITE_OUT0
    Use   [write_out0.f, 506]          WRITE_OUT0
    Use   [write_out0.f, 506]          WRITE_OUT0
    Use   [write_out0.f, 507]          WRITE_OUT0
    Use   [write_out0.f, 507]          WRITE_OUT0
    Use   [write_out0.f, 508]          WRITE_OUT0
    Use   [write_out0.f, 508]          WRITE_OUT0
    Use   [write_out0.f, 509]          WRITE_OUT0
    Use   [write_out0.f, 509]          WRITE_OUT0
    Use   [write_out0.f, 510]          WRITE_OUT0
    Use   [write_out0.f, 510]          WRITE_OUT0
    Use   [write_out0.f, 511]          WRITE_OUT0
    Use   [write_out0.f, 511]          WRITE_OUT0
    Use   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 515]          WRITE_OUT0
    Use   [write_out0.f, 515]          WRITE_OUT0
    Use   [write_out0.f, 515]          WRITE_OUT0
    Use   [write_out0.f, 515]          WRITE_OUT0
    Use   [write_out0.f, 516]          WRITE_OUT0
    Use   [write_out0.f, 516]          WRITE_OUT0
    Use Argument   [write_out0.f, 518]   WRITE_OUT0
    Use   [write_out0.f, 520]          WRITE_OUT0
    Use   [write_out0.f, 520]          WRITE_OUT0
    Use   [write_out0.f, 521]          WRITE_OUT0
    Use   [write_out0.f, 521]          WRITE_OUT0
    Use   [write_out0.f, 522]          WRITE_OUT0
    Use   [write_out0.f, 522]          WRITE_OUT0
    Use Argument   [write_out0.f, 523]   WRITE_OUT0
    Use Argument   [write_out0.f, 526]   WRITE_OUT0
    Use Argument   [write_out0.f, 529]   WRITE_OUT0
    Use Argument   [write_out0.f, 530]   WRITE_OUT0
    Use Argument   [write_out0.f, 531]   WRITE_OUT0
    Use Argument   [write_out0.f, 532]   WRITE_OUT0
    Use   [write_out0.f, 533]          WRITE_OUT0
    Use   [write_out0.f, 533]          WRITE_OUT0
    Use   [write_out0.f, 534]          WRITE_OUT0
    Use   [write_out0.f, 534]          WRITE_OUT0
    Use   [write_out0.f, 535]          WRITE_OUT0
    Use   [write_out0.f, 535]          WRITE_OUT0
    Use Argument   [write_out0.f, 536]   WRITE_OUT0
    Use Argument   [write_out0.f, 537]   WRITE_OUT0
    Use Argument   [write_out0.f, 538]   WRITE_OUT0
    Use Argument   [write_out0.f, 538]   WRITE_OUT0
    Use Argument   [write_out0.f, 538]   WRITE_OUT0
    Use Argument   [write_out0.f, 539]   WRITE_OUT0
    Use Argument   [write_out0.f, 539]   WRITE_OUT0
    Use Argument   [write_out0.f, 539]   WRITE_OUT0
    Use Argument   [write_out0.f, 541]   WRITE_OUT0
    Use   [write_out0.f, 545]          WRITE_OUT0
    Use   [write_out0.f, 547]          WRITE_OUT0
    Use   [write_out0.f, 548]          WRITE_OUT0
    Use Argument   [write_out0.f, 552]   WRITE_OUT0
    Use Argument   [write_out0.f, 556]   WRITE_OUT0
    Use Argument   [write_out0.f, 562]   WRITE_OUT0
    Use Argument   [write_out0.f, 563]   WRITE_OUT0
    Use Argument   [write_out0.f, 564]   WRITE_OUT0
    Use Argument   [write_out0.f, 565]   WRITE_OUT0
    Use   [write_out0.f, 566]          WRITE_OUT0
    Use   [write_out0.f, 566]          WRITE_OUT0
    Use   [write_out0.f, 567]          WRITE_OUT0
    Use   [write_out0.f, 567]          WRITE_OUT0
    Use   [write_out0.f, 568]          WRITE_OUT0
    Use   [write_out0.f, 568]          WRITE_OUT0
    Use   [write_out0.f, 570]          WRITE_OUT0
    Use Argument   [write_out0.f, 571]   WRITE_OUT0
    Use Argument   [write_out0.f, 571]   WRITE_OUT0
    Use Argument   [write_out0.f, 571]   WRITE_OUT0
    Use Argument   [write_out0.f, 572]   WRITE_OUT0
    Use Argument   [write_out0.f, 574]   WRITE_OUT0
    Use Argument   [write_out0.f, 574]   WRITE_OUT0
    Use Argument   [write_out0.f, 575]   WRITE_OUT0
    Use Argument   [write_out0.f, 575]   WRITE_OUT0
    Set   [write_out0.f, 581]          WRITE_OUT0
    Use   [write_out0.f, 582]          WRITE_OUT0
    Use   [write_out0.f, 583]          WRITE_OUT0
    Use   [write_out0.f, 584]          WRITE_OUT0
    Use   [write_out0.f, 585]          WRITE_OUT0
    Use   [write_out0.f, 586]          WRITE_OUT0
    Use   [write_out0.f, 588]          WRITE_OUT0
    Use   [write_out0.f, 589]          WRITE_OUT0
    Use   [write_out0.f, 592]          WRITE_OUT0
    Use   [write_out0.f, 592]          WRITE_OUT0
    Use   [write_out0.f, 593]          WRITE_OUT0
    Use   [write_out0.f, 593]          WRITE_OUT0
    Use   [write_out0.f, 594]          WRITE_OUT0
    Use   [write_out0.f, 594]          WRITE_OUT0
    Use   [write_out0.f, 595]          WRITE_OUT0
    Use   [write_out0.f, 595]          WRITE_OUT0
    Use   [write_out0.f, 596]          WRITE_OUT0
    Use   [write_out0.f, 596]          WRITE_OUT0
    Use   [write_out0.f, 597]          WRITE_OUT0
    Use   [write_out0.f, 597]          WRITE_OUT0
    Use   [write_out0.f, 598]          WRITE_OUT0
    Use   [write_out0.f, 598]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 601]          WRITE_OUT0
    Use   [write_out0.f, 601]          WRITE_OUT0
    Use   [write_out0.f, 601]          WRITE_OUT0
    Use   [write_out0.f, 601]          WRITE_OUT0
    Use   [write_out0.f, 602]          WRITE_OUT0
    Use   [write_out0.f, 602]          WRITE_OUT0
    Use   [write_out0.f, 603]          WRITE_OUT0
    Use   [write_out0.f, 603]          WRITE_OUT0
    Use   [write_out0.f, 604]          WRITE_OUT0
    Use   [write_out0.f, 604]          WRITE_OUT0
    Use   [write_out0.f, 606]          WRITE_OUT0

L    (Local Variable)  Declared as: INTEGER
    Define   [write_out0.f, 957]       LOCATION
    Set   [write_out0.f, 961]          LOCATION
    Set   [write_out0.f, 969]          LOCATION

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

L    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 288]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 342]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 344]   WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 346]   WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 346]   WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 346]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 349]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 349]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 350]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 350]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 353]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 353]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 354]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 354]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 354]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 396]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 397]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 397]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 400]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 401]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 401]      WRITE_DES_TECPLOT

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

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

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 731]       write_mesh_netcdf
    Set   [write_spx1.f, 769]          write_mesh_netcdf
    Use   [write_spx1.f, 770]          write_mesh_netcdf
    Use   [write_spx1.f, 770]          write_mesh_netcdf
    Use   [write_spx1.f, 770]          write_mesh_netcdf
    Set   [write_spx1.f, 774]          write_mesh_netcdf
    Use   [write_spx1.f, 775]          write_mesh_netcdf
    Use   [write_spx1.f, 775]          write_mesh_netcdf
    Use   [write_spx1.f, 775]          write_mesh_netcdf
    Set   [write_spx1.f, 779]          write_mesh_netcdf
    Use   [write_spx1.f, 780]          write_mesh_netcdf
    Use   [write_spx1.f, 780]          write_mesh_netcdf
    Use   [write_spx1.f, 780]          write_mesh_netcdf

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

L    (Dummy Argument)  Declared as: INTEGER
    Define   [write_spx1.f, 25]        WRITE_SPX1
    Declare   [write_spx1.f, 62]       WRITE_SPX1
    Use   [write_spx1.f, 109]          WRITE_SPX1
    Use   [write_spx1.f, 112]          WRITE_SPX1
    Use   [write_spx1.f, 114]          WRITE_SPX1
    Use   [write_spx1.f, 133]          WRITE_SPX1
    Use   [write_spx1.f, 135]          WRITE_SPX1
    Use   [write_spx1.f, 139]          WRITE_SPX1
    Use   [write_spx1.f, 143]          WRITE_SPX1
    Use   [write_spx1.f, 144]          WRITE_SPX1
    Use   [write_spx1.f, 161]          WRITE_SPX1
    Use   [write_spx1.f, 163]          WRITE_SPX1
    Use   [write_spx1.f, 169]          WRITE_SPX1
    Use   [write_spx1.f, 171]          WRITE_SPX1
    Use   [write_spx1.f, 173]          WRITE_SPX1
    Use   [write_spx1.f, 174]          WRITE_SPX1
    Use   [write_spx1.f, 179]          WRITE_SPX1
    Use   [write_spx1.f, 180]          WRITE_SPX1
    Use   [write_spx1.f, 184]          WRITE_SPX1
    Use   [write_spx1.f, 185]          WRITE_SPX1
    Use   [write_spx1.f, 193]          WRITE_SPX1
    Use   [write_spx1.f, 195]          WRITE_SPX1
    Use   [write_spx1.f, 201]          WRITE_SPX1
    Use   [write_spx1.f, 203]          WRITE_SPX1
    Use   [write_spx1.f, 205]          WRITE_SPX1
    Use   [write_spx1.f, 207]          WRITE_SPX1
    Use   [write_spx1.f, 208]          WRITE_SPX1
    Use   [write_spx1.f, 209]          WRITE_SPX1
    Use   [write_spx1.f, 215]          WRITE_SPX1
    Use   [write_spx1.f, 216]          WRITE_SPX1
    Use   [write_spx1.f, 217]          WRITE_SPX1
    Use   [write_spx1.f, 221]          WRITE_SPX1
    Use   [write_spx1.f, 222]          WRITE_SPX1
    Use   [write_spx1.f, 230]          WRITE_SPX1
    Use   [write_spx1.f, 232]          WRITE_SPX1
    Use   [write_spx1.f, 239]          WRITE_SPX1
    Use   [write_spx1.f, 241]          WRITE_SPX1
    Use   [write_spx1.f, 243]          WRITE_SPX1
    Use   [write_spx1.f, 245]          WRITE_SPX1
    Use   [write_spx1.f, 246]          WRITE_SPX1
    Use   [write_spx1.f, 247]          WRITE_SPX1
    Use   [write_spx1.f, 257]          WRITE_SPX1
    Use   [write_spx1.f, 258]          WRITE_SPX1
    Use   [write_spx1.f, 259]          WRITE_SPX1
    Use   [write_spx1.f, 264]          WRITE_SPX1
    Use   [write_spx1.f, 265]          WRITE_SPX1
    Use   [write_spx1.f, 273]          WRITE_SPX1
    Use   [write_spx1.f, 275]          WRITE_SPX1
    Use   [write_spx1.f, 282]          WRITE_SPX1
    Use   [write_spx1.f, 284]          WRITE_SPX1
    Use   [write_spx1.f, 292]          WRITE_SPX1
    Use   [write_spx1.f, 297]          WRITE_SPX1
    Use   [write_spx1.f, 298]          WRITE_SPX1
    Use   [write_spx1.f, 306]          WRITE_SPX1
    Use   [write_spx1.f, 308]          WRITE_SPX1
    Use   [write_spx1.f, 314]          WRITE_SPX1
    Use   [write_spx1.f, 317]          WRITE_SPX1
    Use   [write_spx1.f, 320]          WRITE_SPX1
    Use   [write_spx1.f, 322]          WRITE_SPX1
    Use   [write_spx1.f, 330]          WRITE_SPX1
    Use   [write_spx1.f, 332]          WRITE_SPX1
    Use   [write_spx1.f, 337]          WRITE_SPX1
    Use   [write_spx1.f, 338]          WRITE_SPX1
    Use   [write_spx1.f, 345]          WRITE_SPX1
    Use   [write_spx1.f, 347]          WRITE_SPX1
    Use   [write_spx1.f, 354]          WRITE_SPX1
    Use   [write_spx1.f, 359]          WRITE_SPX1
    Use   [write_spx1.f, 364]          WRITE_SPX1
    Use   [write_spx1.f, 368]          WRITE_SPX1
    Use   [write_spx1.f, 384]          WRITE_SPX1
    Use   [write_spx1.f, 388]          WRITE_SPX1
    Use   [write_spx1.f, 394]          WRITE_SPX1
    Use   [write_spx1.f, 395]          WRITE_SPX1
    Use   [write_spx1.f, 403]          WRITE_SPX1
    Use   [write_spx1.f, 405]          WRITE_SPX1
    Use   [write_spx1.f, 412]          WRITE_SPX1
    Use   [write_spx1.f, 416]          WRITE_SPX1
    Use   [write_spx1.f, 424]          WRITE_SPX1
    Use   [write_spx1.f, 429]          WRITE_SPX1
    Use   [write_spx1.f, 430]          WRITE_SPX1
    Use   [write_spx1.f, 438]          WRITE_SPX1
    Use   [write_spx1.f, 440]          WRITE_SPX1
    Use   [write_spx1.f, 447]          WRITE_SPX1
    Use   [write_spx1.f, 451]          WRITE_SPX1
    Use   [write_spx1.f, 459]          WRITE_SPX1
    Use   [write_spx1.f, 464]          WRITE_SPX1
    Use   [write_spx1.f, 465]          WRITE_SPX1
    Use   [write_spx1.f, 472]          WRITE_SPX1
    Use   [write_spx1.f, 474]          WRITE_SPX1
    Use   [write_spx1.f, 481]          WRITE_SPX1
    Use   [write_spx1.f, 485]          WRITE_SPX1
    Use   [write_spx1.f, 493]          WRITE_SPX1
    Use   [write_spx1.f, 498]          WRITE_SPX1
    Use   [write_spx1.f, 499]          WRITE_SPX1
    Use   [write_spx1.f, 506]          WRITE_SPX1
    Use   [write_spx1.f, 508]          WRITE_SPX1
    Use   [write_spx1.f, 515]          WRITE_SPX1
    Use   [write_spx1.f, 517]          WRITE_SPX1
    Use   [write_spx1.f, 519]          WRITE_SPX1
    Use   [write_spx1.f, 520]          WRITE_SPX1
    Use   [write_spx1.f, 526]          WRITE_SPX1
    Use   [write_spx1.f, 527]          WRITE_SPX1
    Use   [write_spx1.f, 533]          WRITE_SPX1
    Use   [write_spx1.f, 534]          WRITE_SPX1

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m.f, 48]        WRITE_AB_M
    Set   [write_ab_m.f, 96]           WRITE_AB_M
    Use   [write_ab_m.f, 98]           WRITE_AB_M
    Use   [write_ab_m.f, 109]          WRITE_AB_M
    Use   [write_ab_m.f, 127]          WRITE_AB_M
    Set   [write_ab_m.f, 127]          WRITE_AB_M

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 45]   CALC_INTERP_WEIGHTS1
    Set   [calc_interp_weights.f, 62]   CALC_INTERP_WEIGHTS1
    Use Argument   [calc_interp_weights.f, 64]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 66]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 67]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 68]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 71]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 72]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 76]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 77]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 83]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 84]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 92]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 105]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 106]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 108]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 109]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 112]   CALC_INTERP_WEIGHTS1
    Use   [calc_interp_weights.f, 113]   CALC_INTERP_WEIGHTS1

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_interp_weights.f, 177]   CALC_INTERP_WEIGHTS2
    Set   [calc_interp_weights.f, 191]   CALC_INTERP_WEIGHTS2
    Use Argument   [calc_interp_weights.f, 193]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 195]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 196]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 197]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 201]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 202]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 206]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 213]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 214]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 218]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 227]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 228]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 232]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 242]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 255]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 256]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 258]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 259]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 262]   CALC_INTERP_WEIGHTS2
    Use   [calc_interp_weights.f, 263]   CALC_INTERP_WEIGHTS2

L    (Local Variable)  Declared as: INTEGER
    Define   [source_population_eq.f, 17]   Source_population_eq
    Set   [source_population_eq.f, 84]   Source_population_eq
    Use   [source_population_eq.f, 89]   Source_population_eq
    Use   [source_population_eq.f, 89]   Source_population_eq
    Use   [source_population_eq.f, 91]   Source_population_eq
    Use   [source_population_eq.f, 91]   Source_population_eq
    Use   [source_population_eq.f, 93]   Source_population_eq
    Use   [source_population_eq.f, 97]   Source_population_eq
    Use   [source_population_eq.f, 97]   Source_population_eq
    Use   [source_population_eq.f, 99]   Source_population_eq
    Use   [source_population_eq.f, 100]   Source_population_eq
    Use   [source_population_eq.f, 102]   Source_population_eq
    Use   [source_population_eq.f, 102]   Source_population_eq
    Use   [source_population_eq.f, 104]   Source_population_eq
    Use   [source_population_eq.f, 105]   Source_population_eq
    Use   [source_population_eq.f, 113]   Source_population_eq
    Use   [source_population_eq.f, 113]   Source_population_eq
    Use   [source_population_eq.f, 115]   Source_population_eq
    Use   [source_population_eq.f, 115]   Source_population_eq
    Use   [source_population_eq.f, 116]   Source_population_eq
    Use   [source_population_eq.f, 116]   Source_population_eq
    Use   [source_population_eq.f, 117]   Source_population_eq

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

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 645]        gt_pde_ahmadi
    Set   [calc_mu_s.f, 666]           gt_pde_ahmadi
    Use   [calc_mu_s.f, 671]           gt_pde_ahmadi
    Use   [calc_mu_s.f, 672]           gt_pde_ahmadi
    Use   [calc_mu_s.f, 674]           gt_pde_ahmadi

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 1416]       gt_pde_ia
    Set   [calc_mu_s.f, 1442]          gt_pde_ia
    Use   [calc_mu_s.f, 1443]          gt_pde_ia
    Use   [calc_mu_s.f, 1443]          gt_pde_ia
    Set   [calc_mu_s.f, 1482]          gt_pde_ia
    Use   [calc_mu_s.f, 1483]          gt_pde_ia
    Use   [calc_mu_s.f, 1484]          gt_pde_ia
    Use   [calc_mu_s.f, 1487]          gt_pde_ia
    Use   [calc_mu_s.f, 1489]          gt_pde_ia
    Use   [calc_mu_s.f, 1495]          gt_pde_ia
    Use   [calc_mu_s.f, 1500]          gt_pde_ia
    Use   [calc_mu_s.f, 1505]          gt_pde_ia
    Use   [calc_mu_s.f, 1508]          gt_pde_ia
    Use   [calc_mu_s.f, 1512]          gt_pde_ia
    Use   [calc_mu_s.f, 1516]          gt_pde_ia
    Use   [calc_mu_s.f, 1519]          gt_pde_ia
    Use   [calc_mu_s.f, 1521]          gt_pde_ia
    Use   [calc_mu_s.f, 1524]          gt_pde_ia
    Use   [calc_mu_s.f, 1536]          gt_pde_ia
    Use   [calc_mu_s.f, 1539]          gt_pde_ia
    Use   [calc_mu_s.f, 1542]          gt_pde_ia
    Use   [calc_mu_s.f, 1546]          gt_pde_ia
    Use   [calc_mu_s.f, 1547]          gt_pde_ia
    Use   [calc_mu_s.f, 1552]          gt_pde_ia
    Use   [calc_mu_s.f, 1556]          gt_pde_ia
    Use   [calc_mu_s.f, 1560]          gt_pde_ia
    Use   [calc_mu_s.f, 1564]          gt_pde_ia
    Use   [calc_mu_s.f, 1568]          gt_pde_ia
    Use   [calc_mu_s.f, 1569]          gt_pde_ia
    Set   [calc_mu_s.f, 1610]          gt_pde_ia
    Use   [calc_mu_s.f, 1611]          gt_pde_ia
    Use   [calc_mu_s.f, 1612]          gt_pde_ia
    Use   [calc_mu_s.f, 1615]          gt_pde_ia
    Use   [calc_mu_s.f, 1617]          gt_pde_ia
    Use   [calc_mu_s.f, 1623]          gt_pde_ia
    Use   [calc_mu_s.f, 1631]          gt_pde_ia
    Use   [calc_mu_s.f, 1635]          gt_pde_ia
    Use   [calc_mu_s.f, 1642]          gt_pde_ia
    Use   [calc_mu_s.f, 1643]          gt_pde_ia
    Use   [calc_mu_s.f, 1646]          gt_pde_ia
    Use   [calc_mu_s.f, 1676]          gt_pde_ia
    Use   [calc_mu_s.f, 1694]          gt_pde_ia
    Use   [calc_mu_s.f, 1695]          gt_pde_ia
    Use   [calc_mu_s.f, 1715]          gt_pde_ia
    Use   [calc_mu_s.f, 1717]          gt_pde_ia
    Use   [calc_mu_s.f, 1717]          gt_pde_ia
    Use   [calc_mu_s.f, 1722]          gt_pde_ia
    Use   [calc_mu_s.f, 1724]          gt_pde_ia
    Use   [calc_mu_s.f, 1728]          gt_pde_ia
    Use   [calc_mu_s.f, 1731]          gt_pde_ia
    Use   [calc_mu_s.f, 1734]          gt_pde_ia
    Use   [calc_mu_s.f, 1734]          gt_pde_ia
    Use   [calc_mu_s.f, 1735]          gt_pde_ia
    Use   [calc_mu_s.f, 1735]          gt_pde_ia

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 801]        gt_pde_simonin
    Set   [calc_mu_s.f, 827]           gt_pde_simonin
    Use   [calc_mu_s.f, 832]           gt_pde_simonin
    Use   [calc_mu_s.f, 833]           gt_pde_simonin
    Use   [calc_mu_s.f, 835]           gt_pde_simonin
    Use   [calc_mu_s.f, 840]           gt_pde_simonin
    Use   [calc_mu_s.f, 844]           gt_pde_simonin

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_mu_s.f, 2613]       init1_mu_s
    Set   [calc_mu_s.f, 2629]          init1_mu_s
    Use   [calc_mu_s.f, 2630]          init1_mu_s
    Use   [calc_mu_s.f, 2631]          init1_mu_s
    Set   [calc_mu_s.f, 2676]          init1_mu_s
    Use   [calc_mu_s.f, 2677]          init1_mu_s
    Use   [calc_mu_s.f, 2678]          init1_mu_s
    Use Argument   [calc_mu_s.f, 2682]   init1_mu_s
    Use   [calc_mu_s.f, 2686]          init1_mu_s
    Use   [calc_mu_s.f, 2689]          init1_mu_s
    Use   [calc_mu_s.f, 2689]          init1_mu_s
    Use   [calc_mu_s.f, 2695]          init1_mu_s
    Use   [calc_mu_s.f, 2695]          init1_mu_s
    Set   [calc_mu_s.f, 2711]          init1_mu_s
    Use   [calc_mu_s.f, 2712]          init1_mu_s
    Use   [calc_mu_s.f, 2713]          init1_mu_s

L    (Local Variable)  Declared as: INTEGER
    Define   [write_ab_m_var.f, 46]    WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 91]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 93]       WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 104]      WRITE_AB_M_VAR
    Use   [write_ab_m_var.f, 126]      WRITE_AB_M_VAR
    Set   [write_ab_m_var.f, 126]      WRITE_AB_M_VAR

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [source_u_s.f, 965]       JJ_BC_U_S
    Declare   [source_u_s.f, 995]      JJ_BC_U_S
    Use Argument   [source_u_s.f, 1038]   JJ_BC_U_S
    Use   [source_u_s.f, 1042]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1043]   JJ_BC_U_S
    Use Argument   [source_u_s.f, 1048]   JJ_BC_U_S
    Use Argument   [source_u_s.f, 1067]   JJ_BC_U_S
    Use   [source_u_s.f, 1069]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1070]   JJ_BC_U_S
    Use Argument   [source_u_s.f, 1073]   JJ_BC_U_S
    Use Argument   [source_u_s.f, 1090]   JJ_BC_U_S
    Use   [source_u_s.f, 1092]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1093]   JJ_BC_U_S
    Use Argument   [source_u_s.f, 1096]   JJ_BC_U_S
    Use Argument   [source_u_s.f, 1113]   JJ_BC_U_S
    Use   [source_u_s.f, 1115]         JJ_BC_U_S
    Use Argument   [source_u_s.f, 1116]   JJ_BC_U_S
    Use Argument   [source_u_s.f, 1119]   JJ_BC_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 78]        SOURCE_U_S
    Set   [source_u_s.f, 146]          SOURCE_U_S
    Use   [source_u_s.f, 147]          SOURCE_U_S
    Use   [source_u_s.f, 147]          SOURCE_U_S
    Use   [source_u_s.f, 148]          SOURCE_U_S
    Use   [source_u_s.f, 149]          SOURCE_U_S
    Use   [source_u_s.f, 151]          SOURCE_U_S
    Use   [source_u_s.f, 154]          SOURCE_U_S
    Use   [source_u_s.f, 154]          SOURCE_U_S
    Set   [source_u_s.f, 202]          SOURCE_U_S
    Use   [source_u_s.f, 203]          SOURCE_U_S
    Use   [source_u_s.f, 204]          SOURCE_U_S
    Use   [source_u_s.f, 205]          SOURCE_U_S
    Use   [source_u_s.f, 206]          SOURCE_U_S
    Use   [source_u_s.f, 208]          SOURCE_U_S
    Use   [source_u_s.f, 209]          SOURCE_U_S
    Set   [source_u_s.f, 364]          SOURCE_U_S
    Use   [source_u_s.f, 365]          SOURCE_U_S
    Use   [source_u_s.f, 366]          SOURCE_U_S
    Set   [source_u_s.f, 399]          SOURCE_U_S
    Use   [source_u_s.f, 400]          SOURCE_U_S
    Use   [source_u_s.f, 400]          SOURCE_U_S
    Use   [source_u_s.f, 402]          SOURCE_U_S
    Use   [source_u_s.f, 402]          SOURCE_U_S
    Use   [source_u_s.f, 403]          SOURCE_U_S
    Set   [source_u_s.f, 411]          SOURCE_U_S
    Use   [source_u_s.f, 412]          SOURCE_U_S
    Use   [source_u_s.f, 413]          SOURCE_U_S
    Use   [source_u_s.f, 413]          SOURCE_U_S
    Use   [source_u_s.f, 415]          SOURCE_U_S

L    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 530]       SOURCE_U_S_BC
    Set   [source_u_s.f, 656]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 657]   SOURCE_U_S_BC
    Use   [source_u_s.f, 660]          SOURCE_U_S_BC
    Use   [source_u_s.f, 661]          SOURCE_U_S_BC
    Use   [source_u_s.f, 662]          SOURCE_U_S_BC
    Use   [source_u_s.f, 663]          SOURCE_U_S_BC
    Use   [source_u_s.f, 664]          SOURCE_U_S_BC
    Use   [source_u_s.f, 665]          SOURCE_U_S_BC
    Use   [source_u_s.f, 666]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 667]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 696]   SOURCE_U_S_BC
    Use   [source_u_s.f, 699]          SOURCE_U_S_BC
    Use   [source_u_s.f, 700]          SOURCE_U_S_BC
    Use   [source_u_s.f, 701]          SOURCE_U_S_BC
    Use   [source_u_s.f, 702]          SOURCE_U_S_BC
    Use   [source_u_s.f, 703]          SOURCE_U_S_BC
    Use   [source_u_s.f, 704]          SOURCE_U_S_BC
    Use   [source_u_s.f, 705]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 706]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 735]   SOURCE_U_S_BC
    Use   [source_u_s.f, 738]          SOURCE_U_S_BC
    Use   [source_u_s.f, 739]          SOURCE_U_S_BC
    Use   [source_u_s.f, 740]          SOURCE_U_S_BC
    Use   [source_u_s.f, 741]          SOURCE_U_S_BC
    Use   [source_u_s.f, 742]          SOURCE_U_S_BC
    Use   [source_u_s.f, 743]          SOURCE_U_S_BC
    Use   [source_u_s.f, 744]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 745]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 764]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 767]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 769]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 770]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 771]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 771]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 774]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 777]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 779]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 780]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 781]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 781]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 784]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 787]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 789]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 791]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 793]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 793]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 796]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 799]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 801]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 803]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 805]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 805]   SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 812]   SOURCE_U_S_BC
    Use   [source_u_s.f, 816]          SOURCE_U_S_BC
    Use   [source_u_s.f, 816]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 817]   SOURCE_U_S_BC
    Use   [source_u_s.f, 818]          SOURCE_U_S_BC
    Use   [source_u_s.f, 819]          SOURCE_U_S_BC
    Use   [source_u_s.f, 820]          SOURCE_U_S_BC
    Use   [source_u_s.f, 821]          SOURCE_U_S_BC
    Use   [source_u_s.f, 822]          SOURCE_U_S_BC
    Use   [source_u_s.f, 823]          SOURCE_U_S_BC
    Use   [source_u_s.f, 843]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 844]   SOURCE_U_S_BC
    Use   [source_u_s.f, 845]          SOURCE_U_S_BC
    Use   [source_u_s.f, 846]          SOURCE_U_S_BC
    Use   [source_u_s.f, 847]          SOURCE_U_S_BC
    Use   [source_u_s.f, 848]          SOURCE_U_S_BC
    Use   [source_u_s.f, 849]          SOURCE_U_S_BC
    Use   [source_u_s.f, 850]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 878]   SOURCE_U_S_BC
    Use   [source_u_s.f, 879]          SOURCE_U_S_BC
    Use   [source_u_s.f, 880]          SOURCE_U_S_BC
    Use   [source_u_s.f, 881]          SOURCE_U_S_BC
    Use   [source_u_s.f, 882]          SOURCE_U_S_BC
    Use   [source_u_s.f, 883]          SOURCE_U_S_BC
    Use   [source_u_s.f, 884]          SOURCE_U_S_BC
    Use   [source_u_s.f, 908]          SOURCE_U_S_BC
    Use   [source_u_s.f, 909]          SOURCE_U_S_BC
    Use   [source_u_s.f, 910]          SOURCE_U_S_BC
    Use   [source_u_s.f, 911]          SOURCE_U_S_BC
    Use   [source_u_s.f, 912]          SOURCE_U_S_BC
    Use   [source_u_s.f, 913]          SOURCE_U_S_BC
    Use Argument   [source_u_s.f, 929]   SOURCE_U_S_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 54]       SET_WALL_BC
    Set   [set_wall_bc.f, 67]          SET_WALL_BC
    Use Argument   [set_wall_bc.f, 68]   SET_WALL_BC
    Use   [set_wall_bc.f, 71]          SET_WALL_BC
    Use   [set_wall_bc.f, 72]          SET_WALL_BC
    Use   [set_wall_bc.f, 73]          SET_WALL_BC
    Use   [set_wall_bc.f, 74]          SET_WALL_BC
    Use   [set_wall_bc.f, 75]          SET_WALL_BC
    Use   [set_wall_bc.f, 76]          SET_WALL_BC
    Use   [set_wall_bc.f, 78]          SET_WALL_BC
    Use Argument   [set_wall_bc.f, 81]   SET_WALL_BC
    Use Argument   [set_wall_bc.f, 85]   SET_WALL_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_w_s.f, 66]     CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 131]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 132]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 137]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 137]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 138]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 138]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 139]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 139]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 140]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 140]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 141]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 141]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 142]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 142]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 144]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 144]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 145]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 145]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 146]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 146]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 147]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 147]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 148]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 148]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 149]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 149]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 151]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 152]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 153]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 153]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 154]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 154]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 157]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 158]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 161]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 161]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 164]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 164]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 165]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 165]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 169]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 169]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 170]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 170]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 180]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 180]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 181]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 181]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 183]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 183]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 188]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 188]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 194]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 194]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 200]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 200]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 201]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 201]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 205]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 213]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 214]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 215]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 215]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 228]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 229]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 235]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 236]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 239]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 239]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 249]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 249]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 254]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 255]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 257]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 257]       CALC_IA_MOMSOURCE_W_S

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

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 69]   PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 95]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 96]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 96]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 97]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 97]     PARTIAL_ELIM_GHD_U
    Use Argument   [partial_elim_ghd.f, 98]   PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 103]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 106]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 106]    PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 139]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 140]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 140]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 146]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 148]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 150]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 155]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 155]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 157]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 157]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 158]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 158]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 158]    PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 166]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 167]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 167]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 168]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 169]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 170]    PARTIAL_ELIM_GHD_U
    Use Argument   [partial_elim_ghd.f, 174]   PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 179]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 180]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 181]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 181]    PARTIAL_ELIM_GHD_U

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 267]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 296]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 297]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 297]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 298]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 298]    PARTIAL_ELIM_GHD_V
    Use Argument   [partial_elim_ghd.f, 299]   PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 303]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 306]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 306]    PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 337]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 338]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 338]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 344]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 346]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 348]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 353]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 353]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 355]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 355]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 356]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 356]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 356]    PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 364]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 365]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 365]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 366]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 367]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 368]    PARTIAL_ELIM_GHD_V
    Use Argument   [partial_elim_ghd.f, 372]   PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 376]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 377]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 378]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 378]    PARTIAL_ELIM_GHD_V

L    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 458]   PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 485]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 486]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 486]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 487]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 487]    PARTIAL_ELIM_GHD_W
    Use Argument   [partial_elim_ghd.f, 488]   PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 492]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 495]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 495]    PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 526]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 527]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 527]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 533]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 535]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 537]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 543]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 543]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 545]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 545]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 546]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 546]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 546]    PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 554]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 555]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 555]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 556]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 557]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 558]    PARTIAL_ELIM_GHD_W
    Use Argument   [partial_elim_ghd.f, 562]   PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 566]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 567]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 568]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 568]    PARTIAL_ELIM_GHD_W

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_pic.f, 31]   MASS_INFLOW_PIC
    Set   [mass_inflow_pic.f, 229]     MASS_INFLOW_PIC

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

L    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2407]   SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Set   [set_increments.f, 2429]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2432]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2435]     SHIFT_CONNECTIVITY_FOR_BDIST_IO
    Use   [set_increments.f, 2437]     SHIFT_CONNECTIVITY_FOR_BDIST_IO

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

L    (Local Variable)  Declared as: INTEGER
    Define   [set_ic.f, 39]            SET_IC
    Set   [set_ic.f, 69]               SET_IC
    Use   [set_ic.f, 70]               SET_IC
    Use   [set_ic.f, 72]               SET_IC
    Use   [set_ic.f, 73]               SET_IC
    Use   [set_ic.f, 74]               SET_IC
    Use   [set_ic.f, 75]               SET_IC
    Use   [set_ic.f, 76]               SET_IC
    Use   [set_ic.f, 77]               SET_IC
    Use   [set_ic.f, 78]               SET_IC
    Use   [set_ic.f, 79]               SET_IC
    Use   [set_ic.f, 83]               SET_IC
    Use   [set_ic.f, 84]               SET_IC
    Use   [set_ic.f, 85]               SET_IC
    Use   [set_ic.f, 86]               SET_IC
    Use   [set_ic.f, 87]               SET_IC
    Use   [set_ic.f, 91]               SET_IC
    Use   [set_ic.f, 91]               SET_IC
    Use   [set_ic.f, 92]               SET_IC
    Use   [set_ic.f, 92]               SET_IC
    Use   [set_ic.f, 93]               SET_IC
    Use   [set_ic.f, 93]               SET_IC
    Use   [set_ic.f, 101]              SET_IC
    Use   [set_ic.f, 110]              SET_IC
    Use   [set_ic.f, 111]              SET_IC
    Use   [set_ic.f, 114]              SET_IC
    Use   [set_ic.f, 115]              SET_IC
    Use   [set_ic.f, 119]              SET_IC
    Use   [set_ic.f, 120]              SET_IC
    Use   [set_ic.f, 124]              SET_IC
    Use   [set_ic.f, 125]              SET_IC
    Use   [set_ic.f, 126]              SET_IC
    Use   [set_ic.f, 127]              SET_IC
    Use   [set_ic.f, 134]              SET_IC
    Use   [set_ic.f, 135]              SET_IC
    Use   [set_ic.f, 136]              SET_IC
    Use   [set_ic.f, 141]              SET_IC
    Use   [set_ic.f, 142]              SET_IC
    Use   [set_ic.f, 147]              SET_IC
    Use   [set_ic.f, 148]              SET_IC
    Use   [set_ic.f, 149]              SET_IC
    Use   [set_ic.f, 152]              SET_IC
    Use   [set_ic.f, 153]              SET_IC
    Use   [set_ic.f, 173]              SET_IC
    Use   [set_ic.f, 176]              SET_IC

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_u_is.f, 45]          DIF_U_IS
    Set   [dif_u_is.f, 53]             DIF_U_IS
    Use   [dif_u_is.f, 54]             DIF_U_IS
    Use   [dif_u_is.f, 55]             DIF_U_IS
    Use   [dif_u_is.f, 56]             DIF_U_IS
    Use   [dif_u_is.f, 57]             DIF_U_IS
    Use   [dif_u_is.f, 58]             DIF_U_IS
    Use   [dif_u_is.f, 59]             DIF_U_IS
    Use   [dif_u_is.f, 60]             DIF_U_IS
    Use   [dif_u_is.f, 70]             DIF_U_IS
    Use   [dif_u_is.f, 92]             DIF_U_IS

L    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 38]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 152]     MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 154]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 155]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 155]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 155]   MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 156]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 156]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 157]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 157]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 157]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 158]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 158]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 158]     MAKE_ARRAYS_DES

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [usr_src_mod.f, 98]       CALC_USR_SOURCE
    Set   [usr_src_mod.f, 183]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 185]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 186]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 198]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 198]         CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 202]   CALC_USR_SOURCE
    Use   [usr_src_mod.f, 203]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 203]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 204]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 204]         CALC_USR_SOURCE
    Set   [usr_src_mod.f, 226]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 228]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 229]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 241]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 241]         CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 245]   CALC_USR_SOURCE
    Use   [usr_src_mod.f, 246]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 246]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 247]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 247]         CALC_USR_SOURCE
    Set   [usr_src_mod.f, 269]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 271]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 272]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 284]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 284]         CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 288]   CALC_USR_SOURCE
    Use   [usr_src_mod.f, 289]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 289]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 290]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 290]         CALC_USR_SOURCE

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

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

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

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

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

l    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 19529]           cdrv
    Use   [ODEPACK.F, 19531]           cdrv
    Use   [ODEPACK.F, 19542]           cdrv
    Use   [ODEPACK.F, 19549]           cdrv
    Use   [ODEPACK.F, 19555]           cdrv

L    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 27058]        DGBFA
    Set   [ODEPACK.F, 27099]           DGBFA
    Use   [ODEPACK.F, 27100]           DGBFA
    Use   [ODEPACK.F, 27104]           DGBFA
    Use   [ODEPACK.F, 27108]           DGBFA
    Use   [ODEPACK.F, 27109]           DGBFA
    Use   [ODEPACK.F, 27110]           DGBFA
    Set   [ODEPACK.F, 27125]           DGBFA
    Use   [ODEPACK.F, 27125]           DGBFA
    Use   [ODEPACK.F, 27127]           DGBFA
    Use   [ODEPACK.F, 27128]           DGBFA
    Use   [ODEPACK.F, 27129]           DGBFA

L    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 27226]        DGBSL
    Set   [ODEPACK.F, 27239]           DGBSL
    Use   [ODEPACK.F, 27240]           DGBSL
    Use   [ODEPACK.F, 27241]           DGBSL
    Use   [ODEPACK.F, 27242]           DGBSL
    Set   [ODEPACK.F, 27282]           DGBSL
    Use   [ODEPACK.F, 27283]           DGBSL
    Use   [ODEPACK.F, 27284]           DGBSL
    Use   [ODEPACK.F, 27285]           DGBSL

L    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26776]        DGEFA
    Set   [ODEPACK.F, 26789]           DGEFA
    Use   [ODEPACK.F, 26790]           DGEFA
    Use   [ODEPACK.F, 26794]           DGEFA
    Use   [ODEPACK.F, 26798]           DGEFA
    Use   [ODEPACK.F, 26799]           DGEFA
    Use   [ODEPACK.F, 26800]           DGEFA
    Use   [ODEPACK.F, 26812]           DGEFA
    Use   [ODEPACK.F, 26813]           DGEFA
    Use   [ODEPACK.F, 26814]           DGEFA

L    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26903]        DGESL
    Set   [ODEPACK.F, 26913]           DGESL
    Use   [ODEPACK.F, 26914]           DGESL
    Use   [ODEPACK.F, 26915]           DGESL
    Use   [ODEPACK.F, 26916]           DGESL
    Set   [ODEPACK.F, 26948]           DGESL
    Use   [ODEPACK.F, 26949]           DGESL
    Use   [ODEPACK.F, 26950]           DGESL
    Use   [ODEPACK.F, 26951]           DGESL

L    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 23690]        DHEFA
    Set   [ODEPACK.F, 23709]           DHEFA
    Use   [ODEPACK.F, 23710]           DHEFA
    Use   [ODEPACK.F, 23714]           DHEFA
    Use   [ODEPACK.F, 23718]           DHEFA
    Use   [ODEPACK.F, 23719]           DHEFA
    Use   [ODEPACK.F, 23720]           DHEFA
    Use   [ODEPACK.F, 23732]           DHEFA
    Use   [ODEPACK.F, 23733]           DHEFA
    Use   [ODEPACK.F, 23734]           DHEFA
    Set   [ODEPACK.F, 23762]           DHEFA
    Use   [ODEPACK.F, 23763]           DHEFA
    Use   [ODEPACK.F, 23764]           DHEFA
    Use   [ODEPACK.F, 23765]           DHEFA
    Set   [ODEPACK.F, 23778]           DHEFA
    Use   [ODEPACK.F, 23779]           DHEFA
    Use   [ODEPACK.F, 23783]           DHEFA
    Use   [ODEPACK.F, 23787]           DHEFA
    Use   [ODEPACK.F, 23788]           DHEFA
    Use   [ODEPACK.F, 23789]           DHEFA
    Use   [ODEPACK.F, 23800]           DHEFA
    Use   [ODEPACK.F, 23801]           DHEFA
    Use   [ODEPACK.F, 23802]           DHEFA

L    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 23852]        DHESL
    Set   [ODEPACK.F, 23862]           DHESL
    Use   [ODEPACK.F, 23863]           DHESL
    Use   [ODEPACK.F, 23864]           DHESL
    Use   [ODEPACK.F, 23865]           DHESL

l    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 18759]        md
    Declare   [ODEPACK.F, 18843]       md
    Use Argument   [ODEPACK.F, 18850]   md
    Use Argument   [ODEPACK.F, 18878]   md
    Use Argument   [ODEPACK.F, 18882]   md
    Use Argument   [ODEPACK.F, 18886]   md

l    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 18898]        mdi
    Declare   [ODEPACK.F, 18902]       mdi
    Set   [ODEPACK.F, 18908]           mdi
    Use   [ODEPACK.F, 18928]           mdi
    Set   [ODEPACK.F, 18937]           mdi
    Use   [ODEPACK.F, 18937]           mdi
    Set   [ODEPACK.F, 18938]           mdi
    Set   [ODEPACK.F, 18944]           mdi
    Use   [ODEPACK.F, 18944]           mdi
    Set   [ODEPACK.F, 18945]           mdi

l    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 18967]        mdm
    Declare   [ODEPACK.F, 18971]       mdm
    Use   [ODEPACK.F, 18980]           mdm
    Use   [ODEPACK.F, 18983]           mdm
    Set   [ODEPACK.F, 18990]           mdm
    Use   [ODEPACK.F, 18996]           mdm
    Use   [ODEPACK.F, 19000]           mdm
    Set   [ODEPACK.F, 19007]           mdm
    Set   [ODEPACK.F, 19017]           mdm

l    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 19022]        mdp
    Declare   [ODEPACK.F, 19026]       mdp
    Use   [ODEPACK.F, 19038]           mdp
    Use   [ODEPACK.F, 19052]           mdp
    Set   [ODEPACK.F, 19057]           mdp
    Use   [ODEPACK.F, 19057]           mdp
    Use   [ODEPACK.F, 19062]           mdp
    Set   [ODEPACK.F, 19064]           mdp
    Use   [ODEPACK.F, 19064]           mdp
    Use   [ODEPACK.F, 19074]           mdp
    Set   [ODEPACK.F, 19084]           mdp
    Set   [ODEPACK.F, 19086]           mdp
    Use   [ODEPACK.F, 19086]           mdp
    Set   [ODEPACK.F, 19101]           mdp
    Use   [ODEPACK.F, 19101]           mdp
    Set   [ODEPACK.F, 19102]           mdp
    Set   [ODEPACK.F, 19106]           mdp

l    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 19111]        mdu
    Declare   [ODEPACK.F, 19115]       mdu
    Use   [ODEPACK.F, 19128]           mdu
    Use   [ODEPACK.F, 19138]           mdu
    Use   [ODEPACK.F, 19139]           mdu
    Use   [ODEPACK.F, 19157]           mdu
    Use   [ODEPACK.F, 19172]           mdu

l    (Dummy Argument)  Declared as: DOUBLE PRECISION (*)
    Define   [ODEPACK.F, 20131]        nnfc
    Declare   [ODEPACK.F, 20168]       nnfc
    Set   [ODEPACK.F, 20212]           nnfc

l    (Dummy Argument)  Declared as: DOUBLE PRECISION (*)
    Define   [ODEPACK.F, 20285]        nnsc
    Declare   [ODEPACK.F, 20304]       nnsc
    Use   [ODEPACK.F, 20318]           nnsc

l    (Dummy Argument)  Declared as: DOUBLE PRECISION (*)
    Define   [ODEPACK.F, 20337]        nntc
    Declare   [ODEPACK.F, 20357]       nntc
    Use   [ODEPACK.F, 20381]           nntc

l    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 18715]        odrv
    Set   [ODEPACK.F, 18728]           odrv
    Use   [ODEPACK.F, 18729]           odrv
    Use   [ODEPACK.F, 18734]           odrv

L    (Local Variable)  Declared as: INTEGER
    Define   [exchange.f, 40]          EXCHANGE
    Set   [exchange.f, 51]             EXCHANGE
    Use   [exchange.f, 52]             EXCHANGE
    Use Argument   [exchange.f, 52]    EXCHANGE
    Set   [exchange.f, 63]             EXCHANGE
    Use Argument   [exchange.f, 64]    EXCHANGE

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [kintheory_v_s.f, 66]     CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 129]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 130]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 135]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 135]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 136]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 136]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 137]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 137]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 138]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 138]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 139]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 139]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 140]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 140]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 142]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 143]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 144]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 144]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 145]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 145]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 147]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 147]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 148]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 148]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 149]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 149]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 150]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 150]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 151]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 151]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 152]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 152]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 155]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 156]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 159]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 159]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 162]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 162]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 163]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 163]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 165]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 165]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 166]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 166]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 173]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 174]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 180]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 181]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 184]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 184]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 194]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 194]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 199]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 200]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 202]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 202]       CALC_IA_MOMSOURCE_V_S

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 35]   CHECK_CELL_MOVEMENT
    Set   [check_cell_movement.f, 47]   CHECK_CELL_MOVEMENT
    Use Argument   [check_cell_movement.f, 49]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 51]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 52]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 53]   CHECK_CELL_MOVEMENT
    Use   [check_cell_movement.f, 54]   CHECK_CELL_MOVEMENT
    Use Argument   [check_cell_movement.f, 64]   CHECK_CELL_MOVEMENT
    Use Argument   [check_cell_movement.f, 67]   CHECK_CELL_MOVEMENT

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 119]   CHECK_CELL_MOVEMENT_DEM
    Set   [check_cell_movement.f, 132]   CHECK_CELL_MOVEMENT_DEM
    Use Argument   [check_cell_movement.f, 134]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 137]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 138]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 139]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 142]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 143]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 143]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 148]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 149]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 149]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 154]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 155]   CHECK_CELL_MOVEMENT_DEM
    Use   [check_cell_movement.f, 155]   CHECK_CELL_MOVEMENT_DEM

L    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 350]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 373]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 375]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 378]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 379]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 380]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 383]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 389]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 394]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 397]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 398]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 398]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 404]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 408]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 409]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 409]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 418]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 423]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 426]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 427]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 427]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 434]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 438]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 439]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 439]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 448]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 453]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 456]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 457]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 457]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 463]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 467]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 468]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 468]   CHECK_CELL_MOVEMENT_PIC

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 89]        SOURCE_W_G
    Set   [source_w_g.f, 307]          SOURCE_W_G
    Use   [source_w_g.f, 308]          SOURCE_W_G
    Use   [source_w_g.f, 308]          SOURCE_W_G
    Use   [source_w_g.f, 310]          SOURCE_W_G
    Use   [source_w_g.f, 310]          SOURCE_W_G
    Use   [source_w_g.f, 310]          SOURCE_W_G
    Set   [source_w_g.f, 319]          SOURCE_W_G
    Use   [source_w_g.f, 320]          SOURCE_W_G
    Use   [source_w_g.f, 321]          SOURCE_W_G
    Use   [source_w_g.f, 321]          SOURCE_W_G
    Use   [source_w_g.f, 322]          SOURCE_W_G

L    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 491]       SOURCE_W_G_BC
    Set   [source_w_g.f, 640]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 641]   SOURCE_W_G_BC
    Use   [source_w_g.f, 645]          SOURCE_W_G_BC
    Use   [source_w_g.f, 646]          SOURCE_W_G_BC
    Use   [source_w_g.f, 647]          SOURCE_W_G_BC
    Use   [source_w_g.f, 648]          SOURCE_W_G_BC
    Use   [source_w_g.f, 649]          SOURCE_W_G_BC
    Use   [source_w_g.f, 650]          SOURCE_W_G_BC
    Use   [source_w_g.f, 651]          SOURCE_W_G_BC
    Use   [source_w_g.f, 680]          SOURCE_W_G_BC
    Use   [source_w_g.f, 681]          SOURCE_W_G_BC
    Use   [source_w_g.f, 682]          SOURCE_W_G_BC
    Use   [source_w_g.f, 683]          SOURCE_W_G_BC
    Use   [source_w_g.f, 684]          SOURCE_W_G_BC
    Use   [source_w_g.f, 685]          SOURCE_W_G_BC
    Use   [source_w_g.f, 686]          SOURCE_W_G_BC
    Use   [source_w_g.f, 715]          SOURCE_W_G_BC
    Use   [source_w_g.f, 716]          SOURCE_W_G_BC
    Use   [source_w_g.f, 717]          SOURCE_W_G_BC
    Use   [source_w_g.f, 718]          SOURCE_W_G_BC
    Use   [source_w_g.f, 719]          SOURCE_W_G_BC
    Use   [source_w_g.f, 720]          SOURCE_W_G_BC
    Use   [source_w_g.f, 721]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 740]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 743]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 746]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 748]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 750]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 750]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 752]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 753]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 754]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 754]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 758]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 761]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 764]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 766]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 768]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 768]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 770]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 771]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 772]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 772]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 776]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 779]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 781]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 782]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 783]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 783]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 786]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 789]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 791]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 792]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 793]   SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 793]   SOURCE_W_G_BC
    Use   [source_w_g.f, 802]          SOURCE_W_G_BC
    Use   [source_w_g.f, 803]          SOURCE_W_G_BC
    Use   [source_w_g.f, 804]          SOURCE_W_G_BC
    Use   [source_w_g.f, 806]          SOURCE_W_G_BC
    Use   [source_w_g.f, 807]          SOURCE_W_G_BC
    Use   [source_w_g.f, 808]          SOURCE_W_G_BC
    Use   [source_w_g.f, 809]          SOURCE_W_G_BC
    Use   [source_w_g.f, 810]          SOURCE_W_G_BC
    Use   [source_w_g.f, 811]          SOURCE_W_G_BC
    Use   [source_w_g.f, 847]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 847]   SOURCE_W_G_BC
    Use   [source_w_g.f, 866]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 866]   SOURCE_W_G_BC
    Use   [source_w_g.f, 871]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 871]   SOURCE_W_G_BC
    Use   [source_w_g.f, 876]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 876]   SOURCE_W_G_BC
    Use   [source_w_g.f, 887]          SOURCE_W_G_BC
    Use   [source_w_g.f, 887]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 888]   SOURCE_W_G_BC
    Use   [source_w_g.f, 892]          SOURCE_W_G_BC
    Use   [source_w_g.f, 893]          SOURCE_W_G_BC
    Use   [source_w_g.f, 894]          SOURCE_W_G_BC
    Use   [source_w_g.f, 895]          SOURCE_W_G_BC
    Use   [source_w_g.f, 896]          SOURCE_W_G_BC
    Use   [source_w_g.f, 897]          SOURCE_W_G_BC
    Use   [source_w_g.f, 921]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 922]   SOURCE_W_G_BC
    Use   [source_w_g.f, 923]          SOURCE_W_G_BC
    Use   [source_w_g.f, 924]          SOURCE_W_G_BC
    Use   [source_w_g.f, 925]          SOURCE_W_G_BC
    Use   [source_w_g.f, 926]          SOURCE_W_G_BC
    Use   [source_w_g.f, 927]          SOURCE_W_G_BC
    Use   [source_w_g.f, 928]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 955]   SOURCE_W_G_BC
    Use   [source_w_g.f, 956]          SOURCE_W_G_BC
    Use   [source_w_g.f, 957]          SOURCE_W_G_BC
    Use   [source_w_g.f, 958]          SOURCE_W_G_BC
    Use   [source_w_g.f, 959]          SOURCE_W_G_BC
    Use   [source_w_g.f, 960]          SOURCE_W_G_BC
    Use   [source_w_g.f, 961]          SOURCE_W_G_BC
    Use   [source_w_g.f, 989]          SOURCE_W_G_BC
    Use   [source_w_g.f, 990]          SOURCE_W_G_BC
    Use   [source_w_g.f, 991]          SOURCE_W_G_BC
    Use   [source_w_g.f, 992]          SOURCE_W_G_BC
    Use   [source_w_g.f, 993]          SOURCE_W_G_BC
    Use   [source_w_g.f, 994]          SOURCE_W_G_BC
    Use Argument   [source_w_g.f, 1010]   SOURCE_W_G_BC

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 2828]         CLEAN_GEOMETRY
    Set   [vtk_out.f, 2863]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2864]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 2922]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2923]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2924]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2924]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2926]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2926]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 2961]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 2962]            CLEAN_GEOMETRY
    Set   [vtk_out.f, 3020]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3021]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3022]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3022]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3024]            CLEAN_GEOMETRY
    Use   [vtk_out.f, 3024]            CLEAN_GEOMETRY

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1720]         GATHER_DATA
    Set   [vtk_out.f, 1804]            GATHER_DATA
    Use   [vtk_out.f, 1805]            GATHER_DATA
    Use   [vtk_out.f, 1806]            GATHER_DATA
    Use   [vtk_out.f, 1807]            GATHER_DATA
    Use   [vtk_out.f, 1808]            GATHER_DATA
    Use   [vtk_out.f, 1809]            GATHER_DATA

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 378]          OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 395]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 396]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 398]             OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 404]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 405]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 405]             OPEN_VTU_FILE_BIN
    Set   [vtk_out.f, 408]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 409]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 409]             OPEN_VTU_FILE_BIN
    Use   [vtk_out.f, 409]             OPEN_VTU_FILE_BIN

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1907]         SETUP_VTK_NO_CUTCELL
    Set   [vtk_out.f, 2012]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2013]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2014]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2015]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2016]            SETUP_VTK_NO_CUTCELL
    Use   [vtk_out.f, 2017]            SETUP_VTK_NO_CUTCELL

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 1493]         WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1546]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1547]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1548]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1549]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1550]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1555]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1647]            WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1648]            WRITE_CUT_SURFACE_VTK
    Use   [vtk_out.f, 1659]            WRITE_CUT_SURFACE_VTK
    Set   [vtk_out.f, 1660]            WRITE_CUT_SURFACE_VTK

L    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 574]          WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 697]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 697]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 704]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 704]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 830]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 830]             WRITE_GEOMETRY_IN_VTU_BIN
    Use   [vtk_out.f, 837]             WRITE_GEOMETRY_IN_VTU_BIN
    Set   [vtk_out.f, 837]             WRITE_GEOMETRY_IN_VTU_BIN

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

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_ss_dem_noninterp.f, 54]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 117]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 118]   DRAG_SS_DEM_NONINTERP

L    (Local Variable)  Declared as: INTEGER
    Define   [drag_ss_dem_noninterp.f, 203]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 265]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 266]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 279]   DRAG_SS_TFM_NONINTERP

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [pic_routines.f, 191]     MPPIC_APPLY_PS_GRAD_PART
    Declare   [pic_routines.f, 205]    MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 227]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 228]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 232]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 233]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 235]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 237]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 238]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 239]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 241]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 248]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 252]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 254]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 355]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 359]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 365]        MPPIC_APPLY_PS_GRAD_PART
    Use   [pic_routines.f, 367]        MPPIC_APPLY_PS_GRAD_PART

L    (Local Variable)  Declared as: INTEGER
    Define   [CG_source_w_s.f, 59]     CG_SOURCE_W_S
    Set   [CG_source_w_s.f, 107]       CG_SOURCE_W_S
    Use   [CG_source_w_s.f, 108]       CG_SOURCE_W_S
    Use   [CG_source_w_s.f, 108]       CG_SOURCE_W_S

L    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [cfwallposvel.f, 11]      CFWALLPOSVEL
    Declare   [cfwallposvel.f, 34]     CFWALLPOSVEL
    Use   [cfwallposvel.f, 54]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 58]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 63]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 64]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 77]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 78]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 90]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 92]         CFWALLPOSVEL
    Use   [cfwallposvel.f, 104]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 106]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 118]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 119]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 132]        CFWALLPOSVEL
    Use   [cfwallposvel.f, 133]        CFWALLPOSVEL

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

L    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 114]          RRATES0
    Set   [rrates0.f, 311]             RRATES0
    Use   [rrates0.f, 312]             RRATES0
    Use   [rrates0.f, 312]             RRATES0
    Set   [rrates0.f, 317]             RRATES0
    Use   [rrates0.f, 319]             RRATES0
    Use   [rrates0.f, 320]             RRATES0
    Use   [rrates0.f, 321]             RRATES0
    Use   [rrates0.f, 323]             RRATES0
    Use   [rrates0.f, 323]             RRATES0
    Use   [rrates0.f, 323]             RRATES0
    Set   [rrates0.f, 374]             RRATES0
    Use   [rrates0.f, 375]             RRATES0
    Set   [rrates0.f, 379]             RRATES0
    Use   [rrates0.f, 380]             RRATES0
    Use   [rrates0.f, 380]             RRATES0

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

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_resid.f, 585]       CALC_RESID_MB
    Set   [calc_resid.f, 633]          CALC_RESID_MB
    Use Argument   [calc_resid.f, 634]   CALC_RESID_MB
    Use   [calc_resid.f, 639]          CALC_RESID_MB
    Use   [calc_resid.f, 639]          CALC_RESID_MB
    Use   [calc_resid.f, 639]          CALC_RESID_MB
    Use   [calc_resid.f, 640]          CALC_RESID_MB
    Use   [calc_resid.f, 640]          CALC_RESID_MB
    Use   [calc_resid.f, 640]          CALC_RESID_MB
    Use Argument   [calc_resid.f, 640]   CALC_RESID_MB
    Use   [calc_resid.f, 643]          CALC_RESID_MB
    Use   [calc_resid.f, 643]          CALC_RESID_MB
    Use   [calc_resid.f, 643]          CALC_RESID_MB
    Use   [calc_resid.f, 644]          CALC_RESID_MB
    Use   [calc_resid.f, 644]          CALC_RESID_MB
    Use   [calc_resid.f, 644]          CALC_RESID_MB
    Use Argument   [calc_resid.f, 644]   CALC_RESID_MB
    Set   [calc_resid.f, 669]          CALC_RESID_MB
    Use Argument   [calc_resid.f, 670]   CALC_RESID_MB
    Use   [calc_resid.f, 675]          CALC_RESID_MB
    Use   [calc_resid.f, 675]          CALC_RESID_MB
    Use   [calc_resid.f, 675]          CALC_RESID_MB
    Use   [calc_resid.f, 676]          CALC_RESID_MB
    Use   [calc_resid.f, 676]          CALC_RESID_MB
    Use   [calc_resid.f, 676]          CALC_RESID_MB
    Use Argument   [calc_resid.f, 676]   CALC_RESID_MB
    Use   [calc_resid.f, 679]          CALC_RESID_MB
    Use   [calc_resid.f, 679]          CALC_RESID_MB
    Use   [calc_resid.f, 679]          CALC_RESID_MB
    Use   [calc_resid.f, 680]          CALC_RESID_MB
    Use   [calc_resid.f, 680]          CALC_RESID_MB
    Use   [calc_resid.f, 680]          CALC_RESID_MB
    Use Argument   [calc_resid.f, 680]   CALC_RESID_MB

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

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_dif_g.f, 79]        CALC_DEFAULT_DIF_GAS
    Set   [calc_dif_g.f, 108]          CALC_DEFAULT_DIF_GAS
    Use   [calc_dif_g.f, 109]          CALC_DEFAULT_DIF_GAS
    Use   [calc_dif_g.f, 111]          CALC_DEFAULT_DIF_GAS
    Use   [calc_dif_g.f, 111]          CALC_DEFAULT_DIF_GAS
    Use   [calc_dif_g.f, 113]          CALC_DEFAULT_DIF_GAS

L    (Local Variable)  Declared as: INTEGER
    Define   [calc_dif_g.f, 189]       SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 196]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 201]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 202]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 202]          SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 228]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 232]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 232]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 233]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 233]          SET_BINARY_DAB_GAS

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

L    (Local Variable)  Declared as: INTEGER
    Define   [set_phase_index.f, 32]   SET_PHASE_INDEX
    Set   [set_phase_index.f, 54]      SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 55]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 56]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 56]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 56]   SET_PHASE_INDEX
    Use   [set_phase_index.f, 61]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 62]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 64]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 69]      SET_PHASE_INDEX
    Set   [set_phase_index.f, 88]      SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 90]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 91]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 91]   SET_PHASE_INDEX
    Use Argument   [set_phase_index.f, 91]   SET_PHASE_INDEX
    Use   [set_phase_index.f, 94]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 95]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 95]      SET_PHASE_INDEX
    Use   [set_phase_index.f, 95]      SET_PHASE_INDEX

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

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

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

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

L    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 28]           NSQUARE
    Set   [nsquare.f, 42]              NSQUARE
    Use   [nsquare.f, 44]              NSQUARE
    Use   [nsquare.f, 45]              NSQUARE
    Use   [nsquare.f, 45]              NSQUARE
    Use   [nsquare.f, 45]              NSQUARE
    Use Argument   [nsquare.f, 48]     NSQUARE
    Use   [nsquare.f, 51]              NSQUARE
    Use   [nsquare.f, 56]              NSQUARE
    Use   [nsquare.f, 70]              NSQUARE
    Use   [nsquare.f, 73]              NSQUARE
    Use   [nsquare.f, 79]              NSQUARE
    Use   [nsquare.f, 82]              NSQUARE
    Use   [nsquare.f, 90]              NSQUARE
    Use   [nsquare.f, 93]              NSQUARE
    Use   [nsquare.f, 110]             NSQUARE
    Use   [nsquare.f, 115]             NSQUARE
    Use   [nsquare.f, 123]             NSQUARE
    Use   [nsquare.f, 129]             NSQUARE

L    (Local Variable)  Declared as: INTEGER
    Define   [dif_v_is.f, 42]          DIF_V_IS
    Set   [dif_v_is.f, 52]             DIF_V_IS
    Use   [dif_v_is.f, 53]             DIF_V_IS
    Use   [dif_v_is.f, 54]             DIF_V_IS
    Use   [dif_v_is.f, 55]             DIF_V_IS
    Use   [dif_v_is.f, 56]             DIF_V_IS
    Use   [dif_v_is.f, 57]             DIF_V_IS
    Use   [dif_v_is.f, 58]             DIF_V_IS
    Use   [dif_v_is.f, 59]             DIF_V_IS
    Use   [dif_v_is.f, 61]             DIF_V_IS
    Use   [dif_v_is.f, 83]             DIF_V_IS

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

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

l1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 803]          SET_IJK_P_G
    Set   [set_bc0.f, 842]             SET_IJK_P_G
    Use   [set_bc0.f, 842]             SET_IJK_P_G
    Set   [set_bc0.f, 851]             SET_IJK_P_G
    Set   [set_bc0.f, 859]             SET_IJK_P_G
    Set   [set_bc0.f, 867]             SET_IJK_P_G
    Set   [set_bc0.f, 878]             SET_IJK_P_G
    Use   [set_bc0.f, 887]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 892]    SET_IJK_P_G
    Use   [set_bc0.f, 909]             SET_IJK_P_G
    Use   [set_bc0.f, 911]             SET_IJK_P_G

L1    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2509]   WRITE_INT_TABLE
    Set   [set_increments.f, 2516]     WRITE_INT_TABLE
    Use   [set_increments.f, 2517]     WRITE_INT_TABLE
    Use   [set_increments.f, 2518]     WRITE_INT_TABLE
    Set   [set_increments.f, 2521]     WRITE_INT_TABLE
    Use   [set_increments.f, 2523]     WRITE_INT_TABLE

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

L1D    (Dummy Argument)  Declared as: LOGICAL (DIMENSION_3)
    Define   [dmp_cartesian.f, 276]    SEND_RECEIVE_1D_LOGICAL
    Declare   [dmp_cartesian.f, 296]   SEND_RECEIVE_1D_LOGICAL
    Use   [dmp_cartesian.f, 305]       SEND_RECEIVE_1D_LOGICAL
    Set   [dmp_cartesian.f, 316]       SEND_RECEIVE_1D_LOGICAL
    Set   [dmp_cartesian.f, 318]       SEND_RECEIVE_1D_LOGICAL

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

L2    (Dummy Argument)  Declared as: INTEGER
    Define   [write_out0.f, 929]       LOCATION
    Declare   [write_out0.f, 944]      LOCATION
    Use   [write_out0.f, 952]          LOCATION
    Use   [write_out0.f, 962]          LOCATION
    Use   [write_out0.f, 968]          LOCATION
    Use   [write_out0.f, 968]          LOCATION
    Use   [write_out0.f, 969]          LOCATION

l2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 802]          SET_IJK_P_G
    Set   [set_bc0.f, 841]             SET_IJK_P_G
    Use   [set_bc0.f, 841]             SET_IJK_P_G
    Set   [set_bc0.f, 850]             SET_IJK_P_G
    Set   [set_bc0.f, 858]             SET_IJK_P_G
    Set   [set_bc0.f, 866]             SET_IJK_P_G
    Set   [set_bc0.f, 877]             SET_IJK_P_G
    Use   [set_bc0.f, 886]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 892]    SET_IJK_P_G
    Use   [set_bc0.f, 909]             SET_IJK_P_G
    Use   [set_bc0.f, 911]             SET_IJK_P_G

L2    (Local Variable)  Declared as: INTEGER
    Define   [get_stl_data.f, 84]      GET_MSH_DATA
    Set   [get_stl_data.f, 443]        GET_MSH_DATA
    Use   [get_stl_data.f, 444]        GET_MSH_DATA
    Set   [get_stl_data.f, 454]        GET_MSH_DATA
    Use   [get_stl_data.f, 455]        GET_MSH_DATA
    Set   [get_stl_data.f, 521]        GET_MSH_DATA
    Use   [get_stl_data.f, 523]        GET_MSH_DATA
    Use   [get_stl_data.f, 524]        GET_MSH_DATA
    Use   [get_stl_data.f, 540]        GET_MSH_DATA

L2    (Local Variable)  Declared as: INTEGER
    Define   [get_stl_data.f, 694]     GET_STL_DATA
    Set   [get_stl_data.f, 833]        GET_STL_DATA
    Use   [get_stl_data.f, 835]        GET_STL_DATA
    Use   [get_stl_data.f, 835]        GET_STL_DATA

L2    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2509]   WRITE_INT_TABLE
    Set   [set_increments.f, 2514]     WRITE_INT_TABLE
    Use   [set_increments.f, 2516]     WRITE_INT_TABLE
    Set   [set_increments.f, 2517]     WRITE_INT_TABLE
    Use   [set_increments.f, 2518]     WRITE_INT_TABLE
    Use   [set_increments.f, 2521]     WRITE_INT_TABLE
    Set   [set_increments.f, 2522]     WRITE_INT_TABLE
    Use   [set_increments.f, 2523]     WRITE_INT_TABLE

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

l3    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 801]          SET_IJK_P_G
    Set   [set_bc0.f, 840]             SET_IJK_P_G
    Set   [set_bc0.f, 849]             SET_IJK_P_G
    Set   [set_bc0.f, 857]             SET_IJK_P_G
    Set   [set_bc0.f, 865]             SET_IJK_P_G
    Use   [set_bc0.f, 874]             SET_IJK_P_G
    Set   [set_bc0.f, 876]             SET_IJK_P_G
    Use   [set_bc0.f, 885]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 892]    SET_IJK_P_G
    Use   [set_bc0.f, 908]             SET_IJK_P_G
    Use   [set_bc0.f, 910]             SET_IJK_P_G

L3    (Local Variable)  Declared as: INTEGER
    Define   [set_increments.f, 2509]   WRITE_INT_TABLE
    Use   [set_increments.f, 2518]     WRITE_INT_TABLE
    Set   [set_increments.f, 2518]     WRITE_INT_TABLE
    Use   [set_increments.f, 2523]     WRITE_INT_TABLE
    Set   [set_increments.f, 2523]     WRITE_INT_TABLE

l3SQT2    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [integrate_time_pic.f, 75]   INTEGRATE_TIME_PIC_SNIDER
    Set   [integrate_time_pic.f, 95]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 170]   INTEGRATE_TIME_PIC_SNIDER

l4Pi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_thermo_conv.f, 41]   CONV_GS_DES1
    Set   [des_thermo_conv.f, 44]      CONV_GS_DES1
    Use   [des_thermo_conv.f, 77]      CONV_GS_DES1

l4Pi    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_thermo_conv.f, 160]   CONV_GS_GAS1
    Set   [des_thermo_conv.f, 162]     CONV_GS_GAS1
    Use   [des_thermo_conv.f, 179]     CONV_GS_GAS1

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

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

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

L_rm    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_k_s.f, 92]          CALC_DEFAULT_Ks
    Set   [calc_k_s.f, 116]            CALC_DEFAULT_Ks
    Use   [calc_k_s.f, 121]            CALC_DEFAULT_Ks

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

LA    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 27226]        DGBSL
    Set   [ODEPACK.F, 27255]           DGBSL
    Use   [ODEPACK.F, 27258]           DGBSL
    Set   [ODEPACK.F, 27268]           DGBSL
    Use   [ODEPACK.F, 27270]           DGBSL

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

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

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

lambda1    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 712]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 718]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 724]     BUILD_C_QUADRIC_MATRIX

lambda2    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [define_quadrics.f, 712]   BUILD_C_QUADRIC_MATRIX
    Declare   [define_quadrics.f, 718]   BUILD_C_QUADRIC_MATRIX
    Use   [define_quadrics.f, 725]     BUILD_C_QUADRIC_MATRIX

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

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

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

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

LAMBDA_sL_pB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_w_s.f, 71]     CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 160]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 161]       CALC_IA_MOMSOURCE_W_S

LAMBDA_sL_pE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_u_s.f, 122]    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

LAMBDA_sL_pN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_v_s.f, 71]     CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 157]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 159]       CALC_IA_MOMSOURCE_V_S

LAMBDA_sL_pS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_v_s.f, 71]     CALC_IA_MOMSOURCE_V_S
    Set   [kintheory_v_s.f, 158]       CALC_IA_MOMSOURCE_V_S
    Use   [kintheory_v_s.f, 159]       CALC_IA_MOMSOURCE_V_S

LAMBDA_sL_pT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [kintheory_w_s.f, 71]     CALC_IA_MOMSOURCE_W_S
    Set   [kintheory_w_s.f, 159]       CALC_IA_MOMSOURCE_W_S
    Use   [kintheory_w_s.f, 161]       CALC_IA_MOMSOURCE_W_S

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

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

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

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

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

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

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

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

LAST    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1072]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1178]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1179]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1180]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1182]   GET_POLYGON_AREA_AND_CENTROID

last    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 18759]        md
    Declare   [ODEPACK.F, 18843]       md
    Use Argument   [ODEPACK.F, 18850]   md
    Set   [ODEPACK.F, 18867]           md
    Set   [ODEPACK.F, 18872]           md
    Use   [ODEPACK.F, 18873]           md
    Use Argument   [ODEPACK.F, 18878]   md
    Use Argument   [ODEPACK.F, 18882]   md
    Use Argument   [ODEPACK.F, 18886]   md
    Set   [ODEPACK.F, 18893]           md

last    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 18898]        mdi
    Declare   [ODEPACK.F, 18902]       mdi
    Set   [ODEPACK.F, 18955]           mdi
    Set   [ODEPACK.F, 18957]           mdi

last    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 18967]        mdm
    Declare   [ODEPACK.F, 18971]       mdm
    Use   [ODEPACK.F, 18997]           mdm

last    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 19022]        mdp
    Declare   [ODEPACK.F, 19026]       mdp
    Use   [ODEPACK.F, 19034]           mdp
    Use   [ODEPACK.F, 19042]           mdp
    Use   [ODEPACK.F, 19043]           mdp
    Use   [ODEPACK.F, 19044]           mdp
    Use   [ODEPACK.F, 19046]           mdp
    Set   [ODEPACK.F, 19047]           mdp
    Use   [ODEPACK.F, 19047]           mdp
    Set   [ODEPACK.F, 19069]           mdp
    Use   [ODEPACK.F, 19069]           mdp
    Set   [ODEPACK.F, 19082]           mdp
    Set   [ODEPACK.F, 19092]           mdp
    Set   [ODEPACK.F, 19097]           mdp

last    (Dummy Argument)  Declared as: INTEGER (*)
    Define   [ODEPACK.F, 19111]        mdu
    Declare   [ODEPACK.F, 19115]       mdu
    Use   [ODEPACK.F, 19121]           mdu
    Use   [ODEPACK.F, 19125]           mdu
    Use   [ODEPACK.F, 19130]           mdu
    Use   [ODEPACK.F, 19135]           mdu
    Use   [ODEPACK.F, 19155]           mdu
    Set   [ODEPACK.F, 19170]           mdu
    Use   [ODEPACK.F, 19180]           mdu
    Use   [ODEPACK.F, 19181]           mdu
    Use   [ODEPACK.F, 19181]           mdu
    Set   [ODEPACK.F, 19187]           mdu
    Set   [ODEPACK.F, 19188]           mdu

LAST_EMPTY_SPOT    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_pic.f, 30]   MASS_INFLOW_PIC
    Set   [mass_inflow_pic.f, 70]      MASS_INFLOW_PIC
    Use Argument   [mass_inflow_pic.f, 160]   MASS_INFLOW_PIC
    Set   [mass_inflow_pic.f, 206]     MASS_INFLOW_PIC

LAST_INDEX    (Dummy Argument)  Declared as: INTEGER INTENT(INOUT)
    Define   [mass_inflow_pic.f, 269]   PIC_FIND_EMPTY_SPOT
    Declare   [mass_inflow_pic.f, 282]   PIC_FIND_EMPTY_SPOT
    Use   [mass_inflow_pic.f, 293]     PIC_FIND_EMPTY_SPOT
    Use   [mass_inflow_pic.f, 301]     PIC_FIND_EMPTY_SPOT
    Set   [mass_inflow_pic.f, 305]     PIC_FIND_EMPTY_SPOT

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

lasti    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 19908]           nsfc
    Set   [ODEPACK.F, 19922]           nsfc
    Use   [ODEPACK.F, 19944]           nsfc
    Set   [ODEPACK.F, 19996]           nsfc
    Set   [ODEPACK.F, 20019]           nsfc
    Use   [ODEPACK.F, 20046]           nsfc

lastid    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 19907]           nsfc
    Use   [ODEPACK.F, 19921]           nsfc
    Set   [ODEPACK.F, 19923]           nsfc
    Use   [ODEPACK.F, 19942]           nsfc
    Set   [ODEPACK.F, 19995]           nsfc
    Use   [ODEPACK.F, 20018]           nsfc
    Set   [ODEPACK.F, 20020]           nsfc
    Use   [ODEPACK.F, 20044]           nsfc

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

LASTM_VEC    (Local Variable)  Declared as: DOUBLE PRECISION (3)
    Define   [get_cut_cell_volume_area.f, 1075]   GET_POLYGON_AREA_AND_CENTROID
    Set   [get_cut_cell_volume_area.f, 1181]   GET_POLYGON_AREA_AND_CENTROID
    Use   [get_cut_cell_volume_area.f, 1183]   GET_POLYGON_AREA_AND_CENTROID

LAVD    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 10174]        DLSODKR
    Set   [ODEPACK.F, 10519]           DLSODKR
    Use   [ODEPACK.F, 10522]           DLSODKR
    Use   [ODEPACK.F, 10526]           DLSODKR
    Use   [ODEPACK.F, 10530]           DLSODKR

LAVD    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 8329]         DLSODPK
    Set   [ODEPACK.F, 8649]            DLSODPK
    Use   [ODEPACK.F, 8652]            DLSODPK
    Use   [ODEPACK.F, 8656]            DLSODPK
    Use   [ODEPACK.F, 8660]            DLSODPK

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

LB    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 27226]        DGBSL
    Set   [ODEPACK.F, 27256]           DGBSL
    Use   [ODEPACK.F, 27258]           DGBSL
    Set   [ODEPACK.F, 27269]           DGBSL
    Use   [ODEPACK.F, 27270]           DGBSL

LB    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Set   [ODEPACK.F, 22379]           DSOLPK
    Use   [ODEPACK.F, 22380]           DSOLPK
    Use   [ODEPACK.F, 22382]           DSOLPK
    Use   [ODEPACK.F, 22384]           DSOLPK
    Set   [ODEPACK.F, 22401]           DSOLPK
    Use   [ODEPACK.F, 22402]           DSOLPK
    Use   [ODEPACK.F, 22406]           DSOLPK
    Use   [ODEPACK.F, 22408]           DSOLPK
    Set   [ODEPACK.F, 22464]           DSOLPK
    Use   [ODEPACK.F, 22465]           DSOLPK
    Use   [ODEPACK.F, 22466]           DSOLPK
    Use   [ODEPACK.F, 22467]           DSOLPK

lb    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 18972]        mdm
    Set   [ODEPACK.F, 18996]           mdm
    Use   [ODEPACK.F, 18999]           mdm
    Set   [ODEPACK.F, 19000]           mdm

LB    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [des_init_arrays.f, 70]   DES_INIT_PARTICLE_ARRAYS
    Declare   [des_init_arrays.f, 92]   DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 95]      DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 98]      DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 99]      DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 100]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 101]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 102]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 105]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 106]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 107]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 108]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 116]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 122]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 123]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 124]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 127]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 130]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 131]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 134]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 135]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 139]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 142]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 143]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 147]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 148]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 153]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 154]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 155]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 156]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 161]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 162]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 163]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 164]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 165]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 170]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 171]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 172]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 174]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 175]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 176]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 178]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 185]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 187]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 188]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 190]     DES_INIT_PARTICLE_ARRAYS
    Use   [des_init_arrays.f, 196]     DES_INIT_PARTICLE_ARRAYS

lB_mmax    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,0:DIMENSION_M) INTENT(INOUT) OPTIONAL
    Define   [usr_src_mod.f, 31]       CALC_USR_SOURCE
    Declare   [usr_src_mod.f, 83]      CALC_USR_SOURCE
    Set   [usr_src_mod.f, 124]         CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 124]   CALC_USR_SOURCE
    Set   [usr_src_mod.f, 136]         CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 136]   CALC_USR_SOURCE

lBCV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 129]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 148]   SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 200]   SEED_NEW_PARTICLE

lBCV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 257]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 283]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 310]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 311]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 312]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 360]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 364]   SET_NEW_PARTICLE_PROPS

lBCV_I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 129]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 148]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 176]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 177]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 178]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 187]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 189]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 191]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 194]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 203]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 204]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 205]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 207]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 208]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 209]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 213]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 214]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 215]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 217]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 218]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 219]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 223]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 224]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 225]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 227]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 228]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 229]     SEED_NEW_PARTICLE

LBLOX    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25637]        DAIGBT
    Set   [ODEPACK.F, 25652]           DAIGBT
    Use   [ODEPACK.F, 25653]           DAIGBT
    Use   [ODEPACK.F, 25654]           DAIGBT
    Use   [ODEPACK.F, 25655]           DAIGBT

LBLOX    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25691]        DPJIBT
    Set   [ODEPACK.F, 25734]           DPJIBT
    Use   [ODEPACK.F, 25735]           DPJIBT
    Use   [ODEPACK.F, 25736]           DPJIBT
    Use   [ODEPACK.F, 25737]           DPJIBT
    Use   [ODEPACK.F, 25789]           DPJIBT
    Use   [ODEPACK.F, 25796]           DPJIBT
    Use   [ODEPACK.F, 25802]           DPJIBT
    Use   [ODEPACK.F, 25809]           DPJIBT

LBLOX    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25836]        DSLSBT
    Set   [ODEPACK.F, 25855]           DSLSBT
    Use   [ODEPACK.F, 25856]           DSLSBT
    Use   [ODEPACK.F, 25857]           DSLSBT

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [interpolate_pic.f, 53]   INTERPOLATE_PIC1
    Set   [interpolate_pic.f, 75]      INTERPOLATE_PIC1
    Use   [interpolate_pic.f, 76]      INTERPOLATE_PIC1
    Use   [interpolate_pic.f, 77]      INTERPOLATE_PIC1

LC    (Local Variable)  Declared as: INTEGER
    Define   [mass_outflow_pic.f, 23]   MASS_OUTFLOW_PIC
    Set   [mass_outflow_pic.f, 33]     MASS_OUTFLOW_PIC
    Use   [mass_outflow_pic.f, 34]     MASS_OUTFLOW_PIC

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mi.f, 378]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 435]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 438]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 488]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 489]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 489]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 494]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 506]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 507]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 508]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 508]       SET_DEM_BCMI_IJK

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 54]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 97]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 98]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 99]         CALC_PG_GRAD

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

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

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

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

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

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

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

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 776]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 858]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 868]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 868]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 871]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 872]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 874]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 875]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 876]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 877]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 880]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 883]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 884]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 886]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 887]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 888]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 889]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 892]    CHECK_SOLIDS_DEM_COLL_HERTZ

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 500]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 594]    CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 605]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 605]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 608]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 609]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 611]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 612]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 613]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 614]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 617]    CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 676]    CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 680]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 680]    CHECK_SOLIDS_DEM_COLL_LSD

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 67]   CHECK_SOLIDS_DEM_ENERGY
    Set   [check_solids_dem.f, 141]    CHECK_SOLIDS_DEM_ENERGY
    Set   [check_solids_dem.f, 151]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 151]    CHECK_SOLIDS_DEM_ENERGY

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 240]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 280]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 281]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 282]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 311]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 312]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 313]        DRAG_GS_GAS1

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

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 212]   GET_DIAMETER
    Set   [write_des_data.f, 216]      GET_DIAMETER
    Use   [write_des_data.f, 217]      GET_DIAMETER
    Use   [write_des_data.f, 218]      GET_DIAMETER
    Use   [write_des_data.f, 218]      GET_DIAMETER
    Use   [write_des_data.f, 219]      GET_DIAMETER
    Use   [write_des_data.f, 221]      GET_DIAMETER
    Use   [write_des_data.f, 221]      GET_DIAMETER

LC    (Local Variable)  Declared as: INTEGER
    Define   [apply_wall_bc_pic.f, 320]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [apply_wall_bc_pic.f, 345]   CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [apply_wall_bc_pic.f, 346]   CHECK_IF_PARCEL_OVERLAPS_STL

lc    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [apply_wall_bc_pic.f, 254]   OUT_THIS_STL
    Declare   [apply_wall_bc_pic.f, 266]   OUT_THIS_STL
    Use   [apply_wall_bc_pic.f, 272]   OUT_THIS_STL
    Use   [apply_wall_bc_pic.f, 279]   OUT_THIS_STL
    Use   [apply_wall_bc_pic.f, 281]   OUT_THIS_STL
    Use   [apply_wall_bc_pic.f, 282]   OUT_THIS_STL
    Use   [apply_wall_bc_pic.f, 283]   OUT_THIS_STL

LC    (Local Variable)  Declared as: INTEGER
    Define   [apply_wall_bc_pic.f, 205]   PIC_REFLECT_PART
    Set   [apply_wall_bc_pic.f, 238]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 239]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 240]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 240]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 240]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 241]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 242]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 242]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 242]   PIC_REFLECT_PART

LC    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 536]    LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 618]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 619]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 619]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 620]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 621]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 622]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 622]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 622]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 630]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 631]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 631]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 632]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 633]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 634]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 634]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 634]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 708]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 710]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 711]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 713]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 714]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 716]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 717]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 720]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 723]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 728]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 808]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 809]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 810]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 811]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 812]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 833]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 837]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 837]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 838]       LAYOUT_DEM_MI_EW

LC    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 123]    LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 204]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 205]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 205]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 206]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 207]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 208]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 208]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 208]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 216]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 217]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 217]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 218]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 219]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 220]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 220]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 220]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 293]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 295]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 296]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 298]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 299]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 301]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 302]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 305]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 308]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 313]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 389]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 390]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 391]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 392]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 393]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 414]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 418]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 418]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 419]       LAYOUT_DEM_MI_NS

LC    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 955]    LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1039]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1040]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1040]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1041]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1042]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1043]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1043]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1043]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1050]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1051]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1051]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1052]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1053]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1054]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1054]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1054]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1109]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1111]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1112]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1114]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1115]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1117]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1118]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1121]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1124]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1129]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1209]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1210]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1211]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1212]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1213]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1234]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1238]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1238]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1239]      LAYOUT_DEM_MI_TB

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [write_spx1.f, 80]        WRITE_SPX1
    Set   [write_spx1.f, 236]          WRITE_SPX1
    Use   [write_spx1.f, 238]          WRITE_SPX1
    Use   [write_spx1.f, 240]          WRITE_SPX1
    Use   [write_spx1.f, 242]          WRITE_SPX1
    Use   [write_spx1.f, 245]          WRITE_SPX1
    Use   [write_spx1.f, 245]          WRITE_SPX1
    Use   [write_spx1.f, 246]          WRITE_SPX1
    Use   [write_spx1.f, 246]          WRITE_SPX1
    Use   [write_spx1.f, 247]          WRITE_SPX1
    Use   [write_spx1.f, 247]          WRITE_SPX1
    Set   [write_spx1.f, 256]          WRITE_SPX1
    Use   [write_spx1.f, 257]          WRITE_SPX1
    Use   [write_spx1.f, 258]          WRITE_SPX1
    Use   [write_spx1.f, 259]          WRITE_SPX1
    Set   [write_spx1.f, 279]          WRITE_SPX1
    Use   [write_spx1.f, 281]          WRITE_SPX1
    Use   [write_spx1.f, 284]          WRITE_SPX1
    Use   [write_spx1.f, 284]          WRITE_SPX1
    Set   [write_spx1.f, 291]          WRITE_SPX1
    Use   [write_spx1.f, 292]          WRITE_SPX1
    Set   [write_spx1.f, 315]          WRITE_SPX1
    Use   [write_spx1.f, 316]          WRITE_SPX1
    Set   [write_spx1.f, 321]          WRITE_SPX1
    Use   [write_spx1.f, 322]          WRITE_SPX1
    Use   [write_spx1.f, 322]          WRITE_SPX1
    Set   [write_spx1.f, 331]          WRITE_SPX1
    Use   [write_spx1.f, 332]          WRITE_SPX1
    Set   [write_spx1.f, 356]          WRITE_SPX1
    Use   [write_spx1.f, 357]          WRITE_SPX1
    Use   [write_spx1.f, 358]          WRITE_SPX1
    Set   [write_spx1.f, 366]          WRITE_SPX1
    Use   [write_spx1.f, 367]          WRITE_SPX1
    Use   [write_spx1.f, 368]          WRITE_SPX1
    Use   [write_spx1.f, 368]          WRITE_SPX1
    Set   [write_spx1.f, 386]          WRITE_SPX1
    Use   [write_spx1.f, 387]          WRITE_SPX1
    Use   [write_spx1.f, 388]          WRITE_SPX1
    Set   [write_spx1.f, 410]          WRITE_SPX1
    Use   [write_spx1.f, 411]          WRITE_SPX1
    Set   [write_spx1.f, 415]          WRITE_SPX1
    Use   [write_spx1.f, 416]          WRITE_SPX1
    Use   [write_spx1.f, 416]          WRITE_SPX1
    Set   [write_spx1.f, 423]          WRITE_SPX1
    Use   [write_spx1.f, 424]          WRITE_SPX1
    Set   [write_spx1.f, 445]          WRITE_SPX1
    Use   [write_spx1.f, 446]          WRITE_SPX1
    Set   [write_spx1.f, 450]          WRITE_SPX1
    Use   [write_spx1.f, 451]          WRITE_SPX1
    Use   [write_spx1.f, 451]          WRITE_SPX1
    Set   [write_spx1.f, 458]          WRITE_SPX1
    Use   [write_spx1.f, 459]          WRITE_SPX1
    Set   [write_spx1.f, 479]          WRITE_SPX1
    Use   [write_spx1.f, 480]          WRITE_SPX1
    Set   [write_spx1.f, 484]          WRITE_SPX1
    Use   [write_spx1.f, 485]          WRITE_SPX1
    Use   [write_spx1.f, 485]          WRITE_SPX1
    Set   [write_spx1.f, 492]          WRITE_SPX1
    Use   [write_spx1.f, 493]          WRITE_SPX1

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_continuum.f, 29]   CHECK_SOLIDS_CONTINUUM
    Set   [check_solids_continuum.f, 255]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 256]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 257]   CHECK_SOLIDS_CONTINUUM

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 25]   MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 40]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 41]      MASS_INFLOW_DEM

LC    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_pic.f, 31]   MASS_INFLOW_PIC
    Set   [mass_inflow_pic.f, 85]      MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 86]      MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 140]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 140]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 142]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 142]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 145]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 146]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 147]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 147]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 149]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 150]     MASS_INFLOW_PIC

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_pic_mi.f, 149]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 201]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 204]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 245]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 246]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 246]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 251]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 263]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 264]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 265]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 266]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 268]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 268]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 270]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 271]       SET_PIC_BCMI_IJK

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

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

LC    (Local Variable)  Declared as: INTEGER
    Define   [init_namelist.f, 64]     INIT_NAMELIST
    Set   [init_namelist.f, 1679]      INIT_NAMELIST
    Use   [init_namelist.f, 1684]      INIT_NAMELIST
    Use   [init_namelist.f, 1690]      INIT_NAMELIST
    Use   [init_namelist.f, 1696]      INIT_NAMELIST
    Use   [init_namelist.f, 1702]      INIT_NAMELIST
    Use   [init_namelist.f, 1708]      INIT_NAMELIST
    Use   [init_namelist.f, 1714]      INIT_NAMELIST
    Use   [init_namelist.f, 1720]      INIT_NAMELIST
    Use   [init_namelist.f, 1726]      INIT_NAMELIST
    Use   [init_namelist.f, 1732]      INIT_NAMELIST
    Use   [init_namelist.f, 1738]      INIT_NAMELIST
    Use   [init_namelist.f, 1744]      INIT_NAMELIST
    Use   [init_namelist.f, 1750]      INIT_NAMELIST
    Use   [init_namelist.f, 1762]      INIT_NAMELIST
    Use   [init_namelist.f, 1768]      INIT_NAMELIST
    Use   [init_namelist.f, 1778]      INIT_NAMELIST
    Use   [init_namelist.f, 1787]      INIT_NAMELIST
    Use   [init_namelist.f, 1793]      INIT_NAMELIST
    Use   [init_namelist.f, 1805]      INIT_NAMELIST
    Use   [init_namelist.f, 1815]      INIT_NAMELIST
    Use   [init_namelist.f, 1821]      INIT_NAMELIST
    Use   [init_namelist.f, 1828]      INIT_NAMELIST
    Use   [init_namelist.f, 1835]      INIT_NAMELIST
    Use   [init_namelist.f, 1845]      INIT_NAMELIST
    Use   [init_namelist.f, 1852]      INIT_NAMELIST
    Use   [init_namelist.f, 1862]      INIT_NAMELIST
    Use   [init_namelist.f, 1869]      INIT_NAMELIST
    Use   [init_namelist.f, 1875]      INIT_NAMELIST
    Use   [init_namelist.f, 1882]      INIT_NAMELIST
    Use   [init_namelist.f, 1888]      INIT_NAMELIST
    Use   [init_namelist.f, 1895]      INIT_NAMELIST
    Use   [init_namelist.f, 1901]      INIT_NAMELIST
    Use   [init_namelist.f, 1908]      INIT_NAMELIST
    Use   [init_namelist.f, 1915]      INIT_NAMELIST
    Use   [init_namelist.f, 1923]      INIT_NAMELIST
    Use   [init_namelist.f, 1930]      INIT_NAMELIST
    Use   [init_namelist.f, 1936]      INIT_NAMELIST
    Use   [init_namelist.f, 1942]      INIT_NAMELIST
    Use   [init_namelist.f, 1949]      INIT_NAMELIST
    Use   [init_namelist.f, 1961]      INIT_NAMELIST
    Use   [init_namelist.f, 1973]      INIT_NAMELIST
    Set   [init_namelist.f, 1983]      INIT_NAMELIST
    Use   [init_namelist.f, 1989]      INIT_NAMELIST
    Use   [init_namelist.f, 1995]      INIT_NAMELIST
    Use   [init_namelist.f, 2001]      INIT_NAMELIST
    Use   [init_namelist.f, 2007]      INIT_NAMELIST
    Use   [init_namelist.f, 2013]      INIT_NAMELIST
    Use   [init_namelist.f, 2019]      INIT_NAMELIST
    Use   [init_namelist.f, 2025]      INIT_NAMELIST
    Use   [init_namelist.f, 2031]      INIT_NAMELIST
    Use   [init_namelist.f, 2037]      INIT_NAMELIST
    Use   [init_namelist.f, 2043]      INIT_NAMELIST
    Use   [init_namelist.f, 2049]      INIT_NAMELIST
    Use   [init_namelist.f, 2055]      INIT_NAMELIST
    Use   [init_namelist.f, 2112]      INIT_NAMELIST
    Use Argument   [init_namelist.f, 2118]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2125]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2131]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2138]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2144]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2151]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2157]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2164]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2179]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2214]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2225]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2235]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2244]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2253]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2262]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2273]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2283]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2293]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2303]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2314]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2324]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2335]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2346]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2357]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2367]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2377]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2387]   INIT_NAMELIST
    Use   [init_namelist.f, 2393]      INIT_NAMELIST
    Use   [init_namelist.f, 2399]      INIT_NAMELIST
    Use   [init_namelist.f, 2406]      INIT_NAMELIST
    Use   [init_namelist.f, 2413]      INIT_NAMELIST
    Use   [init_namelist.f, 2419]      INIT_NAMELIST
    Use   [init_namelist.f, 2426]      INIT_NAMELIST
    Use   [init_namelist.f, 2433]      INIT_NAMELIST
    Use Argument   [init_namelist.f, 2440]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2448]   INIT_NAMELIST
    Use   [init_namelist.f, 2454]      INIT_NAMELIST
    Use   [init_namelist.f, 2461]      INIT_NAMELIST
    Use   [init_namelist.f, 2467]      INIT_NAMELIST
    Use   [init_namelist.f, 2474]      INIT_NAMELIST
    Use   [init_namelist.f, 2480]      INIT_NAMELIST
    Use   [init_namelist.f, 2487]      INIT_NAMELIST
    Use Argument   [init_namelist.f, 2493]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2500]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2506]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2513]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2527]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2533]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2539]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2545]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2551]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2557]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2564]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2570]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2576]   INIT_NAMELIST
    Use   [init_namelist.f, 2583]      INIT_NAMELIST
    Use   [init_namelist.f, 2591]      INIT_NAMELIST
    Use Argument   [init_namelist.f, 2602]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2613]   INIT_NAMELIST
    Use Argument   [init_namelist.f, 2620]   INIT_NAMELIST
    Use   [init_namelist.f, 2624]      INIT_NAMELIST
    Set   [init_namelist.f, 2633]      INIT_NAMELIST
    Use   [init_namelist.f, 2639]      INIT_NAMELIST
    Use   [init_namelist.f, 2645]      INIT_NAMELIST
    Use   [init_namelist.f, 2651]      INIT_NAMELIST
    Use   [init_namelist.f, 2657]      INIT_NAMELIST
    Use   [init_namelist.f, 2663]      INIT_NAMELIST
    Use   [init_namelist.f, 2669]      INIT_NAMELIST
    Use   [init_namelist.f, 2675]      INIT_NAMELIST
    Use   [init_namelist.f, 2681]      INIT_NAMELIST
    Use   [init_namelist.f, 2687]      INIT_NAMELIST
    Use   [init_namelist.f, 2693]      INIT_NAMELIST
    Use   [init_namelist.f, 2699]      INIT_NAMELIST
    Use   [init_namelist.f, 2705]      INIT_NAMELIST
    Use   [init_namelist.f, 2718]      INIT_NAMELIST
    Use   [init_namelist.f, 2733]      INIT_NAMELIST
    Use   [init_namelist.f, 2734]      INIT_NAMELIST
    Use   [init_namelist.f, 2741]      INIT_NAMELIST
    Set   [init_namelist.f, 2749]      INIT_NAMELIST
    Use   [init_namelist.f, 2754]      INIT_NAMELIST
    Use   [init_namelist.f, 2760]      INIT_NAMELIST
    Use   [init_namelist.f, 2766]      INIT_NAMELIST
    Use   [init_namelist.f, 2772]      INIT_NAMELIST
    Use   [init_namelist.f, 2778]      INIT_NAMELIST
    Use   [init_namelist.f, 2784]      INIT_NAMELIST
    Use   [init_namelist.f, 2790]      INIT_NAMELIST
    Use   [init_namelist.f, 2796]      INIT_NAMELIST
    Use   [init_namelist.f, 2802]      INIT_NAMELIST
    Use   [init_namelist.f, 2808]      INIT_NAMELIST
    Use   [init_namelist.f, 2814]      INIT_NAMELIST
    Use   [init_namelist.f, 2820]      INIT_NAMELIST
    Use   [init_namelist.f, 2827]      INIT_NAMELIST
    Use   [init_namelist.f, 2833]      INIT_NAMELIST
    Use   [init_namelist.f, 2839]      INIT_NAMELIST
    Use   [init_namelist.f, 2845]      INIT_NAMELIST
    Use   [init_namelist.f, 2851]      INIT_NAMELIST
    Use   [init_namelist.f, 2858]      INIT_NAMELIST
    Use   [init_namelist.f, 2865]      INIT_NAMELIST
    Use   [init_namelist.f, 2872]      INIT_NAMELIST
    Use   [init_namelist.f, 2879]      INIT_NAMELIST
    Use   [init_namelist.f, 2886]      INIT_NAMELIST
    Use   [init_namelist.f, 2893]      INIT_NAMELIST
    Use   [init_namelist.f, 2901]      INIT_NAMELIST
    Set   [init_namelist.f, 3274]      INIT_NAMELIST
    Use   [init_namelist.f, 3280]      INIT_NAMELIST
    Use   [init_namelist.f, 3286]      INIT_NAMELIST
    Use   [init_namelist.f, 3292]      INIT_NAMELIST
    Use   [init_namelist.f, 3298]      INIT_NAMELIST
    Use   [init_namelist.f, 3304]      INIT_NAMELIST
    Use   [init_namelist.f, 3310]      INIT_NAMELIST
    Use   [init_namelist.f, 3316]      INIT_NAMELIST
    Use   [init_namelist.f, 3322]      INIT_NAMELIST
    Use   [init_namelist.f, 3328]      INIT_NAMELIST
    Use   [init_namelist.f, 3334]      INIT_NAMELIST
    Use   [init_namelist.f, 3340]      INIT_NAMELIST
    Use   [init_namelist.f, 3346]      INIT_NAMELIST
    Use   [init_namelist.f, 3352]      INIT_NAMELIST
    Use   [init_namelist.f, 3358]      INIT_NAMELIST
    Use   [init_namelist.f, 3366]      INIT_NAMELIST
    Use   [init_namelist.f, 3374]      INIT_NAMELIST
    Use   [init_namelist.f, 3380]      INIT_NAMELIST

LC    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields1.f, 35]   COMP_MEAN_FIELDS1
    Set   [comp_mean_fields1.f, 79]    COMP_MEAN_FIELDS1
    Use   [comp_mean_fields1.f, 80]    COMP_MEAN_FIELDS1
    Use   [comp_mean_fields1.f, 82]    COMP_MEAN_FIELDS1

LC    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_conv.f, 42]   CONV_GS_DES1
    Set   [des_thermo_conv.f, 52]      CONV_GS_DES1
    Use   [des_thermo_conv.f, 53]      CONV_GS_DES1
    Use   [des_thermo_conv.f, 54]      CONV_GS_DES1
    Set   [des_thermo_conv.f, 87]      CONV_GS_DES1
    Use   [des_thermo_conv.f, 88]      CONV_GS_DES1

LC    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_conv.f, 156]   CONV_GS_GAS1
    Set   [des_thermo_conv.f, 183]     CONV_GS_GAS1
    Use   [des_thermo_conv.f, 184]     CONV_GS_GAS1
    Use   [des_thermo_conv.f, 185]     CONV_GS_GAS1

LC    (Local Variable)  Declared as: INTEGER
    Define   [set_bc_dem_mo.f, 36]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 98]        SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 101]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 140]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 141]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 141]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 180]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 181]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 181]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 186]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 197]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 198]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 199]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 199]       SET_BC_DEM_MO

LC    (Local Variable)  Declared as: INTEGER
    Define   [mass_outflow_dem.f, 26]   MASS_OUTFLOW_DEM
    Set   [mass_outflow_dem.f, 50]     MASS_OUTFLOW_DEM
    Use   [mass_outflow_dem.f, 51]     MASS_OUTFLOW_DEM

LC    (Local Variable)  Declared as: INTEGER
    Define   [integrate_time_pic.f, 305]   INTEGRATE_TIME_PIC_GARG
    Set   [integrate_time_pic.f, 357]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 360]   INTEGRATE_TIME_PIC_GARG
    Set   [integrate_time_pic.f, 421]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 426]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 426]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 426]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 427]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 430]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 430]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 430]   INTEGRATE_TIME_PIC_GARG
    Set   [integrate_time_pic.f, 495]   INTEGRATE_TIME_PIC_GARG
    Use   [integrate_time_pic.f, 496]   INTEGRATE_TIME_PIC_GARG

LC    (Local Variable)  Declared as: INTEGER
    Define   [integrate_time_pic.f, 55]   INTEGRATE_TIME_PIC_SNIDER
    Set   [integrate_time_pic.f, 146]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 148]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 149]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 149]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 149]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 150]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 150]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 153]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 153]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 153]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 154]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 154]   INTEGRATE_TIME_PIC_SNIDER

LC    (Local Variable)  Declared as: INTEGER
    Define   [calc_epg_des.f, 66]      CALC_EPG_DES
    Set   [calc_epg_des.f, 142]        CALC_EPG_DES
    Use   [calc_epg_des.f, 143]        CALC_EPG_DES

LC    (Local Variable)  Declared as: INTEGER
    Define   [solve_k_epsilon_eq.f, 58]   SOLVE_K_Epsilon_EQ
    Set   [solve_k_epsilon_eq.f, 102]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 103]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 104]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 105]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 106]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 107]   SOLVE_K_Epsilon_EQ
    Use   [solve_k_epsilon_eq.f, 108]   SOLVE_K_Epsilon_EQ

LC    (Local Variable)  Declared as: INTEGER
    Define   [rxns_gs_des1.f, 54]      RXNS_GS_DES1
    Set   [rxns_gs_des1.f, 87]         RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 88]         RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 89]         RXNS_GS_DES1

LC    (Local Variable)  Declared as: INTEGER
    Define   [rxns_gs_des1.f, 172]     RXNS_GS_GAS1
    Set   [rxns_gs_des1.f, 214]        RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 215]        RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 216]        RXNS_GS_GAS1

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

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

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

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

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

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

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

LC1    (Local Variable)  Declared as: INTEGER
    Define   [apply_wall_bc_pic.f, 52]   APPLY_WALL_BC_PIC
    Set   [apply_wall_bc_pic.f, 84]    APPLY_WALL_BC_PIC
    Use   [apply_wall_bc_pic.f, 87]    APPLY_WALL_BC_PIC

LC1    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 1326]   SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1338]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1339]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1340]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1342]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1348]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1349]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1350]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1352]      SET_DEM_MI_OWNER
    Set   [layout_mi_dem.f, 1358]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1359]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1360]      SET_DEM_MI_OWNER
    Use   [layout_mi_dem.f, 1362]      SET_DEM_MI_OWNER

lc1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 976]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1019]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1021]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1023]            IJK_Pg_SEARCH

LC1    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 30]    WRITE_RES0_DES
    Set   [write_res0_des.f, 48]       WRITE_RES0_DES
    Use   [write_res0_des.f, 49]       WRITE_RES0_DES
    Set   [write_res0_des.f, 56]       WRITE_RES0_DES
    Use   [write_res0_des.f, 57]       WRITE_RES0_DES
    Set   [write_res0_des.f, 60]       WRITE_RES0_DES
    Use   [write_res0_des.f, 61]       WRITE_RES0_DES
    Set   [write_res0_des.f, 75]       WRITE_RES0_DES
    Use   [write_res0_des.f, 76]       WRITE_RES0_DES
    Set   [write_res0_des.f, 82]       WRITE_RES0_DES
    Use   [write_res0_des.f, 83]       WRITE_RES0_DES
    Set   [write_res0_des.f, 92]       WRITE_RES0_DES
    Use   [write_res0_des.f, 93]       WRITE_RES0_DES
    Set   [write_res0_des.f, 97]       WRITE_RES0_DES
    Use   [write_res0_des.f, 98]       WRITE_RES0_DES
    Use   [write_res0_des.f, 99]       WRITE_RES0_DES
    Use   [write_res0_des.f, 100]      WRITE_RES0_DES
    Use   [write_res0_des.f, 101]      WRITE_RES0_DES
    Use   [write_res0_des.f, 102]      WRITE_RES0_DES
    Use   [write_res0_des.f, 103]      WRITE_RES0_DES
    Use   [write_res0_des.f, 104]      WRITE_RES0_DES
    Use   [write_res0_des.f, 105]      WRITE_RES0_DES
    Use   [write_res0_des.f, 106]      WRITE_RES0_DES
    Use   [write_res0_des.f, 107]      WRITE_RES0_DES

lc1    (Local Variable)  Declared as: INTEGER
    Define   [set_ps.f, 279]           DEBUG_PS
    Set   [set_ps.f, 292]              DEBUG_PS
    Set   [set_ps.f, 298]              DEBUG_PS
    Use   [set_ps.f, 298]              DEBUG_PS
    Use   [set_ps.f, 303]              DEBUG_PS
    Use   [set_ps.f, 304]              DEBUG_PS
    Set   [set_ps.f, 375]              DEBUG_PS
    Set   [set_ps.f, 380]              DEBUG_PS
    Use   [set_ps.f, 380]              DEBUG_PS
    Use   [set_ps.f, 381]              DEBUG_PS

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

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

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

lc2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 975]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 1014]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1019]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1021]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1023]            IJK_Pg_SEARCH

LC_BND    (Local Variable)  Declared as: INTEGER
    Define   [integrate_time_pic.f, 83]   INTEGRATE_TIME_PIC_SNIDER
    Set   [integrate_time_pic.f, 97]   INTEGRATE_TIME_PIC_SNIDER
    Use   [integrate_time_pic.f, 146]   INTEGRATE_TIME_PIC_SNIDER

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

LCFL    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 10174]        DLSODKR
    Set   [ODEPACK.F, 10521]           DLSODKR
    Use   [ODEPACK.F, 10522]           DLSODKR
    Use   [ODEPACK.F, 10542]           DLSODKR
    Use   [ODEPACK.F, 10546]           DLSODKR

LCFL    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 8329]         DLSODPK
    Set   [ODEPACK.F, 8651]            DLSODPK
    Use   [ODEPACK.F, 8652]            DLSODPK
    Use   [ODEPACK.F, 8672]            DLSODPK
    Use   [ODEPACK.F, 8676]            DLSODPK

LCFN    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 10174]        DLSODKR
    Set   [ODEPACK.F, 10520]           DLSODKR
    Use   [ODEPACK.F, 10522]           DLSODKR
    Use   [ODEPACK.F, 10534]           DLSODKR
    Use   [ODEPACK.F, 10538]           DLSODKR

LCFN    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 8329]         DLSODPK
    Set   [ODEPACK.F, 8650]            DLSODPK
    Use   [ODEPACK.F, 8652]            DLSODPK
    Use   [ODEPACK.F, 8664]            DLSODPK
    Use   [ODEPACK.F, 8668]            DLSODPK

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

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

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

lcount    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 294]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 375]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 378]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 378]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 378]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 382]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 382]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 382]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 386]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 386]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 386]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 389]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 389]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 389]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 391]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 391]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 391]      WRITE_DES_TECPLOT

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

lCp    (Unknown Variable)
    Set   [physical_prop.f, 372]       PHYSICAL_PROP_CPg
    Use   [physical_prop.f, 376]       PHYSICAL_PROP_CPg
    Set   [physical_prop.f, 476]       PHYSICAL_PROP_CPs
    Use   [physical_prop.f, 481]       PHYSICAL_PROP_CPs

lCP_Err    (Unknown Variable)
    Set   [physical_prop.f, 366]       PHYSICAL_PROP_CPg
    Use Argument   [physical_prop.f, 375]   PHYSICAL_PROP_CPg
    Set   [physical_prop.f, 470]       PHYSICAL_PROP_CPs
    Use Argument   [physical_prop.f, 479]   PHYSICAL_PROP_CPs

lcTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [tau_u_g.f, 243]          CALC_CG_TAU_U_G
    Declare   [tau_u_g.f, 273]         CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 583]    CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 586]             CALC_CG_TAU_U_G

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

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

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

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

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

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

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

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

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

lcurpar    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 40]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 102]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 104]     MAKE_ARRAYS_DES

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

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 26960]        DGBFA
    Declare   [ODEPACK.F, 27054]       DGBFA
    Use   [ODEPACK.F, 27055]           DGBFA

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 27146]        DGBSL
    Declare   [ODEPACK.F, 27222]       DGBSL
    Use   [ODEPACK.F, 27223]           DGBSL

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 26714]        DGEFA
    Declare   [ODEPACK.F, 26772]       DGEFA
    Use   [ODEPACK.F, 26773]           DGEFA

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 26830]        DGESL
    Declare   [ODEPACK.F, 26899]       DGESL
    Use   [ODEPACK.F, 26900]           DGESL

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 23636]        DHEFA
    Declare   [ODEPACK.F, 23637]       DHEFA
    Use   [ODEPACK.F, 23638]           DHEFA

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 24042]        DHELS
    Declare   [ODEPACK.F, 24043]       DHELS
    Use   [ODEPACK.F, 24044]           DHELS

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 23884]        DHEQR
    Declare   [ODEPACK.F, 23885]       DHEQR
    Use   [ODEPACK.F, 23886]           DHEQR

LDA    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 23816]        DHESL
    Declare   [ODEPACK.F, 23817]       DHESL
    Use   [ODEPACK.F, 23818]           DHESL

lDab    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_dif_g.f, 88]        CALC_DEFAULT_DIF_GAS
    Set   [calc_dif_g.f, 101]          CALC_DEFAULT_DIF_GAS
    Set   [calc_dif_g.f, 134]          CALC_DEFAULT_DIF_GAS
    Set   [calc_dif_g.f, 137]          CALC_DEFAULT_DIF_GAS
    Set   [calc_dif_g.f, 141]          CALC_DEFAULT_DIF_GAS
    Use   [calc_dif_g.f, 146]          CALC_DEFAULT_DIF_GAS

lDab    (Dummy Argument)  Declared as: DOUBLE PRECISION (NMAX,NMAX) INTENT(OUT)
    Define   [calc_dif_g.f, 171]       SET_BINARY_DAB_GAS
    Declare   [calc_dif_g.f, 182]      SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 201]          SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 202]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 202]          SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 232]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 232]          SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 233]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 233]          SET_BINARY_DAB_GAS

lData_dp    (Local Variable)  Declared as: DOUBLE PRECISION (:) ALLOCATABLE
    Define   [set_ps.f, 34]            SET_PS
    Set   [set_ps.f, 77]               SET_PS
    Set   [set_ps.f, 77]               SET_PS
    Set   [set_ps.f, 95]               SET_PS
    Use   [set_ps.f, 95]               SET_PS
    Use Argument   [set_ps.f, 105]     SET_PS
    Use Argument   [set_ps.f, 114]     SET_PS
    Set   [set_ps.f, 114]              SET_PS

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

lDBG    (Dummy Argument)  Declared as: LOGICAL INTENT(IN)
    Define   [diffuse_mean_fields.f, 108]   CALC_DIF_DES
    Declare   [diffuse_mean_fields.f, 122]   CALC_DIF_DES
    Use   [diffuse_mean_fields.f, 145]   CALC_DIF_DES

lDEBUG    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [check_cell_movement.f, 360]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 360]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 366]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 396]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 407]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 425]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 437]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 455]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 466]   CHECK_CELL_MOVEMENT_PIC

lDEBUG    (Local Variable)  Declared as: LOGICAL PARAMETER
    Define   [check_cell_movement.f, 237]   RECOVER_PARCEL
    Set   [check_cell_movement.f, 237]   RECOVER_PARCEL
    Use   [check_cell_movement.f, 243]   RECOVER_PARCEL

lDELETED    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 356]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 370]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 403]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 403]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 433]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 433]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 462]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 462]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 489]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 493]   CHECK_CELL_MOVEMENT_PIC

ldFlag    (Dummy Argument)  Declared as: LOGICAL INTENT(IN)
    Define   [set_bc0.f, 951]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 969]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1008]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1099]            IJK_Pg_SEARCH

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1273]         DRAG_BVK
    Declare   [drag_gs.f, 1286]        DRAG_BVK
    Set   [drag_gs.f, 1328]            DRAG_BVK
    Set   [drag_gs.f, 1329]            DRAG_BVK

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 479]          DRAG_GIDASPOW
    Declare   [drag_gs.f, 492]         DRAG_GIDASPOW
    Set   [drag_gs.f, 521]             DRAG_GIDASPOW
    Set   [drag_gs.f, 531]             DRAG_GIDASPOW
    Set   [drag_gs.f, 534]             DRAG_GIDASPOW

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 556]          DRAG_GIDASPOW_BLEND
    Declare   [drag_gs.f, 570]         DRAG_GIDASPOW_BLEND
    Set   [drag_gs.f, 620]             DRAG_GIDASPOW_BLEND
    Set   [drag_gs.f, 621]             DRAG_GIDASPOW_BLEND

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1347]         DRAG_HYS
    Declare   [drag_gs.f, 1362]        DRAG_HYS
    Set   [drag_gs.f, 1479]            DRAG_HYS

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1147]         DRAG_KOCH_HILL
    Declare   [drag_gs.f, 1160]        DRAG_KOCH_HILL
    Set   [drag_gs.f, 1254]            DRAG_KOCH_HILL
    Set   [drag_gs.f, 1255]            DRAG_KOCH_HILL

ldGA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 387]          DRAG_SYAM_OBRIEN
    Declare   [drag_gs.f, 402]         DRAG_SYAM_OBRIEN
    Set   [drag_gs.f, 461]             DRAG_SYAM_OBRIEN
    Set   [drag_gs.f, 463]             DRAG_SYAM_OBRIEN

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 639]          DRAG_WEN_YU
    Declare   [drag_gs.f, 651]         DRAG_WEN_YU
    Set   [drag_gs.f, 685]             DRAG_WEN_YU
    Set   [drag_gs.f, 686]             DRAG_WEN_YU

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [drag_gs.f, 715]          SUBGRID_DRAG_IGCI
    Declare   [drag_gs.f, 730]         SUBGRID_DRAG_IGCI
    Set   [drag_gs.f, 820]             SUBGRID_DRAG_IGCI
    Use   [drag_gs.f, 820]             SUBGRID_DRAG_IGCI

lDgA    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [drag_gs.f, 850]          SUBGRID_DRAG_MILIOLI
    Declare   [drag_gs.f, 866]         SUBGRID_DRAG_MILIOLI
    Set   [drag_gs.f, 1051]            SUBGRID_DRAG_MILIOLI
    Use   [drag_gs.f, 1051]            SUBGRID_DRAG_MILIOLI

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

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

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

LDHES    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 22818]        DORTHOG
    Declare   [ODEPACK.F, 22819]       DORTHOG
    Use   [ODEPACK.F, 22821]           DORTHOG

lDIF    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [diffuse_mean_fields.f, 128]   CALC_DIF_DES
    Set   [diffuse_mean_fields.f, 135]   CALC_DIF_DES
    Use   [diffuse_mean_fields.f, 141]   CALC_DIF_DES
    Use Argument   [diffuse_mean_fields.f, 146]   CALC_DIF_DES

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

LDIF    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 18192]        ADJLR
    Declare   [ODEPACK.F, 18193]       ADJLR
    Set   [ODEPACK.F, 18212]           ADJLR

LDIF    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 17897]        DPREP
    Use Argument   [ODEPACK.F, 18092]   DPREP
    Use   [ODEPACK.F, 18093]           DPREP

LDIF    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26130]        DPREPI
    Use Argument   [ODEPACK.F, 26428]   DPREPI
    Use   [ODEPACK.F, 26429]           DPREPI

lDIM_N    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 150]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 158]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 163]              CALC_PS_CpxMFLOW
    Use   [set_ps.f, 165]              CALC_PS_CpxMFLOW

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

lDIMN    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 314]   PIC_SEARCH
    Declare   [particles_in_cell.f, 325]   PIC_SEARCH
    Use   [particles_in_cell.f, 327]   PIC_SEARCH

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

LDL    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Set   [ODEPACK.F, 22405]           DSOLPK
    Use   [ODEPACK.F, 22410]           DSOLPK

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

lDP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 64]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 104]   DRAG_SS_DEM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 125]   DRAG_SS_DEM_NONINTERP

lDP    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 213]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 248]   DRAG_SS_TFM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 268]   DRAG_SS_TFM_NONINTERP

lDRAG_BM    (Local Variable)  Declared as: DOUBLE PRECISION (3)
    Define   [drag_gs_des1.f, 250]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 308]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 316]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 318]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 320]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 329]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 331]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 333]        DRAG_GS_GAS1

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss.f, 277]          DRAG_SS_IA
    Set   [drag_ss.f, 307]             DRAG_SS_IA
    Set   [drag_ss.f, 326]             DRAG_SS_IA
    Use   [drag_ss.f, 329]             DRAG_SS_IA

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss.f, 126]          DRAG_SS_SYAM
    Use Argument   [drag_ss.f, 163]    DRAG_SS_SYAM
    Use   [drag_ss.f, 164]             DRAG_SS_SYAM

lDss    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_ss.f, 185]          DRAG_SS_SYAM0
    Declare   [drag_ss.f, 196]         DRAG_SS_SYAM0
    Set   [drag_ss.f, 217]             DRAG_SS_SYAM0

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 66]   DRAG_SS_DEM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 125]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 128]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 128]   DRAG_SS_DEM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 132]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 132]   DRAG_SS_DEM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 136]   DRAG_SS_DEM_NONINTERP

lDss    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_ss_dem_noninterp.f, 215]   DRAG_SS_TFM_NONINTERP
    Use Argument   [drag_ss_dem_noninterp.f, 268]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 271]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 271]   DRAG_SS_TFM_NONINTERP
    Set   [drag_ss_dem_noninterp.f, 275]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 275]   DRAG_SS_TFM_NONINTERP
    Use   [drag_ss_dem_noninterp.f, 279]   DRAG_SS_TFM_NONINTERP

lDT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_des_2fluid.f, 173]   DES_2FLUID_RXNS
    Set   [calc_des_2fluid.f, 192]     DES_2FLUID_RXNS
    Use   [calc_des_2fluid.f, 196]     DES_2FLUID_RXNS

lDT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_reaction_model.f, 46]   DES_REACTION_MODEL
    Set   [des_reaction_model.f, 56]   DES_REACTION_MODEL
    Use   [des_reaction_model.f, 57]   DES_REACTION_MODEL
    Use   [des_reaction_model.f, 72]   DES_REACTION_MODEL
    Use   [des_reaction_model.f, 76]   DES_REACTION_MODEL

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

lDToVOL    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rxns_gs_des1.f, 294]     DES_STIFF_CHEM
    Set   [rxns_gs_des1.f, 299]        DES_STIFF_CHEM
    Use   [rxns_gs_des1.f, 304]        DES_STIFF_CHEM
    Use   [rxns_gs_des1.f, 307]        DES_STIFF_CHEM
    Use   [rxns_gs_des1.f, 311]        DES_STIFF_CHEM

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

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

lE1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 976]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 995]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1011]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1056]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1060]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1060]            IJK_Pg_SEARCH

lE2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 975]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 996]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1010]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1014]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1057]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1063]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1063]            IJK_Pg_SEARCH

LEBOWITZ    (Unknown Variable)
    Use   [rdf_mod.f, 297]             rdf.G_0
    Use   [rdf_mod.f, 79]              rdf.G_0AVG
    Use   [check_solids_continuum.f, 288]   CHECK_SOLIDS_CONTINUUM
    Use   [check_solids_continuum.f, 310]   CHECK_SOLIDS_CONTINUUM

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

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

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

LEN1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4730]         DLSODA
    Set   [ODEPACK.F, 4862]            DLSODA
    Use   [ODEPACK.F, 4864]            DLSODA
    Use   [ODEPACK.F, 4876]            DLSODA

LEN1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6485]         DLSODAR
    Set   [ODEPACK.F, 6642]            DLSODAR
    Use   [ODEPACK.F, 6644]            DLSODAR
    Use   [ODEPACK.F, 6656]            DLSODAR

LEN1C    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4730]         DLSODA
    Set   [ODEPACK.F, 4860]            DLSODA
    Set   [ODEPACK.F, 4861]            DLSODA
    Use   [ODEPACK.F, 4865]            DLSODA
    Use   [ODEPACK.F, 4880]            DLSODA

LEN1C    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6485]         DLSODAR
    Set   [ODEPACK.F, 6640]            DLSODAR
    Set   [ODEPACK.F, 6641]            DLSODAR
    Use   [ODEPACK.F, 6645]            DLSODAR
    Use   [ODEPACK.F, 6660]            DLSODAR

LEN1N    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4730]         DLSODA
    Set   [ODEPACK.F, 4854]            DLSODA
    Use   [ODEPACK.F, 4860]            DLSODA
    Use Argument   [ODEPACK.F, 4862]   DLSODA

LEN1N    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6485]         DLSODAR
    Set   [ODEPACK.F, 6634]            DLSODAR
    Use   [ODEPACK.F, 6640]            DLSODAR
    Use Argument   [ODEPACK.F, 6642]   DLSODAR

LEN1S    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4730]         DLSODA
    Set   [ODEPACK.F, 4855]            DLSODA
    Use   [ODEPACK.F, 4856]            DLSODA
    Set   [ODEPACK.F, 4859]            DLSODA
    Use   [ODEPACK.F, 4859]            DLSODA
    Use   [ODEPACK.F, 4861]            DLSODA
    Use Argument   [ODEPACK.F, 4862]   DLSODA

LEN1S    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6485]         DLSODAR
    Set   [ODEPACK.F, 6635]            DLSODAR
    Use   [ODEPACK.F, 6636]            DLSODAR
    Set   [ODEPACK.F, 6639]            DLSODAR
    Use   [ODEPACK.F, 6639]            DLSODAR
    Use   [ODEPACK.F, 6641]            DLSODAR
    Use Argument   [ODEPACK.F, 6642]   DLSODAR

LEN2    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4730]         DLSODA
    Set   [ODEPACK.F, 4863]            DLSODA
    Use   [ODEPACK.F, 4864]            DLSODA
    Use   [ODEPACK.F, 4865]            DLSODA

LEN2    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6485]         DLSODAR
    Set   [ODEPACK.F, 6643]            DLSODAR
    Use   [ODEPACK.F, 6644]            DLSODAR
    Use   [ODEPACK.F, 6645]            DLSODAR

lenc    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 779]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 831]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 832]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 833]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 858]    CHECK_SOLIDS_DEM_COLL_HERTZ

lenc    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 503]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 591]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 592]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 593]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 594]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 676]    CHECK_SOLIDS_DEM_COLL_LSD

lenc    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 67]   CHECK_SOLIDS_DEM_ENERGY
    Set   [check_solids_dem.f, 100]    CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 141]    CHECK_SOLIDS_DEM_ENERGY

lEND    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 314]   PIC_SEARCH
    Declare   [particles_in_cell.f, 329]   PIC_SEARCH
    Use   [particles_in_cell.f, 331]   PIC_SEARCH

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

lend    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 779]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 830]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 831]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 832]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 833]    CHECK_SOLIDS_DEM_COLL_HERTZ

lend    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 503]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 590]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 591]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 592]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 593]    CHECK_SOLIDS_DEM_COLL_LSD

lend    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 67]   CHECK_SOLIDS_DEM_ENERGY
    Set   [check_solids_dem.f, 99]     CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 100]    CHECK_SOLIDS_DEM_ENERGY

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

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

LEND    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2453]   WRITE_INT_TABLE
    Declare   [set_increments.f, 2482]   WRITE_INT_TABLE
    Use   [set_increments.f, 2512]     WRITE_INT_TABLE
    Use   [set_increments.f, 2520]     WRITE_INT_TABLE
    Use   [set_increments.f, 2522]     WRITE_INT_TABLE

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

LENIGP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 17897]        DPREP
    Set   [ODEPACK.F, 18037]           DPREP
    Set   [ODEPACK.F, 18053]           DPREP
    Use   [ODEPACK.F, 18056]           DPREP

LENIGP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26130]        DPREPI
    Set   [ODEPACK.F, 26372]           DPREPI
    Set   [ODEPACK.F, 26389]           DPREPI
    Use   [ODEPACK.F, 26392]           DPREPI

LENILA    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21699]        DSRCAR
    Declare   [ODEPACK.F, 21703]       DSRCAR
    Set   [ODEPACK.F, 21707]           DSRCAR
    Use   [ODEPACK.F, 21721]           DSRCAR
    Use   [ODEPACK.F, 21723]           DSRCAR
    Use   [ODEPACK.F, 21740]           DSRCAR
    Use   [ODEPACK.F, 21742]           DSRCAR

LENILA    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21274]        DSRCMA
    Declare   [ODEPACK.F, 21278]       DSRCMA
    Set   [ODEPACK.F, 21281]           DSRCMA
    Use   [ODEPACK.F, 21291]           DSRCMA
    Use   [ODEPACK.F, 21304]           DSRCMA

LENILP    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 24879]        DSRCKR
    Declare   [ODEPACK.F, 24882]       DSRCKR
    Set   [ODEPACK.F, 24887]           DSRCKR
    Use   [ODEPACK.F, 24905]           DSRCKR
    Use   [ODEPACK.F, 24924]           DSRCKR

LENILP    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 23608]        DSRCPK
    Declare   [ODEPACK.F, 23611]       DSRCPK
    Set   [ODEPACK.F, 23614]           DSRCPK
    Use   [ODEPACK.F, 23621]           DSRCPK
    Use   [ODEPACK.F, 23630]           DSRCPK

LENILR    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21699]        DSRCAR
    Declare   [ODEPACK.F, 21703]       DSRCAR
    Set   [ODEPACK.F, 21708]           DSRCAR
    Use   [ODEPACK.F, 21724]           DSRCAR
    Use   [ODEPACK.F, 21743]           DSRCAR

LENILR    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 24879]        DSRCKR
    Declare   [ODEPACK.F, 24882]       DSRCKR
    Set   [ODEPACK.F, 24888]           DSRCKR
    Use   [ODEPACK.F, 24902]           DSRCKR
    Use   [ODEPACK.F, 24904]           DSRCKR
    Use   [ODEPACK.F, 24921]           DSRCKR
    Use   [ODEPACK.F, 24923]           DSRCKR

LENILS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21699]        DSRCAR
    Declare   [ODEPACK.F, 21703]       DSRCAR
    Set   [ODEPACK.F, 21707]           DSRCAR
    Use   [ODEPACK.F, 21719]           DSRCAR
    Use   [ODEPACK.F, 21722]           DSRCAR
    Use   [ODEPACK.F, 21723]           DSRCAR
    Use   [ODEPACK.F, 21738]           DSRCAR
    Use   [ODEPACK.F, 21741]           DSRCAR
    Use   [ODEPACK.F, 21742]           DSRCAR

LENILS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 24879]        DSRCKR
    Declare   [ODEPACK.F, 24882]       DSRCKR
    Set   [ODEPACK.F, 24887]           DSRCKR
    Use   [ODEPACK.F, 24895]           DSRCKR
    Use   [ODEPACK.F, 24897]           DSRCKR
    Use   [ODEPACK.F, 24898]           DSRCKR
    Use   [ODEPACK.F, 24899]           DSRCKR
    Use   [ODEPACK.F, 24900]           DSRCKR
    Use   [ODEPACK.F, 24901]           DSRCKR
    Use   [ODEPACK.F, 24914]           DSRCKR
    Use   [ODEPACK.F, 24916]           DSRCKR
    Use   [ODEPACK.F, 24917]           DSRCKR
    Use   [ODEPACK.F, 24918]           DSRCKR
    Use   [ODEPACK.F, 24919]           DSRCKR
    Use   [ODEPACK.F, 24920]           DSRCKR

LENILS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21274]        DSRCMA
    Declare   [ODEPACK.F, 21278]       DSRCMA
    Set   [ODEPACK.F, 21281]           DSRCMA
    Use   [ODEPACK.F, 21289]           DSRCMA
    Use   [ODEPACK.F, 21292]           DSRCMA
    Use   [ODEPACK.F, 21302]           DSRCMA
    Use   [ODEPACK.F, 21305]           DSRCMA

LENILS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 18545]        DSRCMS
    Declare   [ODEPACK.F, 18548]       DSRCMS
    Set   [ODEPACK.F, 18551]           DSRCMS
    Use   [ODEPACK.F, 18559]           DSRCMS
    Use   [ODEPACK.F, 18562]           DSRCMS
    Use   [ODEPACK.F, 18572]           DSRCMS
    Use   [ODEPACK.F, 18575]           DSRCMS

LENILS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 17191]        DSRCOM
    Declare   [ODEPACK.F, 17194]       DSRCOM
    Set   [ODEPACK.F, 17196]           DSRCOM
    Use   [ODEPACK.F, 17203]           DSRCOM
    Use   [ODEPACK.F, 17210]           DSRCOM

LENILS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 23608]        DSRCPK
    Declare   [ODEPACK.F, 23611]       DSRCPK
    Set   [ODEPACK.F, 23614]           DSRCPK
    Use   [ODEPACK.F, 23619]           DSRCPK
    Use   [ODEPACK.F, 23622]           DSRCPK
    Use   [ODEPACK.F, 23628]           DSRCPK
    Use   [ODEPACK.F, 23631]           DSRCPK

LENISS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 18545]        DSRCMS
    Declare   [ODEPACK.F, 18548]       DSRCMS
    Set   [ODEPACK.F, 18551]           DSRCMS
    Use   [ODEPACK.F, 18561]           DSRCMS
    Use   [ODEPACK.F, 18574]           DSRCMS

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4729]         DLSODA
    Set   [ODEPACK.F, 4868]            DLSODA
    Use   [ODEPACK.F, 4870]            DLSODA
    Use   [ODEPACK.F, 4871]            DLSODA
    Use   [ODEPACK.F, 4890]            DLSODA
    Use Argument   [ODEPACK.F, 4897]   DLSODA
    Use Argument   [ODEPACK.F, 5320]   DLSODA

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6483]         DLSODAR
    Set   [ODEPACK.F, 6648]            DLSODAR
    Use   [ODEPACK.F, 6650]            DLSODAR
    Use   [ODEPACK.F, 6651]            DLSODAR
    Use   [ODEPACK.F, 6670]            DLSODAR
    Use Argument   [ODEPACK.F, 6677]   DLSODAR
    Use Argument   [ODEPACK.F, 7146]   DLSODAR

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 1215]         DLSODE
    Set   [ODEPACK.F, 1332]            DLSODE
    Set   [ODEPACK.F, 1333]            DLSODE
    Use   [ODEPACK.F, 1334]            DLSODE
    Use   [ODEPACK.F, 1336]            DLSODE
    Use Argument   [ODEPACK.F, 1711]   DLSODE

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3017]         DLSODES
    Set   [ODEPACK.F, 3168]            DLSODES
    Set   [ODEPACK.F, 3170]            DLSODES
    Use   [ODEPACK.F, 3170]            DLSODES
    Use   [ODEPACK.F, 3171]            DLSODES
    Use   [ODEPACK.F, 3173]            DLSODES
    Set   [ODEPACK.F, 3176]            DLSODES
    Use   [ODEPACK.F, 3176]            DLSODES
    Use   [ODEPACK.F, 3177]            DLSODES
    Use   [ODEPACK.F, 3178]            DLSODES
    Use Argument   [ODEPACK.F, 3652]   DLSODES

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 12032]        DLSODI
    Set   [ODEPACK.F, 12146]           DLSODI
    Use   [ODEPACK.F, 12147]           DLSODI
    Use   [ODEPACK.F, 12149]           DLSODI
    Use Argument   [ODEPACK.F, 12579]   DLSODI

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15803]        DLSODIS
    Set   [ODEPACK.F, 15953]           DLSODIS
    Set   [ODEPACK.F, 15954]           DLSODIS
    Use   [ODEPACK.F, 15954]           DLSODIS
    Use   [ODEPACK.F, 15955]           DLSODIS
    Use   [ODEPACK.F, 15957]           DLSODIS
    Set   [ODEPACK.F, 15960]           DLSODIS
    Use   [ODEPACK.F, 15960]           DLSODIS
    Use   [ODEPACK.F, 15961]           DLSODIS
    Use   [ODEPACK.F, 15962]           DLSODIS
    Use   [ODEPACK.F, 15966]           DLSODIS
    Set   [ODEPACK.F, 15967]           DLSODIS
    Use   [ODEPACK.F, 15967]           DLSODIS
    Use   [ODEPACK.F, 15968]           DLSODIS
    Use   [ODEPACK.F, 15969]           DLSODIS
    Set   [ODEPACK.F, 15970]           DLSODIS
    Use   [ODEPACK.F, 15970]           DLSODIS
    Use   [ODEPACK.F, 15971]           DLSODIS
    Use   [ODEPACK.F, 15972]           DLSODIS
    Use Argument   [ODEPACK.F, 16497]   DLSODIS

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10163]        DLSODKR
    Set   [ODEPACK.F, 10335]           DLSODKR
    Use   [ODEPACK.F, 10337]           DLSODKR
    Use   [ODEPACK.F, 10339]           DLSODKR
    Use Argument   [ODEPACK.F, 10799]   DLSODKR

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8319]         DLSODPK
    Set   [ODEPACK.F, 8463]            DLSODPK
    Use   [ODEPACK.F, 8465]            DLSODPK
    Use   [ODEPACK.F, 8467]            DLSODPK
    Use Argument   [ODEPACK.F, 8907]   DLSODPK

LENIW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 13834]        DLSOIBT
    Set   [ODEPACK.F, 13945]           DLSOIBT
    Use   [ODEPACK.F, 13946]           DLSOIBT
    Use   [ODEPACK.F, 13948]           DLSOIBT
    Use Argument   [ODEPACK.F, 14378]   DLSOIBT

LENIWC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4730]         DLSODA
    Set   [ODEPACK.F, 4869]            DLSODA
    Set   [ODEPACK.F, 4870]            DLSODA
    Use   [ODEPACK.F, 4873]            DLSODA
    Use   [ODEPACK.F, 4875]            DLSODA

LENIWC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6485]         DLSODAR
    Set   [ODEPACK.F, 6649]            DLSODAR
    Set   [ODEPACK.F, 6650]            DLSODAR
    Use   [ODEPACK.F, 6653]            DLSODAR
    Use   [ODEPACK.F, 6655]            DLSODAR

LENIWK    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10163]        DLSODKR
    Set   [ODEPACK.F, 10331]           DLSODKR
    Set   [ODEPACK.F, 10332]           DLSODKR
    Use   [ODEPACK.F, 10335]           DLSODKR
    Use   [ODEPACK.F, 10336]           DLSODKR

LENIWK    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8320]         DLSODPK
    Set   [ODEPACK.F, 8459]            DLSODPK
    Set   [ODEPACK.F, 8460]            DLSODPK
    Use   [ODEPACK.F, 8463]            DLSODPK
    Use   [ODEPACK.F, 8464]            DLSODPK

LENP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25691]        DPJIBT
    Set   [ODEPACK.F, 25737]           DPJIBT
    Use   [ODEPACK.F, 25744]           DPJIBT
    Use   [ODEPACK.F, 25748]           DPJIBT
    Use   [ODEPACK.F, 25760]           DPJIBT

LENP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 16941]        DPREPJ
    Set   [ODEPACK.F, 16953]           DPREPJ
    Use   [ODEPACK.F, 16954]           DPREPJ
    Use   [ODEPACK.F, 16958]           DPREPJ
    Set   [ODEPACK.F, 17013]           DPREPJ
    Use   [ODEPACK.F, 17014]           DPREPJ
    Use   [ODEPACK.F, 17018]           DPREPJ

LENP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25473]        DPREPJI
    Set   [ODEPACK.F, 25522]           DPREPJI
    Use   [ODEPACK.F, 25523]           DPREPJI
    Use   [ODEPACK.F, 25527]           DPREPJI
    Set   [ODEPACK.F, 25574]           DPREPJI
    Use   [ODEPACK.F, 25575]           DPREPJI
    Use   [ODEPACK.F, 25579]           DPREPJI

LENP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 21045]        DPRJA
    Set   [ODEPACK.F, 21089]           DPRJA
    Use   [ODEPACK.F, 21090]           DPRJA
    Use   [ODEPACK.F, 21094]           DPRJA
    Set   [ODEPACK.F, 21136]           DPRJA
    Use   [ODEPACK.F, 21137]           DPRJA
    Use   [ODEPACK.F, 21141]           DPRJA

LENPW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25637]        DAIGBT
    Set   [ODEPACK.F, 25655]           DAIGBT
    Use   [ODEPACK.F, 25656]           DAIGBT

LENPW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 24934]        DAINVG
    Set   [ODEPACK.F, 24953]           DAINVG
    Use   [ODEPACK.F, 24954]           DAINVG
    Set   [ODEPACK.F, 24973]           DAINVG
    Use   [ODEPACK.F, 24974]           DAINVG

LENRAT    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 3017]         DLSODES
    Declare   [ODEPACK.F, 3027]        DLSODES
    Set   [ODEPACK.F, 3060]            DLSODES
    Use   [ODEPACK.F, 3158]            DLSODES

LENRAT    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 15803]        DLSODIS
    Declare   [ODEPACK.F, 15814]       DLSODIS
    Set   [ODEPACK.F, 15847]           DLSODIS
    Use   [ODEPACK.F, 15945]           DLSODIS

LENRLA    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21699]        DSRCAR
    Declare   [ODEPACK.F, 21703]       DSRCAR
    Set   [ODEPACK.F, 21707]           DSRCAR
    Use   [ODEPACK.F, 21713]           DSRCAR
    Use   [ODEPACK.F, 21715]           DSRCAR
    Use   [ODEPACK.F, 21732]           DSRCAR
    Use   [ODEPACK.F, 21734]           DSRCAR

LENRLA    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21274]        DSRCMA
    Declare   [ODEPACK.F, 21278]       DSRCMA
    Set   [ODEPACK.F, 21281]           DSRCMA
    Use   [ODEPACK.F, 21286]           DSRCMA
    Use   [ODEPACK.F, 21299]           DSRCMA

LENRLP    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 24879]        DSRCKR
    Declare   [ODEPACK.F, 24882]       DSRCKR
    Set   [ODEPACK.F, 24887]           DSRCKR
    Use Argument   [ODEPACK.F, 24894]   DSRCKR
    Use Argument   [ODEPACK.F, 24913]   DSRCKR

LENRLP    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 23608]        DSRCPK
    Declare   [ODEPACK.F, 23611]       DSRCPK
    Set   [ODEPACK.F, 23614]           DSRCPK
    Use Argument   [ODEPACK.F, 23618]   DSRCPK
    Use Argument   [ODEPACK.F, 23627]   DSRCPK

LENRLR    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21699]        DSRCAR
    Declare   [ODEPACK.F, 21703]       DSRCAR
    Set   [ODEPACK.F, 21708]           DSRCAR
    Use   [ODEPACK.F, 21716]           DSRCAR
    Use   [ODEPACK.F, 21735]           DSRCAR

LENRLR    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 24879]        DSRCKR
    Declare   [ODEPACK.F, 24882]       DSRCKR
    Set   [ODEPACK.F, 24888]           DSRCKR
    Use Argument   [ODEPACK.F, 24893]   DSRCKR
    Use   [ODEPACK.F, 24894]           DSRCKR
    Use Argument   [ODEPACK.F, 24912]   DSRCKR
    Use   [ODEPACK.F, 24913]           DSRCKR

LENRLS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21699]        DSRCAR
    Declare   [ODEPACK.F, 21703]       DSRCAR
    Set   [ODEPACK.F, 21707]           DSRCAR
    Use   [ODEPACK.F, 21711]           DSRCAR
    Use   [ODEPACK.F, 21714]           DSRCAR
    Use   [ODEPACK.F, 21715]           DSRCAR
    Use   [ODEPACK.F, 21730]           DSRCAR
    Use   [ODEPACK.F, 21733]           DSRCAR
    Use   [ODEPACK.F, 21734]           DSRCAR

LENRLS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 24879]        DSRCKR
    Declare   [ODEPACK.F, 24882]       DSRCKR
    Set   [ODEPACK.F, 24887]           DSRCKR
    Use Argument   [ODEPACK.F, 24891]   DSRCKR
    Use   [ODEPACK.F, 24892]           DSRCKR
    Use   [ODEPACK.F, 24893]           DSRCKR
    Use   [ODEPACK.F, 24894]           DSRCKR
    Use Argument   [ODEPACK.F, 24910]   DSRCKR
    Use   [ODEPACK.F, 24911]           DSRCKR
    Use   [ODEPACK.F, 24912]           DSRCKR
    Use   [ODEPACK.F, 24913]           DSRCKR

LENRLS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 21274]        DSRCMA
    Declare   [ODEPACK.F, 21278]       DSRCMA
    Set   [ODEPACK.F, 21281]           DSRCMA
    Use   [ODEPACK.F, 21284]           DSRCMA
    Use   [ODEPACK.F, 21287]           DSRCMA
    Use   [ODEPACK.F, 21297]           DSRCMA
    Use   [ODEPACK.F, 21300]           DSRCMA

LENRLS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 18545]        DSRCMS
    Declare   [ODEPACK.F, 18548]       DSRCMS
    Set   [ODEPACK.F, 18551]           DSRCMS
    Use   [ODEPACK.F, 18554]           DSRCMS
    Use   [ODEPACK.F, 18557]           DSRCMS
    Use   [ODEPACK.F, 18567]           DSRCMS
    Use   [ODEPACK.F, 18570]           DSRCMS

LENRLS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 17191]        DSRCOM
    Declare   [ODEPACK.F, 17194]       DSRCOM
    Set   [ODEPACK.F, 17196]           DSRCOM
    Use   [ODEPACK.F, 17201]           DSRCOM
    Use   [ODEPACK.F, 17208]           DSRCOM

LENRLS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 23608]        DSRCPK
    Declare   [ODEPACK.F, 23611]       DSRCPK
    Set   [ODEPACK.F, 23614]           DSRCPK
    Use Argument   [ODEPACK.F, 23617]   DSRCPK
    Use   [ODEPACK.F, 23618]           DSRCPK
    Use Argument   [ODEPACK.F, 23626]   DSRCPK
    Use   [ODEPACK.F, 23627]           DSRCPK

LENRSS    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 18545]        DSRCMS
    Declare   [ODEPACK.F, 18548]       DSRCMS
    Set   [ODEPACK.F, 18551]           DSRCMS
    Use   [ODEPACK.F, 18556]           DSRCMS
    Use   [ODEPACK.F, 18569]           DSRCMS

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4729]         DLSODA
    Set   [ODEPACK.F, 4864]            DLSODA
    Use   [ODEPACK.F, 4866]            DLSODA
    Use   [ODEPACK.F, 4878]            DLSODA
    Use Argument   [ODEPACK.F, 4886]   DLSODA
    Use Argument   [ODEPACK.F, 5317]   DLSODA

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6484]         DLSODAR
    Set   [ODEPACK.F, 6644]            DLSODAR
    Use   [ODEPACK.F, 6646]            DLSODAR
    Use   [ODEPACK.F, 6658]            DLSODAR
    Use Argument   [ODEPACK.F, 6666]   DLSODAR
    Use Argument   [ODEPACK.F, 7143]   DLSODAR

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 1215]         DLSODE
    Set   [ODEPACK.F, 1329]            DLSODE
    Use   [ODEPACK.F, 1330]            DLSODE
    Use   [ODEPACK.F, 1335]            DLSODE
    Use Argument   [ODEPACK.F, 1707]   DLSODE

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3017]         DLSODES
    Set   [ODEPACK.F, 3166]            DLSODES
    Use   [ODEPACK.F, 3167]            DLSODES
    Use   [ODEPACK.F, 3172]            DLSODES
    Set   [ODEPACK.F, 3237]            DLSODES
    Use   [ODEPACK.F, 3238]            DLSODES
    Use   [ODEPACK.F, 3244]            DLSODES
    Set   [ODEPACK.F, 3289]            DLSODES
    Use   [ODEPACK.F, 3290]            DLSODES
    Use   [ODEPACK.F, 3296]            DLSODES
    Use Argument   [ODEPACK.F, 3647]   DLSODES
    Use Argument   [ODEPACK.F, 3688]   DLSODES
    Use Argument   [ODEPACK.F, 3693]   DLSODES
    Use Argument   [ODEPACK.F, 3698]   DLSODES
    Use Argument   [ODEPACK.F, 3710]   DLSODES

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 12032]        DLSODI
    Set   [ODEPACK.F, 12143]           DLSODI
    Use   [ODEPACK.F, 12144]           DLSODI
    Use   [ODEPACK.F, 12148]           DLSODI
    Use Argument   [ODEPACK.F, 12576]   DLSODI

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15803]        DLSODIS
    Set   [ODEPACK.F, 15951]           DLSODIS
    Use   [ODEPACK.F, 15952]           DLSODIS
    Use   [ODEPACK.F, 15956]           DLSODIS
    Set   [ODEPACK.F, 16030]           DLSODIS
    Use   [ODEPACK.F, 16031]           DLSODIS
    Use   [ODEPACK.F, 16038]           DLSODIS
    Set   [ODEPACK.F, 16090]           DLSODIS
    Use   [ODEPACK.F, 16091]           DLSODIS
    Use   [ODEPACK.F, 16097]           DLSODIS
    Use Argument   [ODEPACK.F, 16492]   DLSODIS
    Use Argument   [ODEPACK.F, 16533]   DLSODIS
    Use Argument   [ODEPACK.F, 16538]   DLSODIS
    Use Argument   [ODEPACK.F, 16543]   DLSODIS
    Use Argument   [ODEPACK.F, 16555]   DLSODIS

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10163]        DLSODKR
    Set   [ODEPACK.F, 10328]           DLSODKR
    Use   [ODEPACK.F, 10329]           DLSODKR
    Use   [ODEPACK.F, 10338]           DLSODKR
    Use Argument   [ODEPACK.F, 10796]   DLSODKR

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8320]         DLSODPK
    Set   [ODEPACK.F, 8456]            DLSODPK
    Use   [ODEPACK.F, 8457]            DLSODPK
    Use   [ODEPACK.F, 8466]            DLSODPK
    Use Argument   [ODEPACK.F, 8904]   DLSODPK

LENRW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 13834]        DLSOIBT
    Set   [ODEPACK.F, 13942]           DLSOIBT
    Use   [ODEPACK.F, 13943]           DLSOIBT
    Use   [ODEPACK.F, 13947]           DLSOIBT
    Use Argument   [ODEPACK.F, 14375]   DLSOIBT

LENRWC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4730]         DLSODA
    Set   [ODEPACK.F, 4865]            DLSODA
    Use   [ODEPACK.F, 4872]            DLSODA
    Use   [ODEPACK.F, 4874]            DLSODA

LENRWC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6485]         DLSODAR
    Set   [ODEPACK.F, 6645]            DLSODAR
    Use   [ODEPACK.F, 6652]            DLSODAR
    Use   [ODEPACK.F, 6654]            DLSODAR

lent    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 779]   CHECK_SOLIDS_DEM_COLL_HERTZ
    Set   [check_solids_dem.f, 829]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 831]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 832]    CHECK_SOLIDS_DEM_COLL_HERTZ
    Use   [check_solids_dem.f, 833]    CHECK_SOLIDS_DEM_COLL_HERTZ

lent    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 503]   CHECK_SOLIDS_DEM_COLL_LSD
    Set   [check_solids_dem.f, 589]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 591]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 592]    CHECK_SOLIDS_DEM_COLL_LSD
    Use   [check_solids_dem.f, 593]    CHECK_SOLIDS_DEM_COLL_LSD

lent    (Local Variable)  Declared as: INTEGER
    Define   [check_solids_dem.f, 67]   CHECK_SOLIDS_DEM_ENERGY
    Set   [check_solids_dem.f, 98]     CHECK_SOLIDS_DEM_ENERGY
    Use   [check_solids_dem.f, 100]    CHECK_SOLIDS_DEM_ENERGY

LENWK    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10163]        DLSODKR
    Set   [ODEPACK.F, 10313]           DLSODKR
    Set   [ODEPACK.F, 10314]           DLSODKR
    Set   [ODEPACK.F, 10316]           DLSODKR
    Set   [ODEPACK.F, 10317]           DLSODKR
    Set   [ODEPACK.F, 10318]           DLSODKR
    Use   [ODEPACK.F, 10321]           DLSODKR
    Use   [ODEPACK.F, 10322]           DLSODKR

LENWK    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8320]         DLSODPK
    Set   [ODEPACK.F, 8441]            DLSODPK
    Set   [ODEPACK.F, 8442]            DLSODPK
    Set   [ODEPACK.F, 8444]            DLSODPK
    Set   [ODEPACK.F, 8445]            DLSODPK
    Set   [ODEPACK.F, 8446]            DLSODPK
    Use   [ODEPACK.F, 8449]            DLSODPK
    Use   [ODEPACK.F, 8450]            DLSODPK

LENWK1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26130]        DPREPI
    Set   [ODEPACK.F, 26178]           DPREPI
    Use   [ODEPACK.F, 26181]           DPREPI
    Use   [ODEPACK.F, 26243]           DPREPI
    Use   [ODEPACK.F, 26247]           DPREPI
    Use   [ODEPACK.F, 26250]           DPREPI
    Use   [ODEPACK.F, 26267]           DPREPI
    Use   [ODEPACK.F, 26275]           DPREPI
    Use   [ODEPACK.F, 26283]           DPREPI

LENWM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4729]         DLSODA
    Set   [ODEPACK.F, 4857]            DLSODA
    Set   [ODEPACK.F, 4858]            DLSODA
    Use   [ODEPACK.F, 4859]            DLSODA

LENWM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6484]         DLSODAR
    Set   [ODEPACK.F, 6637]            DLSODAR
    Set   [ODEPACK.F, 6638]            DLSODAR
    Use   [ODEPACK.F, 6639]            DLSODAR

LENWM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 1215]         DLSODE
    Set   [ODEPACK.F, 1322]            DLSODE
    Set   [ODEPACK.F, 1323]            DLSODE
    Set   [ODEPACK.F, 1324]            DLSODE
    Set   [ODEPACK.F, 1325]            DLSODE
    Use   [ODEPACK.F, 1326]            DLSODE

LENWM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 12032]        DLSODI
    Set   [ODEPACK.F, 12138]           DLSODI
    Set   [ODEPACK.F, 12139]           DLSODI
    Use   [ODEPACK.F, 12140]           DLSODI

LENWM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10163]        DLSODKR
    Set   [ODEPACK.F, 10321]           DLSODKR
    Use   [ODEPACK.F, 10323]           DLSODKR

LENWM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8320]         DLSODPK
    Set   [ODEPACK.F, 8449]            DLSODPK
    Use   [ODEPACK.F, 8451]            DLSODPK

LENWM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 13834]        DLSOIBT
    Set   [ODEPACK.F, 13938]           DLSOIBT
    Use   [ODEPACK.F, 13939]           DLSOIBT

LENYH    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6486]         DLSODAR
    Set   [ODEPACK.F, 6627]            DLSODAR
    Use   [ODEPACK.F, 6628]            DLSODAR
    Use Argument   [ODEPACK.F, 6631]   DLSODAR

LENYH    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10165]        DLSODKR
    Set   [ODEPACK.F, 10305]           DLSODKR
    Use   [ODEPACK.F, 10306]           DLSODKR
    Use Argument   [ODEPACK.F, 10309]   DLSODKR

LENYHT    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3017]         DLSODES
    Set   [ODEPACK.F, 3186]            DLSODES
    Set   [ODEPACK.F, 3187]            DLSODES
    Use   [ODEPACK.F, 3191]            DLSODES
    Use   [ODEPACK.F, 3196]            DLSODES

LENYHT    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15803]        DLSODIS
    Set   [ODEPACK.F, 15980]           DLSODIS
    Use   [ODEPACK.F, 15985]           DLSODIS
    Use   [ODEPACK.F, 15989]           DLSODIS

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 78]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 105]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 116]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 116]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 126]        DRAG_GS_DES1
    Use Argument   [drag_gs_des1.f, 146]   DRAG_GS_DES1

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 244]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 274]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 284]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 284]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 292]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 299]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 299]        DRAG_GS_GAS1
    Use Argument   [drag_gs_des1.f, 303]   DRAG_GS_GAS1

lEPg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_ps_pic.f, 83]       CALC_PS_PIC_SNIDER
    Set   [calc_ps_pic.f, 89]          CALC_PS_PIC_SNIDER
    Set   [calc_ps_pic.f, 93]          CALC_PS_PIC_SNIDER
    Use   [calc_ps_pic.f, 114]         CALC_PS_PIC_SNIDER
    Use   [calc_ps_pic.f, 115]         CALC_PS_PIC_SNIDER
    Use   [calc_ps_pic.f, 115]         CALC_PS_PIC_SNIDER

lEPSoDP    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_ss_dem_noninterp.f, 388]   CALC_EPSoDP
    Declare   [drag_ss_dem_noninterp.f, 420]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 428]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 434]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 434]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 437]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 437]   CALC_EPSoDP
    Set   [drag_ss_dem_noninterp.f, 441]   CALC_EPSoDP
    Use   [drag_ss_dem_noninterp.f, 441]   CALC_EPSoDP

LEQ_BICGS0.MATVEC    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_bicgs.f, 108]        LEQ_BICGS0
    Call   [leq_bicgs.f, 283]          LEQ_BICGS0
    Call   [leq_bicgs.f, 355]          LEQ_BICGS0
    Call   [leq_bicgs.f, 383]          LEQ_BICGS0
    Call   [leq_bicgs.f, 409]          LEQ_BICGS0
    Call   [leq_bicgs.f, 471]          LEQ_BICGS0

LEQ_BICGS0.MSOLVE    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_bicgs.f, 108]        LEQ_BICGS0
    Call   [leq_bicgs.f, 349]          LEQ_BICGS0
    Call   [leq_bicgs.f, 403]          LEQ_BICGS0

LEQ_CG0.MATVEC    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_cg.f, 97]            LEQ_CG0
    Call   [leq_cg.f, 236]             LEQ_CG0
    Call   [leq_cg.f, 336]             LEQ_CG0
    Call   [leq_cg.f, 412]             LEQ_CG0

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

LEQ_GMRES0.MATVEC    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_gmres.f, 96]         LEQ_GMRES0
    Call   [leq_gmres.f, 226]          LEQ_GMRES0
    Call   [leq_gmres.f, 260]          LEQ_GMRES0
    Call   [leq_gmres.f, 299]          LEQ_GMRES0
    Call   [leq_gmres.f, 509]          LEQ_GMRES0
    Call   [leq_gmres.f, 552]          LEQ_GMRES0

LEQ_GMRES0.MSOLVE    (Dummy Argument)  Declared as: INTEGER (implicit)
    Define   [leq_gmres.f, 96]         LEQ_GMRES0
    Call   [leq_gmres.f, 239]          LEQ_GMRES0
    Call   [leq_gmres.f, 274]          LEQ_GMRES0
    Call   [leq_gmres.f, 301]          LEQ_GMRES0
    Call   [leq_gmres.f, 523]          LEQ_GMRES0

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

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

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

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

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

lEQ_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [usr_src_mod.f, 31]       CALC_USR_SOURCE
    Declare   [usr_src_mod.f, 76]      CALC_USR_SOURCE
    Use   [usr_src_mod.f, 115]         CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 121]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 133]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 147]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 160]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 176]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 202]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 219]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 245]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 262]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 288]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 309]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 330]   CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 341]   CALC_USR_SOURCE

lEQ_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [usr_sources.f, 25]       USR_SOURCES
    Declare   [usr_sources.f, 48]      USR_SOURCES
    Use   [usr_sources.f, 69]          USR_SOURCES

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

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_granular_energy.f, 71]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 219]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 341]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 344]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 429]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 432]   SOLVE_GRANULAR_ENERGY

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [diffuse_mean_fields.f, 46]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 80]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 82]   DIFFUSE_MEAN_FIELD

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_species_eq.f, 74]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 172]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 176]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 265]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 268]   SOLVE_SPECIES_EQ

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_epp.f, 61]         SOLVE_EPP
    Use Argument   [solve_epp.f, 131]   SOLVE_EPP
    Use Argument   [solve_epp.f, 134]   SOLVE_EPP

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_scalar_eq.f, 60]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 148]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 152]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 217]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 221]   SOLVE_Scalar_EQ

LEQI    (Variable)  Declared as: INTEGER
    Define   [solve_vel_star.f, 59]    SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 314]   U_m_star
    Use Argument   [solve_vel_star.f, 315]   U_m_star
    Use Argument   [solve_vel_star.f, 328]   U_m_star
    Use Argument   [solve_vel_star.f, 330]   U_m_star
    Use Argument   [solve_vel_star.f, 471]   V_m_star
    Use Argument   [solve_vel_star.f, 472]   V_m_star
    Use Argument   [solve_vel_star.f, 485]   V_m_star
    Use Argument   [solve_vel_star.f, 487]   V_m_star
    Use Argument   [solve_vel_star.f, 628]   W_m_star
    Use Argument   [solve_vel_star.f, 629]   W_m_star
    Use Argument   [solve_vel_star.f, 642]   W_m_star
    Use Argument   [solve_vel_star.f, 644]   W_m_star

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_pp_g.f, 57]        SOLVE_PP_G
    Set   [solve_pp_g.f, 113]          SOLVE_PP_G
    Use Argument   [solve_pp_g.f, 119]   SOLVE_PP_G

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

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_k_epsilon_eq.f, 62]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 170]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 173]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 252]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 255]   SOLVE_K_Epsilon_EQ

LEQI    (Local Variable)  Declared as: INTEGER
    Define   [solve_energy_eq.f, 72]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 276]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 279]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 293]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 295]   SOLVE_ENERGY_EQ

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

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_granular_energy.f, 71]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 219]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 341]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 344]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 429]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 432]   SOLVE_GRANULAR_ENERGY

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [diffuse_mean_fields.f, 46]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 80]   DIFFUSE_MEAN_FIELD
    Use Argument   [diffuse_mean_fields.f, 82]   DIFFUSE_MEAN_FIELD

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_species_eq.f, 74]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 172]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 176]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 265]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 268]   SOLVE_SPECIES_EQ

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_epp.f, 61]         SOLVE_EPP
    Use Argument   [solve_epp.f, 131]   SOLVE_EPP
    Use Argument   [solve_epp.f, 134]   SOLVE_EPP

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_scalar_eq.f, 60]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 148]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 152]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 217]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 221]   SOLVE_Scalar_EQ

LEQM    (Variable)  Declared as: INTEGER
    Define   [solve_vel_star.f, 59]    SOLVE_VEL_STAR
    Use Argument   [solve_vel_star.f, 314]   U_m_star
    Use Argument   [solve_vel_star.f, 315]   U_m_star
    Use Argument   [solve_vel_star.f, 328]   U_m_star
    Use Argument   [solve_vel_star.f, 330]   U_m_star
    Use Argument   [solve_vel_star.f, 471]   V_m_star
    Use Argument   [solve_vel_star.f, 472]   V_m_star
    Use Argument   [solve_vel_star.f, 485]   V_m_star
    Use Argument   [solve_vel_star.f, 487]   V_m_star
    Use Argument   [solve_vel_star.f, 628]   W_m_star
    Use Argument   [solve_vel_star.f, 630]   W_m_star
    Use Argument   [solve_vel_star.f, 642]   W_m_star
    Use Argument   [solve_vel_star.f, 644]   W_m_star

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_pp_g.f, 57]        SOLVE_PP_G
    Set   [solve_pp_g.f, 114]          SOLVE_PP_G
    Use Argument   [solve_pp_g.f, 119]   SOLVE_PP_G

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

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_k_epsilon_eq.f, 62]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 170]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 173]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 252]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 255]   SOLVE_K_Epsilon_EQ

LEQM    (Local Variable)  Declared as: INTEGER
    Define   [solve_energy_eq.f, 72]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 276]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 279]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 293]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 296]   SOLVE_ENERGY_EQ

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

LEQPC    (Dummy Argument)  Declared as: CHARACTER (len=4)
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 58]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 123]   TEST_LIN_EQ

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

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

leqsol.dot_product_par.i    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1122]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1154]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1156]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1182]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1184]         leqsol.dot_product_par

leqsol.dot_product_par.ijk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1122]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1144]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1145]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1145]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1145]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1156]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1157]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1157]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1184]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1186]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1186]         leqsol.dot_product_par

leqsol.dot_product_par.j    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1122]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1155]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1156]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1183]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1184]         leqsol.dot_product_par

leqsol.dot_product_par.k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1122]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1153]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1156]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1181]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1184]         leqsol.dot_product_par

leqsol.dot_product_par.prod    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [leqsol_mod.f, 1121]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1139]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1145]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1145]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1148]   leqsol.dot_product_par
    Set   [leqsol_mod.f, 1157]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1157]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1162]   leqsol.dot_product_par
    Set   [leqsol_mod.f, 1178]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1186]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1186]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1192]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1194]         leqsol.dot_product_par

leqsol.dot_product_par.r1    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [leqsol_mod.f, 1094]      leqsol.dot_product_par
    Declare   [leqsol_mod.f, 1112]     leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1127]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1145]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1157]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1174]   leqsol.dot_product_par

leqsol.dot_product_par.r1_g    (Local Variable)  Declared as: DOUBLE PRECISION (:) ALLOCATABLE
    Define   [leqsol_mod.f, 1120]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1168]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1171]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1174]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1186]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1196]         leqsol.dot_product_par

leqsol.dot_product_par.r2    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [leqsol_mod.f, 1094]      leqsol.dot_product_par
    Declare   [leqsol_mod.f, 1112]     leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1127]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1145]         leqsol.dot_product_par
    Use   [leqsol_mod.f, 1157]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1175]   leqsol.dot_product_par

leqsol.dot_product_par.r2_g    (Local Variable)  Declared as: DOUBLE PRECISION (:) ALLOCATABLE
    Define   [leqsol_mod.f, 1120]      leqsol.dot_product_par
    Set   [leqsol_mod.f, 1169]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1172]         leqsol.dot_product_par
    Use Argument   [leqsol_mod.f, 1175]   leqsol.dot_product_par
    Use   [leqsol_mod.f, 1186]         leqsol.dot_product_par
    Set   [leqsol_mod.f, 1197]         leqsol.dot_product_par

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

leqsol.dot_product_par2.i    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1234]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1243]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1246]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1248]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1275]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1277]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1278]         leqsol.dot_product_par2

leqsol.dot_product_par2.ijk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1234]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1248]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1249]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1249]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1250]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1250]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1278]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1280]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1280]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1281]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1281]         leqsol.dot_product_par2

leqsol.dot_product_par2.j    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1234]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1244]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1246]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1248]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1276]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1277]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1278]         leqsol.dot_product_par2

leqsol.dot_product_par2.k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1234]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1242]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1246]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1248]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1274]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1277]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1278]         leqsol.dot_product_par2

leqsol.dot_product_par2.prod    (Local Variable)  Declared as: DOUBLE PRECISION (2)
    Define   [leqsol_mod.f, 1233]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1239]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1249]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1249]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1250]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1250]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1255]   leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1272]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1280]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1280]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1281]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1281]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1286]   leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1288]         leqsol.dot_product_par2

leqsol.dot_product_par2.r1    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 1210]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1224]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1249]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1259]         leqsol.dot_product_par2

leqsol.dot_product_par2.r2    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 1210]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1224]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1249]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1260]         leqsol.dot_product_par2

leqsol.dot_product_par2.r3    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 1210]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1224]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1250]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1261]         leqsol.dot_product_par2

leqsol.dot_product_par2.r4    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 1210]      leqsol.dot_product_par2
    Declare   [leqsol_mod.f, 1224]     leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1250]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1262]         leqsol.dot_product_par2

leqsol.dot_product_par2.r_temp    (Local Variable)  Declared as: DOUBLE PRECISION (:,:) ALLOCATABLE
    Define   [leqsol_mod.f, 1232]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1258]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1259]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1260]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1261]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1262]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1269]   leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1290]         leqsol.dot_product_par2

leqsol.dot_product_par2.rg_temp    (Local Variable)  Declared as: DOUBLE PRECISION (:,:) ALLOCATABLE
    Define   [leqsol_mod.f, 1232]      leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1265]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1267]         leqsol.dot_product_par2
    Use Argument   [leqsol_mod.f, 1269]   leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1280]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1280]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1281]         leqsol.dot_product_par2
    Use   [leqsol_mod.f, 1281]         leqsol.dot_product_par2
    Set   [leqsol_mod.f, 1291]         leqsol.dot_product_par2

leqsol.ICHECK_BICGS    (Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 35]        leqsol
    Set   [init_namelist.f, 802]       INIT_NAMELIST
    Use Argument   [leq_bicgs.f, 439]   LEQ_BICGS0

leqsol.ITER_TOT    (Variable)  Declared as: INTEGER (DIM_EQS)
    Define   [leqsol_mod.f, 17]        leqsol
    Set   [leqsol_mod.f, 17]           leqsol
    Use   [leqsol_mod.f, 75]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 75]           leqsol.REPORT_SOLVER_STATS
    Set   [leq_cg.f, 399]              LEQ_CG0
    Use   [leq_cg.f, 399]              LEQ_CG0
    Set   [leq_cg.f, 446]              LEQ_CG0
    Use   [leq_cg.f, 446]              LEQ_CG0
    Set   [leq_sor.f, 119]             LEQ_SOR
    Set   [leq_bicgs.f, 458]           LEQ_BICGS0
    Use   [leq_bicgs.f, 458]           LEQ_BICGS0
    Set   [leq_bicgs.f, 491]           LEQ_BICGS0
    Use   [leq_bicgs.f, 491]           LEQ_BICGS0
    Set   [leq_bicgst.f, 548]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 548]          LEQ_BICGS0t
    Set   [leq_bicgst.f, 597]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 597]          LEQ_BICGS0t

leqsol.LEQ_ADJUST    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 8]         leqsol
    Set   [iterate.f, 321]             ITERATE.DO_ITERATION
    Set   [iterate.f, 82]              ITERATE.ITERATE_INIT

leqsol.LEQ_IJSWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3,-3:3) INTENT(IN)
    Define   [leqsol_mod.f, 1021]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1044]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1059]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1060]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1061]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1063]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 1021]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1046]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION (KSTART:KEND)
    Define   [leqsol_mod.f, 1050]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1082]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION (KSTART:KEND)
    Define   [leqsol_mod.f, 1050]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1060]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION (KSTART:KEND)
    Define   [leqsol_mod.f, 1050]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1059]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION (KSTART:KEND)
    Define   [leqsol_mod.f, 1050]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1061]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1069]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 1021]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1038]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1058]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1081]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1051]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1058]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1059]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1060]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1061]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1063]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1063]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1081]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1082]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1051]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1070]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1073]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1076]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.J    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 1021]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1038]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1058]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1081]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.K    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1051]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1057]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1058]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1059]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1060]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1061]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1080]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1081]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1082]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1051]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1054]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1057]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1069]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1080]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 1051]      leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1055]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1057]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1068]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1071]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1080]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(INOUT)
    Define   [leqsol_mod.f, 1021]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1042]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1062]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1063]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1064]         leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1065]         leqsol.LEQ_IJSWEEP
    Set   [leqsol_mod.f, 1082]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IJSWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [leqsol_mod.f, 1021]      leqsol.LEQ_IJSWEEP
    Declare   [leqsol_mod.f, 1040]     leqsol.LEQ_IJSWEEP
    Use   [leqsol_mod.f, 1074]         leqsol.LEQ_IJSWEEP

leqsol.LEQ_IKSWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3,-3:3) INTENT(IN)
    Define   [leqsol_mod.f, 851]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 876]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 895]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 896]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 851]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 878]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 882]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 917]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 882]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 896]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 904]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.CLASS    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 884]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 894]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 882]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 895]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 882]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 905]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 851]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 870]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 893]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 917]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 884]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 893]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 894]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 895]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 896]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 883]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 906]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 910]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 911]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.J    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 884]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 891]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 893]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 895]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 896]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 897]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 916]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 917]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 917]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.K    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 851]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 870]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 893]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 917]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 883]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 887]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 891]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 905]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 916]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 883]       leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 888]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 891]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 904]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 908]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 916]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(INOUT)
    Define   [leqsol_mod.f, 851]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 874]      leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 898]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 899]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 900]          leqsol.LEQ_IKSWEEP
    Use   [leqsol_mod.f, 901]          leqsol.LEQ_IKSWEEP
    Set   [leqsol_mod.f, 917]          leqsol.LEQ_IKSWEEP

leqsol.LEQ_IKSWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [leqsol_mod.f, 851]       leqsol.LEQ_IKSWEEP
    Declare   [leqsol_mod.f, 872]      leqsol.LEQ_IKSWEEP

leqsol.LEQ_ISWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3,-3:3) INTENT(IN)
    Define   [leqsol_mod.f, 767]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 792]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 812]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 813]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 767]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 794]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 798]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 822]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 830]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 798]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 812]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 818]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 822]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 798]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 822]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION (JSTART:JEND)
    Define   [leqsol_mod.f, 798]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 813]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 819]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 822]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.I    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 767]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 786]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 808]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 829]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 800]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 808]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 809]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 810]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 812]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 813]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 829]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 830]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.IM1JK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 800]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 809]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 799]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 820]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 822]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 824]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.IP1JK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 800]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 810]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.J    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 800]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 807]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 808]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 811]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 812]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 813]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 828]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 829]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 830]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.K    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 800]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 805]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 808]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 829]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 799]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 803]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 807]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 819]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 828]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 799]       leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 804]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 807]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 818]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 828]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(INOUT)
    Define   [leqsol_mod.f, 767]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 790]      leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 814]          leqsol.LEQ_ISWEEP
    Use   [leqsol_mod.f, 815]          leqsol.LEQ_ISWEEP
    Set   [leqsol_mod.f, 830]          leqsol.LEQ_ISWEEP

leqsol.LEQ_ISWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [leqsol_mod.f, 767]       leqsol.LEQ_ISWEEP
    Declare   [leqsol_mod.f, 788]      leqsol.LEQ_ISWEEP

leqsol.LEQ_IT    (Variable)  Declared as: INTEGER (DIM_EQS)
    Define   [leqsol_mod.f, 11]        leqsol
    Use Argument   [solve_granular_energy.f, 218]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 340]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 428]   SOLVE_GRANULAR_ENERGY
    Use Argument   [diffuse_mean_fields.f, 80]   DIFFUSE_MEAN_FIELD
    Use Argument   [solve_species_eq.f, 171]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 264]   SOLVE_SPECIES_EQ
    Use Argument   [solve_epp.f, 130]   SOLVE_EPP
    Use Argument   [solve_scalar_eq.f, 147]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 216]   SOLVE_Scalar_EQ
    Use   [write_out0.f, 186]          WRITE_OUT0
    Use   [write_out0.f, 191]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 313]   U_m_star
    Use Argument   [solve_vel_star.f, 327]   U_m_star
    Use Argument   [solve_vel_star.f, 470]   V_m_star
    Use Argument   [solve_vel_star.f, 484]   V_m_star
    Use Argument   [solve_vel_star.f, 627]   W_m_star
    Use Argument   [solve_vel_star.f, 641]   W_m_star
    Use   [write_res0.f, 317]          WRITE_RES0
    Use   [solve_pp_g.f, 113]          SOLVE_PP_G
    Use   [solve_continuity.f, 88]     cont.SOLVE_CONTINUITY
    Use   [solve_continuity.f, 121]    cont.SOLVE_CONTINUITY
    Set   [init_namelist.f, 617]       INIT_NAMELIST
    Set   [init_namelist.f, 618]       INIT_NAMELIST
    Set   [init_namelist.f, 619]       INIT_NAMELIST
    Set   [init_namelist.f, 620]       INIT_NAMELIST
    Set   [init_namelist.f, 621]       INIT_NAMELIST
    Set   [init_namelist.f, 622]       INIT_NAMELIST
    Set   [init_namelist.f, 623]       INIT_NAMELIST
    Set   [init_namelist.f, 624]       INIT_NAMELIST
    Set   [init_namelist.f, 625]       INIT_NAMELIST
    Set   [init_namelist.f, 626]       INIT_NAMELIST
    Use Argument   [solve_k_epsilon_eq.f, 169]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 251]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_energy_eq.f, 275]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 292]   SOLVE_ENERGY_EQ

leqsol.LEQ_JKSWEEP.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3,-3:3) INTENT(IN)
    Define   [leqsol_mod.f, 939]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 962]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 977]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 978]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 979]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(IN)
    Define   [leqsol_mod.f, 939]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 964]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.BB    (Local Variable)  Declared as: DOUBLE PRECISION (ISTART:IEND)
    Define   [leqsol_mod.f, 968]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1000]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.CC    (Local Variable)  Declared as: DOUBLE PRECISION (ISTART:IEND)
    Define   [leqsol_mod.f, 968]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 978]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 986]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.DD    (Local Variable)  Declared as: DOUBLE PRECISION (ISTART:IEND)
    Define   [leqsol_mod.f, 968]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 977]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.EE    (Local Variable)  Declared as: DOUBLE PRECISION (ISTART:IEND)
    Define   [leqsol_mod.f, 968]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 979]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 987]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.I    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 969]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 975]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 976]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 977]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 978]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 979]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 998]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 999]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1000]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 969]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 976]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 977]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 978]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 979]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 999]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 1000]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.INFO    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 969]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 988]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 991]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 994]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.J    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 939]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 956]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 976]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 999]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.K    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 939]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 956]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 976]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 999]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.NEND    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 969]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 972]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 975]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 987]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 998]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.NSTART    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 969]       leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 973]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 975]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 986]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 989]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 998]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION (ijkstart3:ijkend3) INTENT(INOUT)
    Define   [leqsol_mod.f, 939]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 960]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 980]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 981]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 982]          leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 983]          leqsol.LEQ_JKSWEEP
    Set   [leqsol_mod.f, 1000]         leqsol.LEQ_JKSWEEP

leqsol.LEQ_JKSWEEP.Vname    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [leqsol_mod.f, 939]       leqsol.LEQ_JKSWEEP
    Declare   [leqsol_mod.f, 958]      leqsol.LEQ_JKSWEEP
    Use   [leqsol_mod.f, 992]          leqsol.LEQ_JKSWEEP

leqsol.LEQ_MATVEC.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,-3:3) INTENT(IN)
    Define   [leqsol_mod.f, 103]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 125]      leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 149]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 160]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 196]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 197]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 241]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 242]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.AVar    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [leqsol_mod.f, 103]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 128]      leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 195]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 240]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC
    Use Argument   [leqsol_mod.f, 258]   leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.class    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 135]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 186]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 196]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 197]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 238]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 241]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 242]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.I    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 133]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 191]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 193]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 219]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 222]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 222]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 237]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 133]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 141]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 143]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 144]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 145]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 146]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 149]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 155]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 156]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 160]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 193]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 195]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 196]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 196]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 197]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 197]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 237]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 238]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 240]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 241]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 241]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 242]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 242]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijkm1    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 134]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 155]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijkp1    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 134]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 156]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 160]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijm1k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 134]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 145]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ijp1k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 134]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 146]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.im1jk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 134]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 143]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 149]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.interval    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 135]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 235]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 236]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 236]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.ip1jk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 134]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 144]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.J    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 133]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 192]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 193]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 236]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 237]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.j_end    (Local Variable)  Declared as: INTEGER (2)
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 212]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 214]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 224]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 226]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 229]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 231]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 236]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.j_start    (Local Variable)  Declared as: INTEGER (2)
    Define   [leqsol_mod.f, 136]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 211]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 213]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 223]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 225]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 228]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 230]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 236]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.K    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 133]       leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 190]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 193]          leqsol.LEQ_MATVEC
    Set   [leqsol_mod.f, 218]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 222]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 222]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 237]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [leqsol_mod.f, 103]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 122]      leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 148]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 149]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 150]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 151]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 152]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 159]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 160]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 196]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 197]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 198]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 199]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 200]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 203]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 204]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 241]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 242]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 243]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 244]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 245]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 248]          leqsol.LEQ_MATVEC
    Use   [leqsol_mod.f, 249]          leqsol.LEQ_MATVEC

leqsol.LEQ_MATVEC.Vname    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [leqsol_mod.f, 103]       leqsol.LEQ_MATVEC
    Declare   [leqsol_mod.f, 119]      leqsol.LEQ_MATVEC

leqsol.LEQ_METHOD    (Variable)  Declared as: INTEGER (DIM_EQS)
    Define   [leqsol_mod.f, 14]        leqsol
    Use Argument   [solve_granular_energy.f, 218]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 341]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 428]   SOLVE_GRANULAR_ENERGY
    Use Argument   [diffuse_mean_fields.f, 80]   DIFFUSE_MEAN_FIELD
    Use Argument   [solve_species_eq.f, 172]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 265]   SOLVE_SPECIES_EQ
    Use Argument   [solve_epp.f, 130]   SOLVE_EPP
    Use Argument   [solve_scalar_eq.f, 147]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 216]   SOLVE_Scalar_EQ
    Use   [write_out0.f, 187]          WRITE_OUT0
    Use   [write_out0.f, 192]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 313]   U_m_star
    Use Argument   [solve_vel_star.f, 328]   U_m_star
    Use Argument   [solve_vel_star.f, 470]   V_m_star
    Use Argument   [solve_vel_star.f, 485]   V_m_star
    Use Argument   [solve_vel_star.f, 628]   W_m_star
    Use Argument   [solve_vel_star.f, 642]   W_m_star
    Use   [write_res0.f, 317]          WRITE_RES0
    Use   [solve_pp_g.f, 114]          SOLVE_PP_G
    Use   [solve_continuity.f, 88]     cont.SOLVE_CONTINUITY
    Use   [solve_continuity.f, 121]    cont.SOLVE_CONTINUITY
    Set   [check_numerics.f, 115]      CHECK_NUMERICS
    Set   [check_numerics.f, 116]      CHECK_NUMERICS
    Set   [init_namelist.f, 596]       INIT_NAMELIST
    Use Argument   [solve_k_epsilon_eq.f, 169]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 251]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_energy_eq.f, 275]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 292]   SOLVE_ENERGY_EQ

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

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

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

leqsol.LEQ_MSOLVE.CMETHOD    (Dummy Argument)  Declared as: CHARACTER (len=4) INTENT(IN)
    Define   [leqsol_mod.f, 286]       leqsol.LEQ_MSOLVE
    Declare   [leqsol_mod.f, 315]      leqsol.LEQ_MSOLVE
    Use Argument   [leqsol_mod.f, 359]   leqsol.LEQ_MSOLVE
    Use   [leqsol_mod.f, 364]          leqsol.LEQ_MSOLVE

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

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

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

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

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

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

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

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

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

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

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

leqsol.LEQ_MSOLVE.IJK    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 326]       leqsol.LEQ_MSOLVE

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

leqsol.LEQ_MSOLVE0.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [leqsol_mod.f, 616]       leqsol.LEQ_MSOLVE0
    Declare   [leqsol_mod.f, 636]      leqsol.LEQ_MSOLVE0
    Use   [leqsol_mod.f, 655]          leqsol.LEQ_MSOLVE0
    Use   [leqsol_mod.f, 658]          leqsol.LEQ_MSOLVE0

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

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

leqsol.LEQ_MSOLVE0.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [leqsol_mod.f, 616]       leqsol.LEQ_MSOLVE0
    Declare   [leqsol_mod.f, 642]      leqsol.LEQ_MSOLVE0
    Set   [leqsol_mod.f, 655]          leqsol.LEQ_MSOLVE0
    Set   [leqsol_mod.f, 658]          leqsol.LEQ_MSOLVE0
    Use Argument   [leqsol_mod.f, 660]   leqsol.LEQ_MSOLVE0

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

leqsol.LEQ_MSOLVE1.A_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,-3:3) INTENT(IN)
    Define   [leqsol_mod.f, 681]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 707]      leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 735]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 742]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.B_m    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [leqsol_mod.f, 681]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 704]      leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 735]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 742]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.CMETHOD    (Dummy Argument)  Declared as: CHARACTER (len=4) INTENT(IN)
    Define   [leqsol_mod.f, 681]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 712]      leqsol.LEQ_MSOLVE1

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

leqsol.LEQ_MSOLVE1.ijk    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 716]       leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 721]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 722]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 734]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 735]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 735]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 735]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 741]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 742]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 742]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 742]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.j    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 716]       leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 733]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 734]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.k    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 716]       leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 731]          leqsol.LEQ_MSOLVE1
    Use   [leqsol_mod.f, 734]          leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.Var    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [leqsol_mod.f, 681]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 710]      leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 722]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 725]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 735]          leqsol.LEQ_MSOLVE1
    Set   [leqsol_mod.f, 742]          leqsol.LEQ_MSOLVE1
    Use Argument   [leqsol_mod.f, 746]   leqsol.LEQ_MSOLVE1

leqsol.LEQ_MSOLVE1.Vname    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [leqsol_mod.f, 681]       leqsol.LEQ_MSOLVE1
    Declare   [leqsol_mod.f, 701]      leqsol.LEQ_MSOLVE1

leqsol.LEQ_PC    (Variable)  Declared as: CHARACTER (len=4)(DIM_EQS)
    Define   [leqsol_mod.f, 26]        leqsol
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 344]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 432]   SOLVE_GRANULAR_ENERGY
    Use Argument   [diffuse_mean_fields.f, 83]   DIFFUSE_MEAN_FIELD
    Use Argument   [solve_species_eq.f, 176]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 268]   SOLVE_SPECIES_EQ
    Use Argument   [solve_epp.f, 135]   SOLVE_EPP
    Use Argument   [solve_scalar_eq.f, 153]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 222]   SOLVE_Scalar_EQ
    Set   [check_data_cartesian.f, 938]   CHECK_DATA_CG.CHECK_DATA_CARTESIAN
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 316]   U_m_star
    Use Argument   [solve_vel_star.f, 331]   U_m_star
    Use Argument   [solve_vel_star.f, 473]   V_m_star
    Use Argument   [solve_vel_star.f, 488]   V_m_star
    Use Argument   [solve_vel_star.f, 630]   W_m_star
    Use Argument   [solve_vel_star.f, 645]   W_m_star
    Use Argument   [solve_pp_g.f, 120]   SOLVE_PP_G
    Use   [solve_continuity.f, 91]     cont.SOLVE_CONTINUITY
    Use   [solve_continuity.f, 124]    cont.SOLVE_CONTINUITY
    Set   [init_namelist.f, 653]       INIT_NAMELIST
    Use Argument   [solve_k_epsilon_eq.f, 174]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 256]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_energy_eq.f, 280]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 296]   SOLVE_ENERGY_EQ

leqsol.LEQ_SWEEP    (Variable)  Declared as: CHARACTER (len=4)(DIM_EQS)
    Define   [leqsol_mod.f, 20]        leqsol
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 344]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 432]   SOLVE_GRANULAR_ENERGY
    Use Argument   [diffuse_mean_fields.f, 83]   DIFFUSE_MEAN_FIELD
    Use Argument   [solve_species_eq.f, 176]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 268]   SOLVE_SPECIES_EQ
    Use Argument   [solve_epp.f, 135]   SOLVE_EPP
    Use Argument   [solve_scalar_eq.f, 152]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 221]   SOLVE_Scalar_EQ
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 316]   U_m_star
    Use Argument   [solve_vel_star.f, 330]   U_m_star
    Use Argument   [solve_vel_star.f, 473]   V_m_star
    Use Argument   [solve_vel_star.f, 487]   V_m_star
    Use Argument   [solve_vel_star.f, 630]   W_m_star
    Use Argument   [solve_vel_star.f, 644]   W_m_star
    Use Argument   [solve_pp_g.f, 120]   SOLVE_PP_G
    Use   [solve_continuity.f, 91]     cont.SOLVE_CONTINUITY
    Use   [solve_continuity.f, 124]    cont.SOLVE_CONTINUITY
    Set   [check_numerics.f, 114]      CHECK_NUMERICS
    Set   [init_namelist.f, 641]       INIT_NAMELIST
    Use Argument   [solve_k_epsilon_eq.f, 174]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 256]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_energy_eq.f, 280]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 296]   SOLVE_ENERGY_EQ

leqsol.LEQ_TOL    (Variable)  Declared as: DOUBLE PRECISION (DIM_EQS)
    Define   [leqsol_mod.f, 23]        leqsol
    Use Argument   [solve_granular_energy.f, 222]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 344]   SOLVE_GRANULAR_ENERGY
    Use Argument   [solve_granular_energy.f, 432]   SOLVE_GRANULAR_ENERGY
    Use Argument   [diffuse_mean_fields.f, 83]   DIFFUSE_MEAN_FIELD
    Use Argument   [solve_species_eq.f, 176]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 268]   SOLVE_SPECIES_EQ
    Use Argument   [solve_epp.f, 135]   SOLVE_EPP
    Use Argument   [solve_scalar_eq.f, 152]   SOLVE_Scalar_EQ
    Use Argument   [solve_scalar_eq.f, 221]   SOLVE_Scalar_EQ
    Use   [write_out0.f, 188]          WRITE_OUT0
    Use   [write_out0.f, 193]          WRITE_OUT0
    Use Argument   [solve_vel_star.f, 316]   U_m_star
    Use Argument   [solve_vel_star.f, 330]   U_m_star
    Use Argument   [solve_vel_star.f, 473]   V_m_star
    Use Argument   [solve_vel_star.f, 487]   V_m_star
    Use Argument   [solve_vel_star.f, 630]   W_m_star
    Use Argument   [solve_vel_star.f, 645]   W_m_star
    Use Argument   [solve_pp_g.f, 120]   SOLVE_PP_G
    Use   [solve_continuity.f, 91]     cont.SOLVE_CONTINUITY
    Use   [solve_continuity.f, 124]    cont.SOLVE_CONTINUITY
    Set   [init_namelist.f, 606]       INIT_NAMELIST
    Use Argument   [solve_k_epsilon_eq.f, 174]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_k_epsilon_eq.f, 256]   SOLVE_K_Epsilon_EQ
    Use Argument   [solve_energy_eq.f, 280]   SOLVE_ENERGY_EQ
    Use Argument   [solve_energy_eq.f, 296]   SOLVE_ENERGY_EQ

leqsol.MINIMIZE_DOTPRODUCTS    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 29]        leqsol
    Set   [check_numerics.f, 111]      CHECK_NUMERICS
    Use   [leq_bicgs.f, 372]           LEQ_BICGS0
    Use   [leq_bicgs.f, 411]           LEQ_BICGS0
    Use   [leq_bicgs.f, 439]           LEQ_BICGS0
    Use   [leq_bicgst.f, 388]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 487]          LEQ_BICGS0t
    Use   [leq_bicgst.f, 514]          LEQ_BICGS0t

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

leqsol.REPORT_SOLVER_STATS.LC    (Local Variable)  Declared as: INTEGER
    Define   [leqsol_mod.f, 58]        leqsol.REPORT_SOLVER_STATS
    Set   [leqsol_mod.f, 74]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 75]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 75]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 75]           leqsol.REPORT_SOLVER_STATS

leqsol.REPORT_SOLVER_STATS.STEPS    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 50]        leqsol.REPORT_SOLVER_STATS
    Declare   [leqsol_mod.f, 56]       leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 60]           leqsol.REPORT_SOLVER_STATS

leqsol.REPORT_SOLVER_STATS.TNIT    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [leqsol_mod.f, 50]        leqsol.REPORT_SOLVER_STATS
    Declare   [leqsol_mod.f, 56]       leqsol.REPORT_SOLVER_STATS
    Use Argument   [leqsol_mod.f, 60]   leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 60]           leqsol.REPORT_SOLVER_STATS
    Use   [leqsol_mod.f, 75]           leqsol.REPORT_SOLVER_STATS

leqsol.SOLVER_STATISTICS    (Variable)  Declared as: LOGICAL
    Define   [leqsol_mod.f, 41]        leqsol
    Use   [time_step.f, 187]           STEP.TIME_STEP_END
    Set   [check_numerics.f, 112]      CHECK_NUMERICS
    Set   [init_namelist.f, 3456]      INIT_NAMELIST

LEQSWEEP    (Dummy Argument)  Declared as: CHARACTER (len=4)
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 56]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 123]   TEST_LIN_EQ

LEQTOL    (Dummy Argument)  Declared as: DOUBLE PRECISION
    Define   [test_lin_eq.f, 22]       TEST_LIN_EQ
    Declare   [test_lin_eq.f, 57]      TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 123]   TEST_LIN_EQ
    Use   [test_lin_eq.f, 155]         TEST_LIN_EQ

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

LEVEL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [physical_prop.f, 20]     PHYSICAL_PROP
    Declare   [physical_prop.f, 38]    PHYSICAL_PROP
    Use   [physical_prop.f, 58]        PHYSICAL_PROP
    Use   [physical_prop.f, 66]        PHYSICAL_PROP
    Use   [physical_prop.f, 77]        PHYSICAL_PROP

LEVEL    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 27293]        XERRWD
    Declare   [ODEPACK.F, 27354]       XERRWD
    Use   [ODEPACK.F, 27383]           XERRWD

LEWTN    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 17824]        DIPREP
    Set   [ODEPACK.F, 17855]           DIPREP
    Use   [ODEPACK.F, 17856]           DIPREP
    Use   [ODEPACK.F, 17859]           DIPREP
    Use   [ODEPACK.F, 17861]           DIPREP
    Use   [ODEPACK.F, 17862]           DIPREP

LEWTN    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26057]        DIPREPI
    Set   [ODEPACK.F, 26088]           DIPREPI
    Use   [ODEPACK.F, 26089]           DIPREPI
    Use   [ODEPACK.F, 26092]           DIPREPI
    Use   [ODEPACK.F, 26094]           DIPREPI
    Use   [ODEPACK.F, 26095]           DIPREPI

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 795]    CPgErr_LOG
    Set   [physical_prop.f, 808]       CPgErr_LOG
    Use   [physical_prop.f, 809]       CPgErr_LOG

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 896]    CPsErr_LOG
    Set   [physical_prop.f, 909]       CPsErr_LOG
    Use   [physical_prop.f, 910]       CPsErr_LOG

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 596]    ROgErr_LOG
    Set   [physical_prop.f, 608]       ROgErr_LOG
    Use   [physical_prop.f, 609]       ROgErr_LOG

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [physical_prop.f, 697]    ROsErr_LOG
    Set   [physical_prop.f, 709]       ROsErr_LOG
    Use   [physical_prop.f, 710]       ROsErr_LOG

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

lExists    (Local Variable)  Declared as: LOGICAL
    Define   [apply_wall_bc_pic.f, 268]   OUT_THIS_STL
    Set   [apply_wall_bc_pic.f, 273]   OUT_THIS_STL
    Use   [apply_wall_bc_pic.f, 275]   OUT_THIS_STL

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

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

lEXISTS    (Local Variable)  Declared as: LOGICAL
    Define   [read_namelist.f, 85]     READ_NAMELIST
    Set   [read_namelist.f, 130]       READ_NAMELIST
    Use   [read_namelist.f, 131]       READ_NAMELIST

LF0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 4728]         DLSODA
    Set   [ODEPACK.F, 4949]            DLSODA
    Use   [ODEPACK.F, 4950]            DLSODA
    Use   [ODEPACK.F, 4998]            DLSODA
    Use   [ODEPACK.F, 5009]            DLSODA
    Use   [ODEPACK.F, 5009]            DLSODA

LF0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6484]         DLSODAR
    Set   [ODEPACK.F, 6729]            DLSODAR
    Use   [ODEPACK.F, 6730]            DLSODAR
    Use   [ODEPACK.F, 6778]            DLSODAR
    Use   [ODEPACK.F, 6789]            DLSODAR
    Use   [ODEPACK.F, 6789]            DLSODAR

LF0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 1214]         DLSODE
    Set   [ODEPACK.F, 1390]            DLSODE
    Use   [ODEPACK.F, 1391]            DLSODE
    Use   [ODEPACK.F, 1436]            DLSODE
    Use   [ODEPACK.F, 1447]            DLSODE
    Use   [ODEPACK.F, 1447]            DLSODE

LF0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3017]         DLSODES
    Set   [ODEPACK.F, 3277]            DLSODES
    Use   [ODEPACK.F, 3278]            DLSODES
    Set   [ODEPACK.F, 3340]            DLSODES
    Use   [ODEPACK.F, 3358]            DLSODES
    Use   [ODEPACK.F, 3369]            DLSODES
    Use   [ODEPACK.F, 3369]            DLSODES

LF0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10162]        DLSODKR
    Set   [ODEPACK.F, 10406]           DLSODKR
    Use   [ODEPACK.F, 10407]           DLSODKR
    Use   [ODEPACK.F, 10421]           DLSODKR
    Use   [ODEPACK.F, 10431]           DLSODKR
    Use   [ODEPACK.F, 10431]           DLSODKR

LF0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8319]         DLSODPK
    Set   [ODEPACK.F, 8532]            DLSODPK
    Use   [ODEPACK.F, 8533]            DLSODPK
    Use   [ODEPACK.F, 8578]            DLSODPK
    Use   [ODEPACK.F, 8589]            DLSODPK
    Use   [ODEPACK.F, 8589]            DLSODPK

lfactor_mus    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [calc_mu_s.f, 2404]       subgrid_stress_wall
    Declare   [calc_mu_s.f, 2419]      subgrid_stress_wall
    Set   [calc_mu_s.f, 2439]          subgrid_stress_wall
    Set   [calc_mu_s.f, 2446]          subgrid_stress_wall

lfactor_ps    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [calc_mu_s.f, 2404]       subgrid_stress_wall
    Declare   [calc_mu_s.f, 2417]      subgrid_stress_wall
    Set   [calc_mu_s.f, 2438]          subgrid_stress_wall
    Set   [calc_mu_s.f, 2444]          subgrid_stress_wall

lfcount    (Local Variable)  Declared as: INTEGER SAVE
    Define   [integrate_time_pic.f, 634]   des_dbgpic
    Set   [integrate_time_pic.f, 634]   des_dbgpic
    Set   [integrate_time_pic.f, 642]   des_dbgpic
    Use   [integrate_time_pic.f, 642]   des_dbgpic
    Use   [integrate_time_pic.f, 643]   des_dbgpic

lfcount    (Local Variable)  Declared as: INTEGER SAVE
    Define   [integrate_time_pic.f, 688]   des_dbgtecplot
    Set   [integrate_time_pic.f, 688]   des_dbgtecplot
    Set   [integrate_time_pic.f, 697]   des_dbgtecplot
    Use   [integrate_time_pic.f, 697]   des_dbgtecplot
    Use   [integrate_time_pic.f, 698]   des_dbgtecplot

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

lFile    (Local Variable)  Declared as: CHARACTER (len=255)
    Define   [physical_prop.f, 796]    CPgErr_LOG
    Set   [physical_prop.f, 802]       CPgErr_LOG
    Set   [physical_prop.f, 804]       CPgErr_LOG
    Set   [physical_prop.f, 806]       CPgErr_LOG
    Use Argument   [physical_prop.f, 808]   CPgErr_LOG
    Use Argument   [physical_prop.f, 810]   CPgErr_LOG
    Use Argument   [physical_prop.f, 813]   CPgErr_LOG

lFile    (Local Variable)  Declared as: CHARACTER (len=255)
    Define   [physical_prop.f, 897]    CPsErr_LOG
    Set   [physical_prop.f, 903]       CPsErr_LOG
    Set   [physical_prop.f, 905]       CPsErr_LOG
    Set   [physical_prop.f, 907]       CPsErr_LOG
    Use Argument   [physical_prop.f, 909]   CPsErr_LOG
    Use Argument   [physical_prop.f, 911]   CPsErr_LOG
    Use Argument   [physical_prop.f, 914]   CPsErr_LOG

lFile    (Local Variable)  Declared as: CHARACTER (len=255)
    Define   [physical_prop.f, 597]    ROgErr_LOG
    Set   [physical_prop.f, 602]       ROgErr_LOG
    Set   [physical_prop.f, 604]       ROgErr_LOG
    Set   [physical_prop.f, 606]       ROgErr_LOG
    Use Argument   [physical_prop.f, 608]   ROgErr_LOG
    Use Argument   [physical_prop.f, 610]   ROgErr_LOG
    Use Argument   [physical_prop.f, 613]   ROgErr_LOG

lFile    (Local Variable)  Declared as: CHARACTER (len=255)
    Define   [physical_prop.f, 698]    ROsErr_LOG
    Set   [physical_prop.f, 703]       ROsErr_LOG
    Set   [physical_prop.f, 705]       ROsErr_LOG
    Set   [physical_prop.f, 707]       ROsErr_LOG
    Use Argument   [physical_prop.f, 709]   ROsErr_LOG
    Use Argument   [physical_prop.f, 711]   ROsErr_LOG
    Use Argument   [physical_prop.f, 714]   ROsErr_LOG

lFile    (Local Variable)  Declared as: CHARACTER (len=255)
    Define   [calc_vol_fr.f, 305]      EPgErr_LOG
    Set   [calc_vol_fr.f, 311]         EPgErr_LOG
    Set   [calc_vol_fr.f, 313]         EPgErr_LOG
    Set   [calc_vol_fr.f, 315]         EPgErr_LOG
    Use Argument   [calc_vol_fr.f, 317]   EPgErr_LOG
    Use Argument   [calc_vol_fr.f, 319]   EPgErr_LOG
    Use Argument   [calc_vol_fr.f, 322]   EPgErr_LOG

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

lFlags_i    (Local Variable)  Declared as: INTEGER (:,:) ALLOCATABLE
    Define   [set_ps.f, 281]           DEBUG_PS
    Set   [set_ps.f, 289]              DEBUG_PS
    Set   [set_ps.f, 289]              DEBUG_PS
    Set   [set_ps.f, 303]              DEBUG_PS
    Set   [set_ps.f, 304]              DEBUG_PS
    Use Argument   [set_ps.f, 312]     DEBUG_PS
    Use Argument   [set_ps.f, 388]     DEBUG_PS
    Set   [set_ps.f, 388]              DEBUG_PS

LFLUID    (Local Variable)  Declared as: INTEGER
    Define   [set_wall_bc.f, 257]      SET_WALL_BC1
    Set   [set_wall_bc.f, 301]         SET_WALL_BC1
    Use   [set_wall_bc.f, 304]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 305]   SET_WALL_BC1
    Use   [set_wall_bc.f, 309]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 310]   SET_WALL_BC1
    Set   [set_wall_bc.f, 316]         SET_WALL_BC1
    Use   [set_wall_bc.f, 319]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 320]   SET_WALL_BC1
    Use   [set_wall_bc.f, 324]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 325]   SET_WALL_BC1
    Set   [set_wall_bc.f, 332]         SET_WALL_BC1
    Use   [set_wall_bc.f, 335]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 336]   SET_WALL_BC1
    Use   [set_wall_bc.f, 340]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 341]   SET_WALL_BC1
    Set   [set_wall_bc.f, 347]         SET_WALL_BC1
    Use   [set_wall_bc.f, 350]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 351]   SET_WALL_BC1
    Use   [set_wall_bc.f, 355]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 356]   SET_WALL_BC1
    Set   [set_wall_bc.f, 364]         SET_WALL_BC1
    Use   [set_wall_bc.f, 367]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 369]   SET_WALL_BC1
    Use   [set_wall_bc.f, 373]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 375]   SET_WALL_BC1
    Set   [set_wall_bc.f, 381]         SET_WALL_BC1
    Use   [set_wall_bc.f, 384]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 386]   SET_WALL_BC1
    Use   [set_wall_bc.f, 390]         SET_WALL_BC1
    Use Argument   [set_wall_bc.f, 392]   SET_WALL_BC1

LFLUID    (Local Variable)  Declared as: INTEGER
    Define   [CG_set_outflow.f, 67]    CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 100]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 105]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 108]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 111]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 115]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 122]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 126]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 133]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 134]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 140]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 142]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 143]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 154]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 334]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 339]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 342]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 345]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 349]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 356]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 360]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 367]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 368]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 373]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 375]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 376]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 386]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 436]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 443]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 446]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 449]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 453]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 460]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 464]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 471]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 472]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 477]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 479]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 480]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 490]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 655]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 662]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 665]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 668]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 672]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 679]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 683]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 690]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 691]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 696]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 698]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 699]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 709]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 753]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 756]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 759]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 762]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 766]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 773]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 777]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 784]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 785]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 790]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 792]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 793]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 803]      CG_SET_OUTFLOW
    Set   [CG_set_outflow.f, 940]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 943]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 946]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 949]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 953]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 960]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 964]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 971]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 972]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 977]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 979]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 980]      CG_SET_OUTFLOW
    Use   [CG_set_outflow.f, 990]      CG_SET_OUTFLOW

lFName    (Local Variable)  Declared as: CHARACTER (len=64)
    Define   [set_ro_s.f, 137]         CHECK_SET_ROs
    Set   [set_ro_s.f, 160]            CHECK_SET_ROs
    Set   [set_ro_s.f, 162]            CHECK_SET_ROs
    Set   [set_ro_s.f, 164]            CHECK_SET_ROs
    Use Argument   [set_ro_s.f, 166]   CHECK_SET_ROs
    Use Argument   [set_ro_s.f, 168]   CHECK_SET_ROs
    Use Argument   [set_ro_s.f, 170]   CHECK_SET_ROs

lFORCE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [drag_gs_des1.f, 248]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 305]        DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 306]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 306]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 308]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 322]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 336]        DRAG_GS_GAS1

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

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

lfreq    (Local Variable)  Declared as: INTEGER SAVE
    Define   [integrate_time_pic.f, 634]   des_dbgpic
    Set   [integrate_time_pic.f, 634]   des_dbgpic
    Set   [integrate_time_pic.f, 638]   des_dbgpic
    Use   [integrate_time_pic.f, 638]   des_dbgpic
    Use   [integrate_time_pic.f, 639]   des_dbgpic
    Set   [integrate_time_pic.f, 640]   des_dbgpic

lfreq    (Local Variable)  Declared as: INTEGER SAVE
    Define   [integrate_time_pic.f, 688]   des_dbgtecplot
    Set   [integrate_time_pic.f, 688]   des_dbgtecplot
    Set   [integrate_time_pic.f, 693]   des_dbgtecplot
    Use   [integrate_time_pic.f, 693]   des_dbgtecplot
    Use   [integrate_time_pic.f, 694]   des_dbgtecplot
    Set   [integrate_time_pic.f, 695]   des_dbgtecplot

lgathercnts    (Local Variable)  Declared as: INTEGER (0:numpes-1)
    Define   [write_des_data.f, 294]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 366]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 367]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 368]   WRITE_DES_TECPLOT

lglobal_id    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_pic.f, 48]   MASS_INFLOW_PIC
    Set   [mass_inflow_pic.f, 227]     MASS_INFLOW_PIC
    Set   [mass_inflow_pic.f, 230]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 230]     MASS_INFLOW_PIC
    Use   [mass_inflow_pic.f, 231]     MASS_INFLOW_PIC

lglobal_id    (Local Variable)  Declared as: INTEGER
    Define   [make_arrays_des.f, 40]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 100]     MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 103]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 103]     MAKE_ARRAYS_DES
    Use   [make_arrays_des.f, 104]     MAKE_ARRAYS_DES

lglocnt    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 294]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 360]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 362]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 363]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 363]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 364]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 396]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 400]      WRITE_DES_TECPLOT

LGMR    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Use Argument   [ODEPACK.F, 22410]   DSOLPK
    Use   [ODEPACK.F, 22412]           DSOLPK

LGMR    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 22905]        DSPIGMR
    Declare   [ODEPACK.F, 22907]       DSPIGMR
    Set   [ODEPACK.F, 23002]           DSPIGMR
    Set   [ODEPACK.F, 23044]           DSPIGMR
    Use   [ODEPACK.F, 23111]           DSPIGMR

LHES    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Set   [ODEPACK.F, 22380]           DSOLPK
    Use   [ODEPACK.F, 22381]           DSOLPK
    Use   [ODEPACK.F, 22385]           DSOLPK
    Set   [ODEPACK.F, 22402]           DSOLPK
    Use   [ODEPACK.F, 22403]           DSOLPK
    Use   [ODEPACK.F, 22409]           DSOLPK

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

lHoRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rxns_gs_des1.f, 60]      RXNS_GS_DES1
    Use Argument   [rxns_gs_des1.f, 80]   RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 94]         RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 104]        RXNS_GS_DES1

lHoRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rxns_gs_des1.f, 178]     RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 206]   RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 210]   RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 221]        RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 228]        RXNS_GS_GAS1

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

lHoRs    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_rrates_des.f, 67]   CALC_RRATES_DES
    Set   [calc_rrates_des.f, 109]     CALC_RRATES_DES
    Set   [calc_rrates_des.f, 170]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 170]     CALC_RRATES_DES
    Set   [calc_rrates_des.f, 177]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 177]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 183]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 186]     CALC_RRATES_DES

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

lI    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 296]   SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 341]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 349]   SET_NEW_PARTICLE_PROPS

li    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 19027]        mdp
    Set   [ODEPACK.F, 19033]           mdp
    Use   [ODEPACK.F, 19037]           mdp
    Set   [ODEPACK.F, 19038]           mdp
    Use   [ODEPACK.F, 19039]           mdp
    Use   [ODEPACK.F, 19064]           mdp
    Set   [ODEPACK.F, 19065]           mdp
    Use   [ODEPACK.F, 19084]           mdp
    Use   [ODEPACK.F, 19085]           mdp
    Use   [ODEPACK.F, 19086]           mdp
    Set   [ODEPACK.F, 19087]           mdp

LIA    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3017]         DLSODES
    Set   [ODEPACK.F, 3174]            DLSODES
    Use   [ODEPACK.F, 3176]            DLSODES
    Use   [ODEPACK.F, 3179]            DLSODES
    Set   [ODEPACK.F, 3180]            DLSODES
    Use Argument   [ODEPACK.F, 3180]   DLSODES
    Use   [ODEPACK.F, 3236]            DLSODES
    Use   [ODEPACK.F, 3288]            DLSODES

LIA    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 15958]           DLSODIS
    Use   [ODEPACK.F, 15960]           DLSODIS
    Use   [ODEPACK.F, 15963]           DLSODIS
    Set   [ODEPACK.F, 15964]           DLSODIS
    Use Argument   [ODEPACK.F, 15964]   DLSODIS
    Use   [ODEPACK.F, 16028]           DLSODIS
    Use   [ODEPACK.F, 16088]           DLSODIS

LIC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 15966]           DLSODIS
    Use   [ODEPACK.F, 15970]           DLSODIS
    Use   [ODEPACK.F, 15973]           DLSODIS
    Set   [ODEPACK.F, 15974]           DLSODIS
    Use Argument   [ODEPACK.F, 15974]   DLSODIS
    Use   [ODEPACK.F, 16029]           DLSODIS
    Use   [ODEPACK.F, 16089]           DLSODIS

lICP    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [read_database.f, 339]       writeCp
    Use   [read_database.f, 340]       writeCp
    Set   [read_database.f, 358]       writeCp
    Use   [read_database.f, 359]       writeCp

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

lIE    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1049]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1065]         POINT_SOURCE_U_G
    Set   [source_u_g.f, 1068]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1073]         POINT_SOURCE_U_G

lIE    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1180]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1195]         POINT_SOURCE_U_S
    Set   [source_u_s.f, 1198]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1203]         POINT_SOURCE_U_S

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

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

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

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

lijk    (Local Variable)  Declared as: INTEGER
    Define   [integrate_time_pic.f, 633]   des_dbgpic
    Set   [integrate_time_pic.f, 647]   des_dbgpic
    Use   [integrate_time_pic.f, 648]   des_dbgpic
    Use   [integrate_time_pic.f, 649]   des_dbgpic
    Use   [integrate_time_pic.f, 649]   des_dbgpic

lijk    (Local Variable)  Declared as: INTEGER
    Define   [integrate_time_pic.f, 687]   des_dbgtecplot
    Set   [integrate_time_pic.f, 706]   des_dbgtecplot
    Use   [integrate_time_pic.f, 707]   des_dbgtecplot
    Use   [integrate_time_pic.f, 708]   des_dbgtecplot

lIJKP    (Dummy Argument)  Declared as: INTEGER (3) INTENT(OUT)
    Define   [mass_inflow_dem.f, 130]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 156]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 207]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 208]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 209]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 217]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 218]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 219]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 227]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 228]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 229]     SEED_NEW_PARTICLE

lIJKP    (Dummy Argument)  Declared as: INTEGER (3) INTENT(IN)
    Define   [mass_inflow_dem.f, 257]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 291]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 334]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 335]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 335]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 335]   SET_NEW_PARTICLE_PROPS

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

LINE    (Local Variable)  Declared as: CHARACTER (len=80)(1)
    Define   [bc_theta.f, 363]         CALC_THETA_BC
    Set   [bc_theta.f, 675]            CALC_THETA_BC
    Use Argument   [bc_theta.f, 676]   CALC_THETA_BC

LINE    (Local Variable)  Declared as: CHARACTER (len=80)(1)
    Define   [source_pp_g.f, 56]       SOURCE_PP_G
    Set   [source_pp_g.f, 156]         SOURCE_PP_G
    Use Argument   [source_pp_g.f, 158]   SOURCE_PP_G

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

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

LINE    (Local Variable)  Declared as: CHARACTER (len=80)
    Define   [source_rop_g.f, 54]      SOURCE_ROP_G
    Set   [source_rop_g.f, 93]         SOURCE_ROP_G
    Use Argument   [source_rop_g.f, 95]   SOURCE_ROP_G

LINE    (Local Variable)  Declared as: CHARACTER (len=50)(1)
    Define   [write_spx1.f, 89]        WRITE_SPX1
    Set   [write_spx1.f, 540]          WRITE_SPX1
    Use Argument   [write_spx1.f, 541]   WRITE_SPX1

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

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

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

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

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

LINE    (Local Variable)  Declared as: CHARACTER (len=80)(8)
    Define   [test_lin_eq.f, 52]       TEST_LIN_EQ
    Set   [test_lin_eq.f, 157]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 160]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 163]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 164]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 165]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 166]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 167]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 168]         TEST_LIN_EQ
    Set   [test_lin_eq.f, 171]         TEST_LIN_EQ
    Use Argument   [test_lin_eq.f, 175]   TEST_LIN_EQ

LINE    (Local Variable)  Declared as: CHARACTER (len=80)
    Define   [source_rop_s.f, 57]      SOURCE_ROP_S
    Set   [source_rop_s.f, 97]         SOURCE_ROP_S
    Use Argument   [source_rop_s.f, 99]   SOURCE_ROP_S

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

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

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

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

LINE    (Local Variable)  Declared as: CHARACTER (len=80)(1)
    Define   [conv_source_epp.f, 111]   CONV_SOURCE_EPP0
    Set   [conv_source_epp.f, 281]     CONV_SOURCE_EPP0
    Use Argument   [conv_source_epp.f, 284]   CONV_SOURCE_EPP0

LINE    (Local Variable)  Declared as: CHARACTER (len=80)(1)
    Define   [conv_source_epp.f, 367]   CONV_SOURCE_EPP1
    Set   [conv_source_epp.f, 507]     CONV_SOURCE_EPP1
    Use Argument   [conv_source_epp.f, 511]   CONV_SOURCE_EPP1

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

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

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

LINE_LEN    (Variable)  Declared as: INTEGER
    Define   [read_namelist.f, 75]     READ_NAMELIST
    Set   [read_namelist.f, 158]       READ_NAMELIST
    Use   [read_namelist.f, 159]       READ_NAMELIST
    Use   [read_namelist.f, 161]       READ_NAMELIST
    Use Argument   [read_namelist.f, 164]   READ_NAMELIST
    Use   [read_namelist.f, 182]       READ_NAMELIST
    Set   [read_namelist.f, 189]       READ_NAMELIST
    Use   [read_namelist.f, 192]       READ_NAMELIST
    Use Argument   [read_namelist.f, 254]   SET_KEYWORD
    Use Argument   [read_namelist.f, 256]   SET_KEYWORD
    Use Argument   [read_namelist.f, 260]   SET_KEYWORD
    Use   [read_namelist.f, 270]       SET_KEYWORD
    Use   [read_namelist.f, 276]       SET_KEYWORD
    Use   [read_namelist.f, 284]       SET_KEYWORD
    Use   [read_namelist.f, 290]       SET_KEYWORD
    Use   [read_namelist.f, 298]       SET_KEYWORD
    Use   [read_namelist.f, 304]       SET_KEYWORD
    Use   [read_namelist.f, 312]       SET_KEYWORD
    Use   [read_namelist.f, 318]       SET_KEYWORD
    Use   [read_namelist.f, 326]       SET_KEYWORD
    Use   [read_namelist.f, 332]       SET_KEYWORD
    Use   [read_namelist.f, 340]       SET_KEYWORD
    Use   [read_namelist.f, 346]       SET_KEYWORD
    Use   [read_namelist.f, 353]       SET_KEYWORD
    Use   [read_namelist.f, 361]       SET_KEYWORD
    Use   [read_namelist.f, 367]       SET_KEYWORD
    Use   [read_namelist.f, 375]       SET_KEYWORD
    Use   [read_namelist.f, 381]       SET_KEYWORD
    Use   [read_namelist.f, 389]       SET_KEYWORD
    Use   [read_namelist.f, 395]       SET_KEYWORD
    Use   [read_namelist.f, 402]       SET_KEYWORD
    Use   [read_namelist.f, 410]       SET_KEYWORD
    Use   [read_namelist.f, 416]       SET_KEYWORD
    Use   [read_namelist.f, 423]       SET_KEYWORD
    Use   [read_namelist.f, 430]       SET_KEYWORD
    Use   [read_namelist.f, 438]       SET_KEYWORD
    Use   [read_namelist.f, 444]       SET_KEYWORD
    Use   [read_namelist.f, 452]       SET_KEYWORD
    Use   [read_namelist.f, 466]       SET_KEYWORD
    Use   [read_namelist.f, 473]       SET_KEYWORD
    Use   [read_namelist.f, 480]       SET_KEYWORD
    Use   [read_namelist.f, 487]       SET_KEYWORD

LINE_NO    (Local Variable)  Declared as: INTEGER
    Define   [read_namelist.f, 77]     READ_NAMELIST
    Set   [read_namelist.f, 114]       READ_NAMELIST
    Set   [read_namelist.f, 156]       READ_NAMELIST
    Use   [read_namelist.f, 156]       READ_NAMELIST
    Use Argument   [read_namelist.f, 165]   READ_NAMELIST
    Use Argument   [read_namelist.f, 182]   READ_NAMELIST
    Use Argument   [read_namelist.f, 192]   READ_NAMELIST

LINE_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [deprecated.f, 146]       DEPRECATED
    Declare   [deprecated.f, 148]      DEPRECATED
    Use Argument   [deprecated.f, 153]   DEPRECATED

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

LINE_NO    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [deprecated.f, 174]       UNKNOWN_KEYWORD
    Declare   [deprecated.f, 176]      UNKNOWN_KEYWORD
    Use Argument   [deprecated.f, 179]   UNKNOWN_KEYWORD

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

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

LINE_STRING    (Variable)  Declared as: CHARACTER (len=512)
    Define   [read_namelist.f, 73]     READ_NAMELIST
    Set   [read_namelist.f, 153]       READ_NAMELIST
    Use Argument   [read_namelist.f, 158]   READ_NAMELIST
    Use Argument   [read_namelist.f, 158]   READ_NAMELIST
    Use Argument   [read_namelist.f, 159]   READ_NAMELIST
    Use Argument   [read_namelist.f, 159]   READ_NAMELIST
    Use Argument   [read_namelist.f, 162]   READ_NAMELIST
    Use Argument   [read_namelist.f, 164]   READ_NAMELIST
    Use   [read_namelist.f, 166]       READ_NAMELIST
    Use   [read_namelist.f, 176]       READ_NAMELIST
    Use Argument   [read_namelist.f, 182]   READ_NAMELIST
    Set   [read_namelist.f, 188]       READ_NAMELIST
    Use Argument   [read_namelist.f, 189]   READ_NAMELIST
    Use Argument   [read_namelist.f, 192]   READ_NAMELIST
    Use Argument   [read_namelist.f, 245]   SET_KEYWORD
    Use Argument   [read_namelist.f, 246]   SET_KEYWORD
    Use Argument   [read_namelist.f, 247]   SET_KEYWORD
    Use Argument   [read_namelist.f, 248]   SET_KEYWORD
    Use Argument   [read_namelist.f, 249]   SET_KEYWORD
    Use Argument   [read_namelist.f, 250]   SET_KEYWORD
    Use Argument   [read_namelist.f, 251]   SET_KEYWORD
    Use Argument   [read_namelist.f, 252]   SET_KEYWORD
    Use Argument   [read_namelist.f, 253]   SET_KEYWORD
    Use Argument   [read_namelist.f, 254]   SET_KEYWORD
    Use Argument   [read_namelist.f, 256]   SET_KEYWORD
    Use Argument   [read_namelist.f, 257]   SET_KEYWORD
    Use Argument   [read_namelist.f, 260]   SET_KEYWORD
    Use Argument   [read_namelist.f, 270]   SET_KEYWORD
    Use Argument   [read_namelist.f, 276]   SET_KEYWORD
    Use Argument   [read_namelist.f, 284]   SET_KEYWORD
    Use Argument   [read_namelist.f, 290]   SET_KEYWORD
    Use Argument   [read_namelist.f, 298]   SET_KEYWORD
    Use Argument   [read_namelist.f, 304]   SET_KEYWORD
    Use Argument   [read_namelist.f, 312]   SET_KEYWORD
    Use Argument   [read_namelist.f, 318]   SET_KEYWORD
    Use Argument   [read_namelist.f, 326]   SET_KEYWORD
    Use Argument   [read_namelist.f, 332]   SET_KEYWORD
    Use Argument   [read_namelist.f, 340]   SET_KEYWORD
    Use Argument   [read_namelist.f, 346]   SET_KEYWORD
    Use Argument   [read_namelist.f, 353]   SET_KEYWORD
    Use Argument   [read_namelist.f, 361]   SET_KEYWORD
    Use Argument   [read_namelist.f, 367]   SET_KEYWORD
    Use Argument   [read_namelist.f, 375]   SET_KEYWORD
    Use Argument   [read_namelist.f, 381]   SET_KEYWORD
    Use Argument   [read_namelist.f, 389]   SET_KEYWORD
    Use Argument   [read_namelist.f, 395]   SET_KEYWORD
    Use Argument   [read_namelist.f, 402]   SET_KEYWORD
    Use Argument   [read_namelist.f, 410]   SET_KEYWORD
    Use Argument   [read_namelist.f, 416]   SET_KEYWORD
    Use Argument   [read_namelist.f, 423]   SET_KEYWORD
    Use Argument   [read_namelist.f, 430]   SET_KEYWORD
    Use Argument   [read_namelist.f, 438]   SET_KEYWORD
    Use Argument   [read_namelist.f, 444]   SET_KEYWORD
    Use Argument   [read_namelist.f, 452]   SET_KEYWORD
    Use Argument   [read_namelist.f, 466]   SET_KEYWORD
    Use Argument   [read_namelist.f, 473]   SET_KEYWORD
    Use Argument   [read_namelist.f, 480]   SET_KEYWORD
    Use Argument   [read_namelist.f, 487]   SET_KEYWORD

LINE_T    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [apply_wall_bc_pic.f, 56]   APPLY_WALL_BC_PIC
    Set   [apply_wall_bc_pic.f, 96]    APPLY_WALL_BC_PIC
    Use Argument   [apply_wall_bc_pic.f, 98]   APPLY_WALL_BC_PIC
    Use   [apply_wall_bc_pic.f, 101]   APPLY_WALL_BC_PIC
    Use   [apply_wall_bc_pic.f, 109]   APPLY_WALL_BC_PIC

LINE_T    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [apply_wall_bc_pic.f, 323]   CHECK_IF_PARCEL_OVERLAPS_STL
    Set   [apply_wall_bc_pic.f, 350]   CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [apply_wall_bc_pic.f, 354]   CHECK_IF_PARCEL_OVERLAPS_STL
    Use   [apply_wall_bc_pic.f, 355]   CHECK_IF_PARCEL_OVERLAPS_STL

LIOM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Use Argument   [ODEPACK.F, 22386]   DSOLPK
    Use   [ODEPACK.F, 22388]           DSOLPK

LIOM    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 22480]        DSPIOM
    Declare   [ODEPACK.F, 22482]       DSPIOM
    Set   [ODEPACK.F, 22569]           DSPIOM
    Set   [ODEPACK.F, 22611]           DSPIOM
    Use   [ODEPACK.F, 22667]           DSPIOM

list.list_add.old_len    (Local Variable)  Declared as: INTEGER
    Define   [list.f, 52]              list.list_add
    Set   [list.f, 56]                 list.list_add
    Use   [list.f, 58]                 list.list_add
    Set   [list.f, 66]                 list.list_add
    Use   [list.f, 67]                 list.list_add
    Use   [list.f, 67]                 list.list_add

list.list_add.this    (Dummy Argument)  Declared as: list_t INTENT(INOUT)
    Define   [list.f, 47]              list.list_add
    Declare   [list.f, 50]             list.list_add
    Set   [list.f, 54]                 list.list_add
    Use   [list.f, 54]                 list.list_add
    Use Argument   [list.f, 55]        list.list_add
    Use   [list.f, 55]                 list.list_add
    Use Argument   [list.f, 56]        list.list_add
    Use Argument   [list.f, 57]        list.list_add
    Use Argument   [list.f, 57]        list.list_add
    Set   [list.f, 58]                 list.list_add
    Use Argument   [list.f, 58]        list.list_add
    Use   [list.f, 61]                 list.list_add
    Use   [list.f, 61]                 list.list_add
    Set   [list.f, 62]                 list.list_add
    Use   [list.f, 62]                 list.list_add
    Use Argument   [list.f, 66]        list.list_add
    Use   [list.f, 67]                 list.list_add

list.list_add.value    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [list.f, 47]              list.list_add
    Declare   [list.f, 51]             list.list_add
    Use   [list.f, 62]                 list.list_add
    Use   [list.f, 65]                 list.list_add

list.list_del.aa    (Local Variable)  Declared as: INTEGER
    Define   [list.f, 109]             list.list_del
    Set   [list.f, 112]                list.list_del
    Use   [list.f, 113]                list.list_del

list.list_del.ai    (Local Variable)  Declared as: INTEGER
    Define   [list.f, 109]             list.list_del
    Set   [list.f, 111]                list.list_del
    Use   [list.f, 112]                list.list_del
    Use   [list.f, 114]                list.list_del

list.list_del.this    (Dummy Argument)  Declared as: list_t INTENT(INOUT)
    Define   [list.f, 105]             list.list_del
    Declare   [list.f, 107]            list.list_del
    Use Argument   [list.f, 111]       list.list_del
    Use   [list.f, 112]                list.list_del
    Set   [list.f, 114]                list.list_del
    Use   [list.f, 114]                list.list_del
    Use   [list.f, 114]                list.list_del
    Set   [list.f, 115]                list.list_del
    Use   [list.f, 115]                list.list_del
    Set   [list.f, 116]                list.list_del
    Use   [list.f, 116]                list.list_del

list.list_del.value    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [list.f, 105]             list.list_del
    Declare   [list.f, 108]            list.list_del
    Use   [list.f, 113]                list.list_del

list.list_get.index    (Dummy Argument)  Declared as: INTEGER
    Define   [list.f, 131]             list.list_get
    Declare   [list.f, 134]            list.list_get
    Use   [list.f, 136]                list.list_get

list.list_get.this    (Dummy Argument)  Declared as: list_t INTENT(IN)
    Define   [list.f, 131]             list.list_get
    Declare   [list.f, 133]            list.list_get
    Use   [list.f, 136]                list.list_get

list.list_get_length.this    (Dummy Argument)  Declared as: list_t INTENT(IN)
    Define   [list.f, 148]             list.list_get_length
    Declare   [list.f, 150]            list.list_get_length
    Use   [list.f, 152]                list.list_get_length

list.list_init.this    (Dummy Argument)  Declared as: list_t INTENT(INOUT)
    Define   [list.f, 29]              list.list_init
    Declare   [list.f, 31]             list.list_init
    Set   [list.f, 33]                 list.list_init
    Set   [list.f, 34]                 list.list_init
    Set   [list.f, 35]                 list.list_init

list.list_pop.this    (Dummy Argument)  Declared as: list_t INTENT(INOUT)
    Define   [list.f, 81]              list.list_pop
    Declare   [list.f, 83]             list.list_pop
    Use   [list.f, 85]                 list.list_pop
    Use   [list.f, 90]                 list.list_pop
    Use   [list.f, 90]                 list.list_pop
    Set   [list.f, 91]                 list.list_pop
    Use   [list.f, 91]                 list.list_pop
    Set   [list.f, 93]                 list.list_pop
    Use   [list.f, 93]                 list.list_pop

list.list_t.list    (Variable Component)  Declared as: INTEGER (:) ALLOCATABLE
    Use Argument   [list.f, 55]        list.list_add
    Use Argument   [list.f, 56]        list.list_add
    Use   [list.f, 57]                 list.list_add
    Set   [list.f, 57]                 list.list_add
    Set   [list.f, 58]                 list.list_add
    Use Argument   [list.f, 58]        list.list_add
    Use   [list.f, 61]                 list.list_add
    Set   [list.f, 62]                 list.list_add
    Use Argument   [list.f, 66]        list.list_add
    Use   [list.f, 67]                 list.list_add
    Use Argument   [list.f, 111]       list.list_del
    Use   [list.f, 112]                list.list_del
    Set   [list.f, 114]                list.list_del
    Use   [list.f, 114]                list.list_del
    Set   [list.f, 115]                list.list_del
    Use   [list.f, 136]                list.list_get
    Set   [list.f, 33]                 list.list_init
    Set   [list.f, 34]                 list.list_init
    Use   [list.f, 90]                 list.list_pop
    Set   [list.f, 91]                 list.list_pop
    Define   [list.f, 15]              list.list_t

list.list_t.list_len    (Variable Component)  Declared as: INTEGER
    Set   [list.f, 54]                 list.list_add
    Use   [list.f, 54]                 list.list_add
    Use   [list.f, 55]                 list.list_add
    Use   [list.f, 57]                 list.list_add
    Use   [list.f, 61]                 list.list_add
    Use   [list.f, 62]                 list.list_add
    Use   [list.f, 114]                list.list_del
    Use   [list.f, 115]                list.list_del
    Set   [list.f, 116]                list.list_del
    Use   [list.f, 116]                list.list_del
    Use   [list.f, 152]                list.list_get_length
    Set   [list.f, 35]                 list.list_init
    Use   [list.f, 85]                 list.list_pop
    Use   [list.f, 90]                 list.list_pop
    Use   [list.f, 91]                 list.list_pop
    Set   [list.f, 93]                 list.list_pop
    Use   [list.f, 93]                 list.list_pop
    Define   [list.f, 16]              list.list_t

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

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

lIW    (Local Variable)  Declared as: INTEGER
    Define   [source_u_g.f, 1049]      POINT_SOURCE_U_G
    Set   [source_u_g.f, 1064]         POINT_SOURCE_U_G
    Set   [source_u_g.f, 1067]         POINT_SOURCE_U_G
    Use   [source_u_g.f, 1073]         POINT_SOURCE_U_G

lIW    (Local Variable)  Declared as: INTEGER
    Define   [source_u_s.f, 1180]      POINT_SOURCE_U_S
    Set   [source_u_s.f, 1194]         POINT_SOURCE_U_S
    Set   [source_u_s.f, 1197]         POINT_SOURCE_U_S
    Use   [source_u_s.f, 1203]         POINT_SOURCE_U_S

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 3737]         DLSODA
    Declare   [ODEPACK.F, 3739]        DLSODA
    Use   [ODEPACK.F, 3741]            DLSODA
    Use   [ODEPACK.F, 4873]            DLSODA
    Use   [ODEPACK.F, 4875]            DLSODA
    Use   [ODEPACK.F, 4890]            DLSODA
    Use Argument   [ODEPACK.F, 4897]   DLSODA
    Use Argument   [ODEPACK.F, 5320]   DLSODA

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 5369]         DLSODAR
    Declare   [ODEPACK.F, 5372]        DLSODAR
    Use   [ODEPACK.F, 5375]            DLSODAR
    Use   [ODEPACK.F, 6653]            DLSODAR
    Use   [ODEPACK.F, 6655]            DLSODAR
    Use   [ODEPACK.F, 6670]            DLSODAR
    Use Argument   [ODEPACK.F, 6677]   DLSODAR
    Use Argument   [ODEPACK.F, 7146]   DLSODAR

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 3]            DLSODE
    Declare   [ODEPACK.F, 5]           DLSODE
    Use   [ODEPACK.F, 7]               DLSODE
    Use   [ODEPACK.F, 1336]            DLSODE
    Use Argument   [ODEPACK.F, 1711]   DLSODE

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 1758]         DLSODES
    Declare   [ODEPACK.F, 1760]        DLSODES
    Use   [ODEPACK.F, 1762]            DLSODES
    Use   [ODEPACK.F, 3173]            DLSODES
    Use   [ODEPACK.F, 3178]            DLSODES
    Use Argument   [ODEPACK.F, 3180]   DLSODES
    Use Argument   [ODEPACK.F, 3181]   DLSODES
    Use Argument   [ODEPACK.F, 3652]   DLSODES

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 10855]        DLSODI
    Declare   [ODEPACK.F, 10857]       DLSODI
    Use   [ODEPACK.F, 10860]           DLSODI
    Use   [ODEPACK.F, 12149]           DLSODI
    Use Argument   [ODEPACK.F, 12579]   DLSODI

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 14421]        DLSODIS
    Declare   [ODEPACK.F, 14423]       DLSODIS
    Use   [ODEPACK.F, 14426]           DLSODIS
    Use   [ODEPACK.F, 15957]           DLSODIS
    Use   [ODEPACK.F, 15962]           DLSODIS
    Use Argument   [ODEPACK.F, 15964]   DLSODIS
    Use Argument   [ODEPACK.F, 15965]   DLSODIS
    Use   [ODEPACK.F, 15969]           DLSODIS
    Use   [ODEPACK.F, 15972]           DLSODIS
    Use Argument   [ODEPACK.F, 15974]   DLSODIS
    Use Argument   [ODEPACK.F, 15975]   DLSODIS
    Use Argument   [ODEPACK.F, 16497]   DLSODIS

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 8950]         DLSODKR
    Declare   [ODEPACK.F, 8953]        DLSODKR
    Use   [ODEPACK.F, 8956]            DLSODKR
    Use   [ODEPACK.F, 10339]           DLSODKR
    Use Argument   [ODEPACK.F, 10799]   DLSODKR

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 7208]         DLSODPK
    Declare   [ODEPACK.F, 7210]        DLSODPK
    Use   [ODEPACK.F, 7212]            DLSODPK
    Use   [ODEPACK.F, 8467]            DLSODPK
    Use Argument   [ODEPACK.F, 8907]   DLSODPK

LIW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 12622]        DLSOIBT
    Declare   [ODEPACK.F, 12624]       DLSOIBT
    Use   [ODEPACK.F, 12627]           DLSOIBT
    Use   [ODEPACK.F, 13948]           DLSOIBT
    Use Argument   [ODEPACK.F, 14378]   DLSOIBT

LIWK    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 17897]        DPREP
    Set   [ODEPACK.F, 17939]           DPREP
    Use   [ODEPACK.F, 17940]           DPREP
    Use   [ODEPACK.F, 17969]           DPREP
    Use   [ODEPACK.F, 17974]           DPREP
    Use   [ODEPACK.F, 17989]           DPREP
    Use   [ODEPACK.F, 17998]           DPREP
    Use   [ODEPACK.F, 18011]           DPREP
    Use   [ODEPACK.F, 18024]           DPREP
    Use   [ODEPACK.F, 18049]           DPREP
    Use   [ODEPACK.F, 18066]           DPREP

LIWK    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26130]        DPREPI
    Set   [ODEPACK.F, 26179]           DPREPI
    Set   [ODEPACK.F, 26180]           DPREPI
    Use   [ODEPACK.F, 26180]           DPREPI
    Set   [ODEPACK.F, 26181]           DPREPI
    Use   [ODEPACK.F, 26182]           DPREPI
    Use   [ODEPACK.F, 26210]           DPREPI
    Use   [ODEPACK.F, 26215]           DPREPI
    Use   [ODEPACK.F, 26216]           DPREPI
    Use   [ODEPACK.F, 26225]           DPREPI
    Use   [ODEPACK.F, 26226]           DPREPI
    Use   [ODEPACK.F, 26257]           DPREPI
    Use   [ODEPACK.F, 26288]           DPREPI
    Use   [ODEPACK.F, 26314]           DPREPI
    Use   [ODEPACK.F, 26322]           DPREPI
    Use   [ODEPACK.F, 26350]           DPREPI
    Use   [ODEPACK.F, 26357]           DPREPI
    Use   [ODEPACK.F, 26385]           DPREPI
    Use   [ODEPACK.F, 26402]           DPREPI

LIWP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10163]        DLSODKR
    Set   [ODEPACK.F, 10333]           DLSODKR
    Set   [ODEPACK.F, 10334]           DLSODKR
    Use   [ODEPACK.F, 10335]           DLSODKR

LIWP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8320]         DLSODPK
    Set   [ODEPACK.F, 8461]            DLSODPK
    Set   [ODEPACK.F, 8462]            DLSODPK
    Use   [ODEPACK.F, 8463]            DLSODPK

lJ    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 171]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 237]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 241]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 241]     SEED_NEW_PARTICLE

lJ    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 296]   SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 342]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 349]   SET_NEW_PARTICLE_PROPS

LJA    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3017]         DLSODES
    Set   [ODEPACK.F, 3179]            DLSODES
    Set   [ODEPACK.F, 3181]            DLSODES
    Use Argument   [ODEPACK.F, 3181]   DLSODES
    Use   [ODEPACK.F, 3236]            DLSODES
    Use   [ODEPACK.F, 3288]            DLSODES

LJA    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 15963]           DLSODIS
    Set   [ODEPACK.F, 15965]           DLSODIS
    Use Argument   [ODEPACK.F, 15965]   DLSODIS
    Use   [ODEPACK.F, 16028]           DLSODIS
    Use   [ODEPACK.F, 16088]           DLSODIS

LJC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 15973]           DLSODIS
    Set   [ODEPACK.F, 15975]           DLSODIS
    Use Argument   [ODEPACK.F, 15975]   DLSODIS
    Use   [ODEPACK.F, 16029]           DLSODIS
    Use   [ODEPACK.F, 16089]           DLSODIS

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

LJFO    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26130]        DPREPI
    Set   [ODEPACK.F, 26250]           DPREPI
    Use   [ODEPACK.F, 26251]           DPREPI
    Use   [ODEPACK.F, 26252]           DPREPI
    Set   [ODEPACK.F, 26283]           DPREPI
    Use   [ODEPACK.F, 26284]           DPREPI
    Use   [ODEPACK.F, 26285]           DPREPI

lJN    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 961]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 977]          POINT_SOURCE_V_G
    Set   [source_v_g.f, 980]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 984]          POINT_SOURCE_V_G

lJN    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1171]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1184]         POINT_SOURCE_V_S
    Set   [source_v_s.f, 1187]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1191]         POINT_SOURCE_V_S

lJS    (Local Variable)  Declared as: INTEGER
    Define   [source_v_g.f, 961]       POINT_SOURCE_V_G
    Set   [source_v_g.f, 976]          POINT_SOURCE_V_G
    Set   [source_v_g.f, 979]          POINT_SOURCE_V_G
    Use   [source_v_g.f, 984]          POINT_SOURCE_V_G

lJS    (Local Variable)  Declared as: INTEGER
    Define   [source_v_s.f, 1171]      POINT_SOURCE_V_S
    Set   [source_v_s.f, 1183]         POINT_SOURCE_V_S
    Set   [source_v_s.f, 1186]         POINT_SOURCE_V_S
    Use   [source_v_s.f, 1191]         POINT_SOURCE_V_S

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

lK    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 171]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 238]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 243]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 243]     SEED_NEW_PARTICLE

lK    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 296]   SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 344]     SET_NEW_PARTICLE_PROPS
    Set   [mass_inflow_dem.f, 346]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 349]   SET_NEW_PARTICLE_PROPS

lKB    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1221]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1232]         POINT_SOURCE_W_S
    Set   [source_w_s.f, 1235]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1239]         POINT_SOURCE_W_S

lKB    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 1079]      POINT_SOURCE_W_G
    Set   [source_w_g.f, 1094]         POINT_SOURCE_W_G
    Set   [source_w_g.f, 1097]         POINT_SOURCE_W_G
    Use   [source_w_g.f, 1101]         POINT_SOURCE_W_G

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

lki    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [ODEPACK.F, 20169]        nnfc
    Set   [ODEPACK.F, 20210]           nnfc
    Use   [ODEPACK.F, 20212]           nnfc
    Use   [ODEPACK.F, 20213]           nnfc
    Use   [ODEPACK.F, 20219]           nnfc

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

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

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

lKT    (Local Variable)  Declared as: INTEGER
    Define   [source_w_s.f, 1221]      POINT_SOURCE_W_S
    Set   [source_w_s.f, 1233]         POINT_SOURCE_W_S
    Set   [source_w_s.f, 1236]         POINT_SOURCE_W_S
    Use   [source_w_s.f, 1239]         POINT_SOURCE_W_S

lKT    (Local Variable)  Declared as: INTEGER
    Define   [source_w_g.f, 1079]      POINT_SOURCE_W_G
    Set   [source_w_g.f, 1095]         POINT_SOURCE_W_G
    Set   [source_w_g.f, 1098]         POINT_SOURCE_W_G
    Use   [source_w_g.f, 1101]         POINT_SOURCE_W_G

LL    (Local Variable)  Declared as: INTEGER
    Define   [des_granular_temperature.f, 40]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 62]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 64]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 67]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 67]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 67]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 69]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 70]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 71]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 72]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 74]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 78]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 80]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 83]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 118]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 120]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 122]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 122]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 122]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 127]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 131]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 135]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 138]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 138]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 139]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 140]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 141]   DES_GRANULAR_TEMPERATURE
    Set   [des_granular_temperature.f, 161]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 164]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 166]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 166]   DES_GRANULAR_TEMPERATURE
    Use Argument   [des_granular_temperature.f, 166]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 169]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 169]   DES_GRANULAR_TEMPERATURE
    Use   [des_granular_temperature.f, 171]   DES_GRANULAR_TEMPERATURE

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

LL    (Variable)  Declared as: INTEGER
    Define   [calc_force_dem.f, 34]    CALC_FORCE_DEM
    Set   [calc_force_dem.f, 142]      CALC_FORCE_DEM
    Use Argument   [calc_force_dem.f, 143]   CALC_FORCE_DEM
    Use   [calc_force_dem.f, 144]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 145]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 148]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 148]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 149]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 164]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 165]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 180]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 180]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 180]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 186]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 187]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 187]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 187]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 190]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 190]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 241]      CALC_FORCE_DEM
    Use Argument   [calc_force_dem.f, 255]   CALC_FORCE_DEM
    Use   [calc_force_dem.f, 258]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 314]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 327]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 327]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 337]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 337]      CALC_FORCE_DEM
    Use   [calc_force_dem.f, 374]      PRINT_EXCESS_OVERLAP
    Use Argument   [calc_force_dem.f, 377]   PRINT_EXCESS_OVERLAP
    Use   [calc_force_dem.f, 378]      PRINT_EXCESS_OVERLAP

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

LL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [apply_wall_bc_pic.f, 167]   PIC_REFLECT_PART
    Declare   [apply_wall_bc_pic.f, 182]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 213]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 218]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 229]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 234]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 240]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 240]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 242]   PIC_REFLECT_PART
    Use   [apply_wall_bc_pic.f, 242]   PIC_REFLECT_PART

LL    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 536]    LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 804]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 808]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 810]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 813]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 813]       LAYOUT_DEM_MI_EW
    Set   [layout_mi_dem.f, 838]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 839]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 841]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 842]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 844]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 845]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 847]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 848]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 848]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 849]       LAYOUT_DEM_MI_EW
    Use   [layout_mi_dem.f, 849]       LAYOUT_DEM_MI_EW

LL    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 123]    LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 385]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 389]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 391]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 394]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 394]       LAYOUT_DEM_MI_NS
    Set   [layout_mi_dem.f, 419]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 420]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 422]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 423]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 425]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 426]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 428]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 429]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 429]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 430]       LAYOUT_DEM_MI_NS
    Use   [layout_mi_dem.f, 430]       LAYOUT_DEM_MI_NS

LL    (Local Variable)  Declared as: INTEGER
    Define   [layout_mi_dem.f, 955]    LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1205]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1209]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1211]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1214]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1214]      LAYOUT_DEM_MI_TB
    Set   [layout_mi_dem.f, 1239]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1240]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1242]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1243]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1245]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1246]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1248]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1249]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1249]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1250]      LAYOUT_DEM_MI_TB
    Use   [layout_mi_dem.f, 1250]      LAYOUT_DEM_MI_TB

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

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

LL    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_pic.f, 288]   PIC_FIND_EMPTY_SPOT
    Set   [mass_inflow_pic.f, 301]     PIC_FIND_EMPTY_SPOT
    Use Argument   [mass_inflow_pic.f, 303]   PIC_FIND_EMPTY_SPOT
    Use   [mass_inflow_pic.f, 304]     PIC_FIND_EMPTY_SPOT
    Use   [mass_inflow_pic.f, 305]     PIC_FIND_EMPTY_SPOT

LL    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_pic.f, 340]   PIC_FIND_NEW_CELL
    Declare   [mass_inflow_pic.f, 352]   PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 360]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 361]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 362]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 363]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 364]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 366]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 370]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 372]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 374]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 378]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 380]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 382]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 386]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 389]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 391]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 393]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 397]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 398]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 399]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 402]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 406]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 410]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 413]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 413]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 413]     PIC_FIND_NEW_CELL
    Use   [mass_inflow_pic.f, 413]     PIC_FIND_NEW_CELL

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

ll    (Local Variable)  Declared as: INTEGER
    Define   [usr_src_mod.f, 98]       CALC_USR_SOURCE
    Set   [usr_src_mod.f, 193]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 194]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 194]         CALC_USR_SOURCE
    Set   [usr_src_mod.f, 236]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 237]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 237]         CALC_USR_SOURCE
    Set   [usr_src_mod.f, 279]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 280]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 280]         CALC_USR_SOURCE
    Set   [usr_src_mod.f, 322]         CALC_USR_SOURCE
    Use   [usr_src_mod.f, 323]         CALC_USR_SOURCE

LL    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 22818]        DORTHOG
    Declare   [ODEPACK.F, 22819]       DORTHOG
    Use   [ODEPACK.F, 22872]           DORTHOG
    Use   [ODEPACK.F, 22873]           DORTHOG
    Use   [ODEPACK.F, 22874]           DORTHOG
    Use   [ODEPACK.F, 22875]           DORTHOG
    Use   [ODEPACK.F, 22888]           DORTHOG
    Use   [ODEPACK.F, 22890]           DORTHOG
    Use   [ODEPACK.F, 22890]           DORTHOG
    Use   [ODEPACK.F, 22891]           DORTHOG
    Use   [ODEPACK.F, 22891]           DORTHOG

LL    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22998]        DSPIGMR
    Set   [ODEPACK.F, 23043]           DSPIGMR
    Use   [ODEPACK.F, 23044]           DSPIGMR
    Use   [ODEPACK.F, 23051]           DSPIGMR
    Use   [ODEPACK.F, 23051]           DSPIGMR
    Use   [ODEPACK.F, 23054]           DSPIGMR
    Use Argument   [ODEPACK.F, 23054]   DSPIGMR
    Use   [ODEPACK.F, 23055]           DSPIGMR
    Use   [ODEPACK.F, 23055]           DSPIGMR
    Use Argument   [ODEPACK.F, 23056]   DSPIGMR
    Use Argument   [ODEPACK.F, 23056]   DSPIGMR
    Use   [ODEPACK.F, 23057]           DSPIGMR
    Use   [ODEPACK.F, 23064]           DSPIGMR
    Use   [ODEPACK.F, 23066]           DSPIGMR
    Use   [ODEPACK.F, 23067]           DSPIGMR
    Use   [ODEPACK.F, 23078]           DSPIGMR
    Use   [ODEPACK.F, 23079]           DSPIGMR
    Use   [ODEPACK.F, 23080]           DSPIGMR
    Use   [ODEPACK.F, 23091]           DSPIGMR
    Use   [ODEPACK.F, 23096]           DSPIGMR
    Set   [ODEPACK.F, 23111]           DSPIGMR
    Use   [ODEPACK.F, 23112]           DSPIGMR
    Use Argument   [ODEPACK.F, 23116]   DSPIGMR
    Use   [ODEPACK.F, 23119]           DSPIGMR

LL    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22565]        DSPIOM
    Set   [ODEPACK.F, 22610]           DSPIOM
    Use   [ODEPACK.F, 22611]           DSPIOM
    Use   [ODEPACK.F, 22618]           DSPIOM
    Use   [ODEPACK.F, 22618]           DSPIOM
    Use   [ODEPACK.F, 22621]           DSPIOM
    Use Argument   [ODEPACK.F, 22621]   DSPIOM
    Use Argument   [ODEPACK.F, 22622]   DSPIOM
    Use Argument   [ODEPACK.F, 22622]   DSPIOM
    Use   [ODEPACK.F, 22623]           DSPIOM
    Use   [ODEPACK.F, 22624]           DSPIOM
    Use   [ODEPACK.F, 22624]           DSPIOM
    Use   [ODEPACK.F, 22625]           DSPIOM
    Use   [ODEPACK.F, 22632]           DSPIOM
    Use   [ODEPACK.F, 22640]           DSPIOM
    Use   [ODEPACK.F, 22640]           DSPIOM
    Use   [ODEPACK.F, 22642]           DSPIOM
    Use   [ODEPACK.F, 22645]           DSPIOM
    Use   [ODEPACK.F, 22645]           DSPIOM
    Use   [ODEPACK.F, 22647]           DSPIOM
    Set   [ODEPACK.F, 22667]           DSPIOM
    Use   [ODEPACK.F, 22668]           DSPIOM
    Use Argument   [ODEPACK.F, 22671]   DSPIOM
    Use   [ODEPACK.F, 22674]           DSPIOM

LL    (Local Variable)  Declared as: INTEGER
    Define   [pic_routines.f, 686]     WRITE_MPPIC_VEL_S
    Set   [pic_routines.f, 749]        WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 752]   WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 754]   WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 754]   WRITE_MPPIC_VEL_S
    Use Argument   [pic_routines.f, 755]   WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 758]        WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 759]        WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 760]        WRITE_MPPIC_VEL_S
    Use   [pic_routines.f, 760]        WRITE_MPPIC_VEL_S

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

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

LL    (Local Variable)  Declared as: INTEGER
    Define   [nsquare.f, 28]           NSQUARE
    Set   [nsquare.f, 51]              NSQUARE
    Use Argument   [nsquare.f, 54]     NSQUARE
    Use   [nsquare.f, 56]              NSQUARE
    Use   [nsquare.f, 63]              NSQUARE
    Use   [nsquare.f, 64]              NSQUARE
    Use   [nsquare.f, 72]              NSQUARE
    Use   [nsquare.f, 75]              NSQUARE
    Use   [nsquare.f, 81]              NSQUARE
    Use   [nsquare.f, 84]              NSQUARE
    Use   [nsquare.f, 88]              NSQUARE
    Use   [nsquare.f, 92]              NSQUARE
    Use   [nsquare.f, 95]              NSQUARE
    Use   [nsquare.f, 123]             NSQUARE
    Use   [nsquare.f, 129]             NSQUARE

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

ll1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 950]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 968]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 995]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 995]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1056]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1059]   IJK_Pg_SEARCH

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

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

ll2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 950]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 967]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 996]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 996]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1057]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1062]   IJK_Pg_SEARCH

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

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

ll3    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 950]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 966]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1019]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1021]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1023]            IJK_Pg_SEARCH

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

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

llHoRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_rrates_des.f, 67]   CALC_RRATES_DES
    Set   [calc_rrates_des.f, 108]     CALC_RRATES_DES
    Set   [calc_rrates_des.f, 167]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 167]     CALC_RRATES_DES
    Set   [calc_rrates_des.f, 176]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 176]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 182]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 185]     CALC_RRATES_DES

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

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

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

llocalcnt    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 294]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 361]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 362]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 363]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 363]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 365]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 367]      WRITE_DES_TECPLOT

LLP1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22998]        DSPIGMR
    Set   [ODEPACK.F, 23080]           DSPIGMR
    Use   [ODEPACK.F, 23082]           DSPIGMR
    Set   [ODEPACK.F, 23112]           DSPIGMR
    Use   [ODEPACK.F, 23113]           DSPIGMR

LM    (Local Variable)  Declared as: INTEGER
    Define   [drag_ss.f, 34]           DRAG_SS
    Set   [drag_ss.f, 37]              DRAG_SS
    Use   [drag_ss.f, 39]              DRAG_SS

LM    (Local Variable)  Declared as: INTEGER
    Define   [drag_ss.f, 267]          DRAG_SS_IA
    Set   [drag_ss.f, 285]             DRAG_SS_IA
    Use   [drag_ss.f, 329]             DRAG_SS_IA
    Use   [drag_ss.f, 334]             DRAG_SS_IA
    Use   [drag_ss.f, 334]             DRAG_SS_IA

LM    (Local Variable)  Declared as: INTEGER
    Define   [drag_ss.f, 114]          DRAG_SS_SYAM
    Set   [drag_ss.f, 129]             DRAG_SS_SYAM
    Use   [drag_ss.f, 164]             DRAG_SS_SYAM
    Use   [drag_ss.f, 169]             DRAG_SS_SYAM
    Use   [drag_ss.f, 169]             DRAG_SS_SYAM

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 217]     PARTIAL_ELIM_IA
    Set   [partial_elim.f, 246]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 247]        PARTIAL_ELIM_IA

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 361]     PARTIAL_ELIM_U
    Set   [partial_elim.f, 396]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 400]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 400]        PARTIAL_ELIM_U

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

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 724]     PARTIAL_ELIM_W
    Set   [partial_elim.f, 759]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 763]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 763]        PARTIAL_ELIM_W

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

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

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

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

LM    (Local Variable)  Declared as: INTEGER
    Define   [usr_properties.f, 687]   USR_PROP_Fss
    Set   [usr_properties.f, 696]      USR_PROP_Fss
    Use   [usr_properties.f, 697]      USR_PROP_Fss

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [read_database.f, 21]     READ_DATABASE
    Declare   [read_database.f, 39]    READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 109]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 119]       READ_DATABASE
    Use   [read_database.f, 119]       READ_DATABASE
    Use   [read_database.f, 122]       READ_DATABASE
    Use   [read_database.f, 123]       READ_DATABASE
    Use   [read_database.f, 127]       READ_DATABASE
    Use   [read_database.f, 130]       READ_DATABASE
    Use   [read_database.f, 131]       READ_DATABASE
    Use   [read_database.f, 134]       READ_DATABASE
    Use   [read_database.f, 135]       READ_DATABASE
    Use   [read_database.f, 137]       READ_DATABASE
    Use   [read_database.f, 138]       READ_DATABASE
    Use Argument   [read_database.f, 147]   READ_DATABASE

lM    (Local Variable)  Declared as: INTEGER
    Define   [physical_prop.f, 541]    PHYSICAL_PROP_Dp
    Set   [physical_prop.f, 546]       PHYSICAL_PROP_Dp
    Use   [physical_prop.f, 550]       PHYSICAL_PROP_Dp
    Use   [physical_prop.f, 550]       PHYSICAL_PROP_Dp

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

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

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_gama.f, 92]         CALC_DEFAULT_GAMA_GS
    Set   [calc_gama.f, 140]           CALC_DEFAULT_GAMA_GS
    Use   [calc_gama.f, 141]           CALC_DEFAULT_GAMA_GS
    Use   [calc_gama.f, 146]           CALC_DEFAULT_GAMA_GS
    Use   [calc_gama.f, 147]           CALC_DEFAULT_GAMA_GS
    Use   [calc_gama.f, 150]           CALC_DEFAULT_GAMA_GS

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

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

lM    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_rad.f, 30]    DES_RADIATION
    Set   [des_thermo_rad.f, 62]       DES_RADIATION
    Use   [des_thermo_rad.f, 63]       DES_RADIATION
    Use   [des_thermo_rad.f, 73]       DES_RADIATION

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 50]   PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 98]     PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 103]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 103]    PARTIAL_ELIM_GHD_U
    Set   [partial_elim_ghd.f, 174]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 179]    PARTIAL_ELIM_GHD_U
    Use   [partial_elim_ghd.f, 179]    PARTIAL_ELIM_GHD_U

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 244]   PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 299]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 303]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 303]    PARTIAL_ELIM_GHD_V
    Set   [partial_elim_ghd.f, 372]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 376]    PARTIAL_ELIM_GHD_V
    Use   [partial_elim_ghd.f, 376]    PARTIAL_ELIM_GHD_V

LM    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 440]   PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 488]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 492]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 492]    PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 562]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 566]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 566]    PARTIAL_ELIM_GHD_W

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

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

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

lM    (Dummy Argument)  Declared as: INTEGER INTENT(OUT)
    Define   [mass_inflow_dem.f, 129]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 152]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 189]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 191]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 195]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 195]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 196]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 196]     SEED_NEW_PARTICLE

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 257]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 285]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 310]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 311]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 312]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 328]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 331]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 338]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 360]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 363]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 364]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 364]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 364]     SET_NEW_PARTICLE_PROPS

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

LM    (Local Variable)  Declared as: INTEGER
    Define   [calc_rrates_des.f, 58]   CALC_RRATES_DES
    Set   [calc_rrates_des.f, 199]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 200]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 200]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 201]     CALC_RRATES_DES
    Set   [calc_rrates_des.f, 212]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 214]     CALC_RRATES_DES

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN) OPTIONAL
    Define   [usr_src_mod.f, 31]       CALC_USR_SOURCE
    Declare   [usr_src_mod.f, 85]      CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 104]   CALC_USR_SOURCE
    Use   [usr_src_mod.f, 107]         CALC_USR_SOURCE

LM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 27058]        DGBFA
    Set   [ODEPACK.F, 27098]           DGBFA
    Use   [ODEPACK.F, 27099]           DGBFA
    Use Argument   [ODEPACK.F, 27117]   DGBFA
    Use Argument   [ODEPACK.F, 27132]   DGBFA

LM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 27226]        DGBSL
    Set   [ODEPACK.F, 27238]           DGBSL
    Use Argument   [ODEPACK.F, 27245]   DGBSL
    Set   [ODEPACK.F, 27254]           DGBSL
    Use   [ODEPACK.F, 27255]           DGBSL
    Use   [ODEPACK.F, 27256]           DGBSL
    Use Argument   [ODEPACK.F, 27258]   DGBSL
    Set   [ODEPACK.F, 27267]           DGBSL
    Use   [ODEPACK.F, 27268]           DGBSL
    Use   [ODEPACK.F, 27269]           DGBSL
    Use Argument   [ODEPACK.F, 27270]   DGBSL
    Set   [ODEPACK.F, 27280]           DGBSL
    Use Argument   [ODEPACK.F, 27281]   DGBSL

lM    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 149]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 157]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 180]              CALC_PS_CpxMFLOW
    Use   [set_ps.f, 182]              CALC_PS_CpxMFLOW

lM    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 117]          RRATES0
    Set   [rrates0.f, 344]             RRATES0
    Use   [rrates0.f, 345]             RRATES0
    Use   [rrates0.f, 345]             RRATES0
    Use   [rrates0.f, 346]             RRATES0
    Set   [rrates0.f, 360]             RRATES0
    Use   [rrates0.f, 362]             RRATES0
    Set   [rrates0.f, 375]             RRATES0
    Use   [rrates0.f, 377]             RRATES0
    Set   [rrates0.f, 380]             RRATES0
    Use   [rrates0.f, 382]             RRATES0

lM    (Local Variable)  Declared as: INTEGER
    Define   [drag_gp_des.f, 68]       DES_DRAG_GP
    Set   [drag_gp_des.f, 132]         DES_DRAG_GP
    Use   [drag_gp_des.f, 133]         DES_DRAG_GP
    Set   [drag_gp_des.f, 142]         DES_DRAG_GP
    Use   [drag_gp_des.f, 143]         DES_DRAG_GP
    Use   [drag_gp_des.f, 146]         DES_DRAG_GP
    Use   [drag_gp_des.f, 148]         DES_DRAG_GP

LM1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22565]        DSPIOM
    Set   [ODEPACK.F, 22623]           DSPIOM
    Use   [ODEPACK.F, 22624]           DSPIOM
    Use   [ODEPACK.F, 22624]           DSPIOM
    Use   [ODEPACK.F, 22624]           DSPIOM

LM1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 20416]        DSTODA
    Set   [ODEPACK.F, 20851]           DSTODA
    Use   [ODEPACK.F, 20852]           DSTODA
    Use   [ODEPACK.F, 20853]           DSTODA

LM1P1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 20416]        DSTODA
    Set   [ODEPACK.F, 20853]           DSTODA
    Use   [ODEPACK.F, 20854]           DSTODA

LM2    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 20416]        DSTODA
    Set   [ODEPACK.F, 20817]           DSTODA
    Use   [ODEPACK.F, 20818]           DSTODA
    Use   [ODEPACK.F, 20819]           DSTODA

LM2P1    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 20416]        DSTODA
    Set   [ODEPACK.F, 20819]           DSTODA
    Use   [ODEPACK.F, 20820]           DSTODA

lMAP    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [set_bc0.f, 950]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 971]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 1017]            IJK_Pg_SEARCH

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

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

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

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

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

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

lmax    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 19530]           cdrv
    Use   [ODEPACK.F, 19531]           cdrv
    Use Argument   [ODEPACK.F, 19542]   cdrv

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

lMMAX    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 123]          RRATES0
    Set   [rrates0.f, 173]             RRATES0
    Use   [rrates0.f, 277]             RRATES0
    Use   [rrates0.f, 310]             RRATES0
    Use   [rrates0.f, 317]             RRATES0
    Use   [rrates0.f, 318]             RRATES0
    Use   [rrates0.f, 329]             RRATES0
    Use   [rrates0.f, 335]             RRATES0
    Use   [rrates0.f, 359]             RRATES0
    Use   [rrates0.f, 367]             RRATES0
    Use   [rrates0.f, 379]             RRATES0

lMsg    (Local Variable)  Declared as: CHARACTER (len=128)
    Define   [set_bc0.f, 799]          SET_IJK_P_G
    Set   [set_bc0.f, 852]             SET_IJK_P_G
    Set   [set_bc0.f, 860]             SET_IJK_P_G
    Set   [set_bc0.f, 868]             SET_IJK_P_G
    Set   [set_bc0.f, 879]             SET_IJK_P_G
    Use Argument   [set_bc0.f, 888]    SET_IJK_P_G

lMW    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [read_database.f, 21]     READ_DATABASE
    Declare   [read_database.f, 43]    READ_DATABASE
    Use   [read_database.f, 114]       READ_DATABASE
    Set   [read_database.f, 114]       READ_DATABASE
    Use Argument   [read_database.f, 147]   READ_DATABASE

lMW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_h.f, 28]            CALC_H
    Set   [calc_h.f, 35]               CALC_H
    Set   [calc_h.f, 37]               CALC_H
    Use   [calc_h.f, 44]               CALC_H

lMW    (Dummy Argument)  Declared as: DOUBLE PRECISION (lDIM_N) INTENT(IN)
    Define   [set_ps.f, 150]           CALC_PS_CpxMFLOW
    Declare   [set_ps.f, 165]          CALC_PS_CpxMFLOW
    Use   [set_ps.f, 181]              CALC_PS_CpxMFLOW

LN    (Local Variable)  Declared as: INTEGER
    Define   [solve_species_eq.f, 68]   SOLVE_SPECIES_EQ
    Set   [solve_species_eq.f, 119]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 127]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 128]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 129]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 130]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 139]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 139]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 143]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 143]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 149]    SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 149]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 149]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 150]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 150]   SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 153]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 156]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 157]    SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 161]   SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 163]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 164]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 165]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 165]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 166]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 166]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 169]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 171]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 175]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 181]    SOLVE_SPECIES_EQ
    Set   [solve_species_eq.f, 194]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 196]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 196]    SOLVE_SPECIES_EQ
    Set   [solve_species_eq.f, 203]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 211]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 212]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 213]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 214]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 224]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 224]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 228]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 228]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 233]    SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 233]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 234]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 234]   SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 235]   SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 237]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 240]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 241]    SOLVE_SPECIES_EQ
    Use Argument   [solve_species_eq.f, 245]   SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 247]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 248]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 249]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 249]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 250]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 250]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 253]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 264]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 267]    SOLVE_SPECIES_EQ
    Use   [solve_species_eq.f, 273]    SOLVE_SPECIES_EQ

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

lN    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [read_database.f, 21]     READ_DATABASE
    Declare   [read_database.f, 39]    READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 107]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 108]       READ_DATABASE
    Use   [read_database.f, 109]       READ_DATABASE
    Use   [read_database.f, 118]       READ_DATABASE
    Use   [read_database.f, 119]       READ_DATABASE
    Use   [read_database.f, 119]       READ_DATABASE
    Use   [read_database.f, 122]       READ_DATABASE
    Use   [read_database.f, 123]       READ_DATABASE
    Use   [read_database.f, 127]       READ_DATABASE
    Use   [read_database.f, 130]       READ_DATABASE
    Use   [read_database.f, 131]       READ_DATABASE
    Use   [read_database.f, 134]       READ_DATABASE
    Use   [read_database.f, 135]       READ_DATABASE
    Use   [read_database.f, 137]       READ_DATABASE
    Use   [read_database.f, 138]       READ_DATABASE
    Use Argument   [read_database.f, 147]   READ_DATABASE

lN    (Local Variable)  Declared as: INTEGER
    Define   [calc_rrates_des.f, 57]   CALC_RRATES_DES
    Set   [calc_rrates_des.f, 114]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 116]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 118]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 121]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 122]     CALC_RRATES_DES
    Set   [calc_rrates_des.f, 157]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 159]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 161]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 164]     CALC_RRATES_DES

lN    (Dummy Argument)  Declared as: INTEGER INTENT(IN) OPTIONAL
    Define   [usr_src_mod.f, 31]       CALC_USR_SOURCE
    Declare   [usr_src_mod.f, 87]      CALC_USR_SOURCE
    Use Argument   [usr_src_mod.f, 109]   CALC_USR_SOURCE
    Use   [usr_src_mod.f, 112]         CALC_USR_SOURCE

lN    (Local Variable)  Declared as: INTEGER
    Define   [rrates0.f, 116]          RRATES0
    Set   [rrates0.f, 199]             RRATES0
    Use   [rrates0.f, 201]             RRATES0
    Use   [rrates0.f, 203]             RRATES0
    Use   [rrates0.f, 207]             RRATES0
    Use   [rrates0.f, 208]             RRATES0
    Use   [rrates0.f, 243]             RRATES0
    Use   [rrates0.f, 247]             RRATES0
    Set   [rrates0.f, 293]             RRATES0
    Use   [rrates0.f, 295]             RRATES0
    Use   [rrates0.f, 297]             RRATES0
    Use   [rrates0.f, 299]             RRATES0

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

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

lName    (Dummy Argument)  Declared as: CHARACTER (len=*) INTENT(IN)
    Define   [read_database.f, 21]     READ_DATABASE
    Declare   [read_database.f, 41]    READ_DATABASE
    Use Argument   [read_database.f, 107]   READ_DATABASE
    Use Argument   [read_database.f, 147]   READ_DATABASE
    Use Argument   [read_database.f, 162]   READ_DATABASE

lNEQ    (Dummy Argument)  Declared as: INTEGER (NEQ_DIMN) INTENT(IN)
    Define   [stiff_chem_rrates.f, 12]   STIFF_CHEM_RRATES
    Declare   [stiff_chem_rrates.f, 72]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 133]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 141]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 301]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 337]   STIFF_CHEM_RRATES

lNEXT_REC    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 28]     READ_RES0_DES
    Set   [read_res0_des.f, 35]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 37]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 38]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 39]   READ_RES0_DES
    Use   [read_res0_des.f, 42]        READ_RES0_DES
    Set   [read_res0_des.f, 42]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 44]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 46]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 49]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 53]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 56]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 57]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 59]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 60]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 63]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 65]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 70]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 73]   READ_RES0_DES
    Use   [read_res0_des.f, 82]        READ_RES0_DES
    Set   [read_res0_des.f, 82]        READ_RES0_DES
    Use Argument   [read_res0_des.f, 84]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 90]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 100]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 101]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 102]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 103]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 104]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 105]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 110]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 112]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 114]   READ_RES0_DES
    Use Argument   [read_res0_des.f, 116]   READ_RES0_DES

lNEXT_REC    (Local Variable)  Declared as: INTEGER
    Define   [write_res0_des.f, 31]    WRITE_RES0_DES
    Set   [write_res0_des.f, 42]       WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 44]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 45]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 46]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 49]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 52]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 54]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 57]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 61]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 64]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 65]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 68]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 71]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 74]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 76]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 81]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 83]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 88]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 89]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 93]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 96]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 98]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 99]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 100]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 101]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 102]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 103]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 104]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 105]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 106]   WRITE_RES0_DES
    Use Argument   [write_res0_des.f, 107]   WRITE_RES0_DES

LNFC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 18202]        ADJLR
    Set   [ODEPACK.F, 18211]           ADJLR
    Use   [ODEPACK.F, 18212]           ADJLR

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

lNoP    (Local Variable)  Declared as: CHARACTER (len=10)
    Define   [write_des_data.f, 112]   WRITE_DES_VTP
    Use Argument   [write_des_data.f, 120]   WRITE_DES_VTP
    Use   [write_des_data.f, 130]      WRITE_DES_VTP

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

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_newvalues.f, 39]   DES_THERMO_NEWVALUES

lNP    (Local Variable)  Declared as: INTEGER
    Define   [des_thermo_rad.f, 116]   CALC_avgTs
    Set   [des_thermo_rad.f, 134]      CALC_avgTs
    Use   [des_thermo_rad.f, 135]      CALC_avgTs

lNP    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [mass_inflow_dem.f, 257]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 287]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 301]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 302]   SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 304]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 308]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 309]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 310]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 311]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 312]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 316]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 317]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 317]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 318]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 322]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 325]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 328]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 331]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 334]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 335]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 338]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 341]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 342]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 346]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 349]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 352]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 352]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 353]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 353]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 353]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 354]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 354]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 354]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 357]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 360]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 364]     SET_NEW_PARTICLE_PROPS
    Use Argument   [mass_inflow_dem.f, 367]   SET_NEW_PARTICLE_PROPS

lNP    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [integrate_time_pic.f, 219]   AVG_VEL_wGRAV
    Declare   [integrate_time_pic.f, 224]   AVG_VEL_wGRAV
    Use   [integrate_time_pic.f, 232]   AVG_VEL_wGRAV

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

LOC    (Local Variable)  Declared as: DOUBLE PRECISION (6)
    Define   [write_out0.f, 57]        WRITE_OUT0
    Set   [write_out0.f, 421]          WRITE_OUT0
    Set   [write_out0.f, 422]          WRITE_OUT0
    Set   [write_out0.f, 423]          WRITE_OUT0
    Set   [write_out0.f, 424]          WRITE_OUT0
    Set   [write_out0.f, 425]          WRITE_OUT0
    Set   [write_out0.f, 426]          WRITE_OUT0
    Use   [write_out0.f, 427]          WRITE_OUT0
    Use   [write_out0.f, 427]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 428]          WRITE_OUT0
    Use   [write_out0.f, 429]          WRITE_OUT0
    Set   [write_out0.f, 506]          WRITE_OUT0
    Set   [write_out0.f, 507]          WRITE_OUT0
    Set   [write_out0.f, 508]          WRITE_OUT0
    Set   [write_out0.f, 509]          WRITE_OUT0
    Set   [write_out0.f, 510]          WRITE_OUT0
    Set   [write_out0.f, 511]          WRITE_OUT0
    Use   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 512]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 513]          WRITE_OUT0
    Use   [write_out0.f, 514]          WRITE_OUT0
    Set   [write_out0.f, 592]          WRITE_OUT0
    Set   [write_out0.f, 593]          WRITE_OUT0
    Set   [write_out0.f, 594]          WRITE_OUT0
    Set   [write_out0.f, 595]          WRITE_OUT0
    Set   [write_out0.f, 596]          WRITE_OUT0
    Set   [write_out0.f, 597]          WRITE_OUT0
    Use   [write_out0.f, 598]          WRITE_OUT0
    Use   [write_out0.f, 598]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 599]          WRITE_OUT0
    Use   [write_out0.f, 600]          WRITE_OUT0

LOC_DEM_BCMI_IJK    (Local Variable)  Declared as: INTEGER (:) ALLOCATABLE
    Define   [set_bc_dem_mi.f, 376]    SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 430]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 488]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 508]       SET_DEM_BCMI_IJK
    Use   [set_bc_dem_mi.f, 511]       SET_DEM_BCMI_IJK
    Set   [set_bc_dem_mi.f, 514]       SET_DEM_BCMI_IJK

LOC_DEM_BCMO_IJK    (Local Variable)  Declared as: INTEGER (:) ALLOCATABLE
    Define   [set_bc_dem_mo.f, 43]     SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 94]        SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 140]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 180]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 199]       SET_BC_DEM_MO
    Use   [set_bc_dem_mo.f, 202]       SET_BC_DEM_MO
    Set   [set_bc_dem_mo.f, 205]       SET_BC_DEM_MO

LOC_PIC_BCMI_IJK    (Local Variable)  Declared as: INTEGER (:) ALLOCATABLE
    Define   [set_bc_pic_mi.f, 147]    SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 196]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 245]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 268]       SET_PIC_BCMI_IJK
    Use   [set_bc_pic_mi.f, 277]       SET_PIC_BCMI_IJK
    Set   [set_bc_pic_mi.f, 280]       SET_PIC_BCMI_IJK

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

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

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

LOCAL_INDEX    (Local Variable)  Declared as: INTEGER
    Define   [accum_resid.f, 47]       ACCUM_RESID
    Set   [accum_resid.f, 52]          ACCUM_RESID
    Set   [accum_resid.f, 60]          ACCUM_RESID
    Use   [accum_resid.f, 60]          ACCUM_RESID
    Use   [accum_resid.f, 61]          ACCUM_RESID
    Set   [accum_resid.f, 62]          ACCUM_RESID
    Use   [accum_resid.f, 62]          ACCUM_RESID
    Use   [accum_resid.f, 63]          ACCUM_RESID
    Set   [accum_resid.f, 71]          ACCUM_RESID
    Set   [accum_resid.f, 77]          ACCUM_RESID
    Use   [accum_resid.f, 77]          ACCUM_RESID
    Use   [accum_resid.f, 78]          ACCUM_RESID
    Set   [accum_resid.f, 79]          ACCUM_RESID
    Use   [accum_resid.f, 79]          ACCUM_RESID
    Use   [accum_resid.f, 80]          ACCUM_RESID

LOCAL_MAX_Q    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 2158]         PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2570]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2572]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2576]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2578]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2582]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2584]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2589]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2591]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2595]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2597]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2601]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2603]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2608]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2610]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2614]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2616]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2621]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2623]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2627]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2629]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2633]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2635]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2640]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2642]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2649]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2651]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2654]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2656]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2659]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2661]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2665]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2667]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2670]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2672]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2675]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2677]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2681]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2683]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2686]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2688]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2692]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2694]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2697]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2699]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2702]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2704]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2708]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2710]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2718]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2720]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2723]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2725]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2728]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2730]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2734]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2736]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2739]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2741]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2744]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2746]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2750]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2751]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2755]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2757]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2761]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2763]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2766]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2768]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2771]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2773]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2777]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2779]   PRINT_GRID_STATISTICS

Local_min    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [get_cut_cell_volume_area.f, 1407]   SORT
    Set   [get_cut_cell_volume_area.f, 1413]   SORT
    Use   [get_cut_cell_volume_area.f, 1416]   SORT
    Set   [get_cut_cell_volume_area.f, 1417]   SORT

LOCAL_MIN_Q    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [vtk_out.f, 2158]         PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2569]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2571]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2575]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2577]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2581]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2583]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2588]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2590]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2594]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2596]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2600]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2602]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2607]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2609]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2613]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2615]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2620]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2622]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2626]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2628]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2632]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2634]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2639]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2641]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2648]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2650]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2653]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2655]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2658]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2660]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2664]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2666]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2669]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2671]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2674]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2676]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2680]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2682]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2685]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2687]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2691]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2693]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2696]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2698]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2701]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2703]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2707]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2709]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2717]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2719]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2722]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2724]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2727]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2729]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2733]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2735]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2738]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2740]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2743]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2745]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2749]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2752]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2754]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2756]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2760]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2762]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2765]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2767]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2770]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2772]   PRINT_GRID_STATISTICS
    Set   [vtk_out.f, 2776]            PRINT_GRID_STATISTICS
    Use Argument   [vtk_out.f, 2778]   PRINT_GRID_STATISTICS

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

LOGFILE    (Local Variable)  Declared as: CHARACTER (len=255)
    Define   [open_files.f, 296]       OPEN_PE_LOG
    Set   [open_files.f, 316]          OPEN_PE_LOG
    Set   [open_files.f, 321]          OPEN_PE_LOG
    Set   [open_files.f, 323]          OPEN_PE_LOG
    Set   [open_files.f, 325]          OPEN_PE_LOG
    Set   [open_files.f, 327]          OPEN_PE_LOG
    Set   [open_files.f, 329]          OPEN_PE_LOG
    Set   [open_files.f, 331]          OPEN_PE_LOG
    Use Argument   [open_files.f, 336]   OPEN_PE_LOG
    Use Argument   [open_files.f, 337]   OPEN_PE_LOG

long    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 19916]           nsfc
    Use   [ODEPACK.F, 19917]           nsfc
    Set   [ODEPACK.F, 19919]           nsfc
    Use   [ODEPACK.F, 19919]           nsfc
    Use   [ODEPACK.F, 19921]           nsfc
    Use   [ODEPACK.F, 19923]           nsfc
    Set   [ODEPACK.F, 20006]           nsfc
    Use   [ODEPACK.F, 20007]           nsfc
    Set   [ODEPACK.F, 20011]           nsfc
    Use   [ODEPACK.F, 20011]           nsfc
    Use   [ODEPACK.F, 20018]           nsfc
    Use   [ODEPACK.F, 20020]           nsfc

LONGEST    (Local Variable)  Declared as: INTEGER
    Define   [get_cut_cell_volume_area.f, 1216]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1318]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1320]   REORDER_POLYGON
    Set   [get_cut_cell_volume_area.f, 1322]   REORDER_POLYGON
    Use   [get_cut_cell_volume_area.f, 1328]   REORDER_POLYGON

lOoDT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_reaction_model.f, 46]   DES_REACTION_MODEL
    Set   [des_reaction_model.f, 57]   DES_REACTION_MODEL
    Use   [des_reaction_model.f, 63]   DES_REACTION_MODEL

lOoDT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [dif_phi_source_des.f, 55]   DIF_PHI_SOURCE_DES
    Set   [dif_phi_source_des.f, 59]   DIF_PHI_SOURCE_DES
    Use   [dif_phi_source_des.f, 65]   DIF_PHI_SOURCE_DES

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

lOWNS    (Dummy Argument)  Declared as: LOGICAL INTENT(OUT)
    Define   [mass_inflow_dem.f, 130]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 158]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 240]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 243]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 243]     SEED_NEW_PARTICLE

LP    (Local Variable)  Declared as: INTEGER
    Define   [mass_outflow_pic.f, 23]   MASS_OUTFLOW_PIC
    Set   [mass_outflow_pic.f, 35]     MASS_OUTFLOW_PIC
    Use   [mass_outflow_pic.f, 37]     MASS_OUTFLOW_PIC

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

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 217]     PARTIAL_ELIM_IA
    Set   [partial_elim.f, 273]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 274]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 275]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 276]        PARTIAL_ELIM_IA
    Use   [partial_elim.f, 276]        PARTIAL_ELIM_IA

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 68]      PARTIAL_ELIM_S
    Set   [partial_elim.f, 136]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 137]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 138]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 139]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 140]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 142]        PARTIAL_ELIM_S
    Use   [partial_elim.f, 142]        PARTIAL_ELIM_S

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 361]     PARTIAL_ELIM_U
    Set   [partial_elim.f, 444]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 447]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 448]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 449]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 450]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 452]        PARTIAL_ELIM_U
    Use   [partial_elim.f, 452]        PARTIAL_ELIM_U

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 546]     PARTIAL_ELIM_V
    Set   [partial_elim.f, 624]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 625]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 626]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 627]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 628]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 630]        PARTIAL_ELIM_V
    Use   [partial_elim.f, 630]        PARTIAL_ELIM_V

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim.f, 724]     PARTIAL_ELIM_W
    Set   [partial_elim.f, 802]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 803]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 804]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 805]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 806]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 808]        PARTIAL_ELIM_W
    Use   [partial_elim.f, 808]        PARTIAL_ELIM_W

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

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

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

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

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

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

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

LP    (Local Variable)  Declared as: INTEGER
    Define   [partial_elim_ghd.f, 458]   PARTIAL_ELIM_GHD_W
    Set   [partial_elim_ghd.f, 530]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 531]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 531]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 532]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 533]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 534]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 535]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 537]    PARTIAL_ELIM_GHD_W
    Use   [partial_elim_ghd.f, 537]    PARTIAL_ELIM_GHD_W

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

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

LP    (Local Variable)  Declared as: INTEGER
    Define   [mass_outflow_dem.f, 26]   MASS_OUTFLOW_DEM
    Set   [mass_outflow_dem.f, 52]     MASS_OUTFLOW_DEM
    Use   [mass_outflow_dem.f, 54]     MASS_OUTFLOW_DEM

LP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 12032]        DLSODI
    Set   [ODEPACK.F, 12205]           DLSODI
    Use   [ODEPACK.F, 12209]           DLSODI

LP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 13834]        DLSOIBT
    Set   [ODEPACK.F, 14004]           DLSOIBT
    Use   [ODEPACK.F, 14008]           DLSOIBT

LP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Set   [ODEPACK.F, 22424]           DSOLPK
    Use   [ODEPACK.F, 22425]           DSOLPK
    Use   [ODEPACK.F, 22430]           DSOLPK
    Set   [ODEPACK.F, 22444]           DSOLPK
    Use   [ODEPACK.F, 22445]           DSOLPK
    Use   [ODEPACK.F, 22450]           DSOLPK

lp    (Local Variable)  Declared as: INTEGER
    Define   [integrate_time_pic.f, 633]   des_dbgpic
    Set   [integrate_time_pic.f, 645]   des_dbgpic
    Use Argument   [integrate_time_pic.f, 646]   des_dbgpic
    Use Argument   [integrate_time_pic.f, 646]   des_dbgpic
    Use Argument   [integrate_time_pic.f, 646]   des_dbgpic
    Use   [integrate_time_pic.f, 647]   des_dbgpic
    Use   [integrate_time_pic.f, 648]   des_dbgpic
    Use   [integrate_time_pic.f, 648]   des_dbgpic
    Use   [integrate_time_pic.f, 649]   des_dbgpic
    Use   [integrate_time_pic.f, 650]   des_dbgpic
    Use   [integrate_time_pic.f, 650]   des_dbgpic

lp    (Local Variable)  Declared as: INTEGER
    Define   [integrate_time_pic.f, 687]   des_dbgtecplot
    Set   [integrate_time_pic.f, 704]   des_dbgtecplot
    Use Argument   [integrate_time_pic.f, 705]   des_dbgtecplot
    Use   [integrate_time_pic.f, 706]   des_dbgtecplot
    Use   [integrate_time_pic.f, 707]   des_dbgtecplot
    Use   [integrate_time_pic.f, 707]   des_dbgtecplot
    Use   [integrate_time_pic.f, 708]   des_dbgtecplot
    Use   [integrate_time_pic.f, 708]   des_dbgtecplot
    Use   [integrate_time_pic.f, 709]   des_dbgtecplot
    Use   [integrate_time_pic.f, 709]   des_dbgtecplot
    Use   [integrate_time_pic.f, 709]   des_dbgtecplot

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [interpolate_pic.f, 55]   INTERPOLATE_PIC1
    Set   [interpolate_pic.f, 59]      INTERPOLATE_PIC1
    Use   [interpolate_pic.f, 75]      INTERPOLATE_PIC1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [calc_pg_grad.f, 60]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 82]         CALC_PG_GRAD
    Use   [calc_pg_grad.f, 97]         CALC_PG_GRAD

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 84]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 90]         DRAG_GS_DES1
    Use   [drag_gs_des1.f, 112]        DRAG_GS_DES1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [drag_gs_des1.f, 246]     DRAG_GS_GAS1
    Set   [drag_gs_des1.f, 258]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 280]        DRAG_GS_GAS1
    Use   [drag_gs_des1.f, 311]        DRAG_GS_GAS1

LP_BND    (Local Variable)  Declared as: INTEGER
    Define   [comp_mean_fields1.f, 45]   COMP_MEAN_FIELDS1

LPB    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25637]        DAIGBT
    Set   [ODEPACK.F, 25653]           DAIGBT
    Use   [ODEPACK.F, 25654]           DAIGBT
    Use   [ODEPACK.F, 25661]           DAIGBT
    Use   [ODEPACK.F, 25662]           DAIGBT
    Use   [ODEPACK.F, 25666]           DAIGBT

LPB    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25691]        DPJIBT
    Set   [ODEPACK.F, 25735]           DPJIBT
    Use   [ODEPACK.F, 25736]           DPJIBT
    Use   [ODEPACK.F, 25746]           DPJIBT
    Use   [ODEPACK.F, 25823]           DPJIBT
    Use   [ODEPACK.F, 25825]           DPJIBT

LPB    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25836]        DSLSBT
    Set   [ODEPACK.F, 25856]           DSLSBT
    Use   [ODEPACK.F, 25857]           DSLSBT
    Use   [ODEPACK.F, 25858]           DSLSBT

LPC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25637]        DAIGBT
    Set   [ODEPACK.F, 25654]           DAIGBT
    Use   [ODEPACK.F, 25661]           DAIGBT
    Use   [ODEPACK.F, 25662]           DAIGBT
    Use   [ODEPACK.F, 25666]           DAIGBT

LPC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25691]        DPJIBT
    Set   [ODEPACK.F, 25736]           DPJIBT
    Use   [ODEPACK.F, 25746]           DPJIBT
    Use   [ODEPACK.F, 25823]           DPJIBT
    Use   [ODEPACK.F, 25825]           DPJIBT

LPC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 25836]        DSLSBT
    Set   [ODEPACK.F, 25857]           DSLSBT
    Use   [ODEPACK.F, 25858]           DSLSBT

LPCG    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 23141]        DPCG
    Declare   [ODEPACK.F, 23143]       DPCG
    Set   [ODEPACK.F, 23219]           DPCG
    Set   [ODEPACK.F, 23232]           DPCG
    Use   [ODEPACK.F, 23232]           DPCG
    Use   [ODEPACK.F, 23242]           DPCG
    Use   [ODEPACK.F, 23264]           DPCG

LPCG    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 23286]        DPCGS
    Declare   [ODEPACK.F, 23288]       DPCGS
    Set   [ODEPACK.F, 23365]           DPCGS
    Set   [ODEPACK.F, 23378]           DPCGS
    Use   [ODEPACK.F, 23378]           DPCGS
    Use   [ODEPACK.F, 23390]           DPCGS
    Use   [ODEPACK.F, 23414]           DPCGS

LPCG    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Use Argument   [ODEPACK.F, 22431]   DSOLPK
    Use   [ODEPACK.F, 22433]           DSOLPK
    Use Argument   [ODEPACK.F, 22451]   DSOLPK
    Use   [ODEPACK.F, 22453]           DSOLPK

lpCnt    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 982]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 998]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1009]            IJK_Pg_SEARCH

lPF    (Local Variable)  Declared as: DOUBLE PRECISION (3)
    Define   [calc_pg_grad.f, 58]      CALC_PG_GRAD
    Set   [calc_pg_grad.f, 96]         CALC_PG_GRAD
    Set   [calc_pg_grad.f, 100]        CALC_PG_GRAD
    Use   [calc_pg_grad.f, 100]        CALC_PG_GRAD
    Set   [calc_pg_grad.f, 103]        CALC_PG_GRAD
    Use   [calc_pg_grad.f, 107]        CALC_PG_GRAD

lPF    (Local Variable)  Declared as: DOUBLE PRECISION (3)
    Define   [drag_gs_des1.f, 78]      DRAG_GS_DES1
    Set   [drag_gs_des1.f, 107]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 122]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 122]        DRAG_GS_DES1
    Set   [drag_gs_des1.f, 130]        DRAG_GS_DES1
    Use   [drag_gs_des1.f, 160]        DRAG_GS_DES1

lPg_ref    (Dummy Argument)  Declared as: DOUBLE PRECISION (NMAX) INTENT(OUT)
    Define   [calc_dif_g.f, 171]       SET_BINARY_DAB_GAS
    Declare   [calc_dif_g.f, 184]      SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 206]          SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 236]          SET_BINARY_DAB_GAS
    Use   [calc_dif_g.f, 236]          SET_BINARY_DAB_GAS

lpip_all    (Local Variable)  Declared as: INTEGER (0:numpes-1)
    Define   [make_arrays_des.f, 40]   MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 97]      MAKE_ARRAYS_DES
    Set   [make_arrays_des.f, 98]      MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 99]   MAKE_ARRAYS_DES
    Use Argument   [make_arrays_des.f, 100]   MAKE_ARRAYS_DES

LPIP_DEL_COUNT_ALL    (Local Variable)  Declared as: INTEGER (0:numPEs-1)
    Define   [integrate_time_pic.f, 330]   INTEGRATE_TIME_PIC_GARG
    Set   [integrate_time_pic.f, 541]   INTEGRATE_TIME_PIC_GARG
    Set   [integrate_time_pic.f, 542]   INTEGRATE_TIME_PIC_GARG
    Use Argument   [integrate_time_pic.f, 543]   INTEGRATE_TIME_PIC_GARG
    Use Argument   [integrate_time_pic.f, 544]   INTEGRATE_TIME_PIC_GARG
    Use Argument   [integrate_time_pic.f, 548]   INTEGRATE_TIME_PIC_GARG
    Use Argument   [integrate_time_pic.f, 554]   INTEGRATE_TIME_PIC_GARG

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

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

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

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_e.f, 558]         CALC_D_E_SOLIDS_ONLY
    Set   [calc_d_e.f, 619]            CALC_D_E_SOLIDS_ONLY
    Use   [calc_d_e.f, 622]            CALC_D_E_SOLIDS_ONLY

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

LPL    (Local Variable)  Declared as: INTEGER
    Define   [calc_d_n.f, 546]         CALC_D_N_SOLIDS_ONLY
    Set   [calc_d_n.f, 605]            CALC_D_N_SOLIDS_ONLY
    Use   [calc_d_n.f, 607]            CALC_D_N_SOLIDS_ONLY

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

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(IN)
    Define   [particles_in_cell.f, 314]   PIC_SEARCH
    Declare   [particles_in_cell.f, 323]   PIC_SEARCH
    Use   [particles_in_cell.f, 332]   PIC_SEARCH
    Use   [particles_in_cell.f, 332]   PIC_SEARCH

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION (3) INTENT(OUT)
    Define   [mass_inflow_dem.f, 129]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 154]   SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 203]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 204]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 205]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 213]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 214]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 215]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 223]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 224]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 225]     SEED_NEW_PARTICLE
    Set   [mass_inflow_dem.f, 234]     SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 236]   SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 237]   SEED_NEW_PARTICLE
    Use Argument   [mass_inflow_dem.f, 238]   SEED_NEW_PARTICLE

lPOS    (Dummy Argument)  Declared as: DOUBLE PRECISION (3) INTENT(IN)
    Define   [mass_inflow_dem.f, 257]   SET_NEW_PARTICLE_PROPS
    Declare   [mass_inflow_dem.f, 289]   SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 308]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 309]     SET_NEW_PARTICLE_PROPS
    Use   [mass_inflow_dem.f, 316]     SET_NEW_PARTICLE_PROPS

lPOS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_cell_movement.f, 354]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 389]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 391]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 391]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 398]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 409]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 418]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 420]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 420]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 427]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 439]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 448]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 450]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 450]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 457]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 468]   CHECK_CELL_MOVEMENT_PIC

lproc    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 294]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 370]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 371]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 371]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 371]      WRITE_DES_TECPLOT

lprop    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [usr_properties.f, 754]   USR_PROPERTIES
    Declare   [usr_properties.f, 785]   USR_PROPERTIES
    Use   [usr_properties.f, 809]      USR_PROPERTIES

lPS_SIZE    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 246]           DEBUG_PS
    Declare   [set_ps.f, 275]          DEBUG_PS
    Use   [set_ps.f, 286]              DEBUG_PS
    Use   [set_ps.f, 289]              DEBUG_PS
    Use   [set_ps.f, 290]              DEBUG_PS

lPSV    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_ps.f, 246]           DEBUG_PS
    Declare   [set_ps.f, 273]          DEBUG_PS
    Use   [set_ps.f, 285]              DEBUG_PS
    Use   [set_ps.f, 294]              DEBUG_PS
    Use   [set_ps.f, 294]              DEBUG_PS
    Use   [set_ps.f, 295]              DEBUG_PS
    Use   [set_ps.f, 295]              DEBUG_PS
    Use   [set_ps.f, 296]              DEBUG_PS
    Use   [set_ps.f, 296]              DEBUG_PS
    Use   [set_ps.f, 318]              DEBUG_PS
    Use   [set_ps.f, 318]              DEBUG_PS
    Use   [set_ps.f, 318]              DEBUG_PS
    Use   [set_ps.f, 318]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 320]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 322]              DEBUG_PS
    Use   [set_ps.f, 324]              DEBUG_PS
    Use   [set_ps.f, 327]              DEBUG_PS
    Use   [set_ps.f, 329]              DEBUG_PS
    Use   [set_ps.f, 330]              DEBUG_PS
    Use   [set_ps.f, 332]              DEBUG_PS
    Use   [set_ps.f, 333]              DEBUG_PS
    Use   [set_ps.f, 334]              DEBUG_PS
    Use   [set_ps.f, 336]              DEBUG_PS
    Use   [set_ps.f, 341]              DEBUG_PS
    Use   [set_ps.f, 350]              DEBUG_PS
    Use   [set_ps.f, 352]              DEBUG_PS
    Use   [set_ps.f, 353]              DEBUG_PS
    Use   [set_ps.f, 355]              DEBUG_PS
    Use   [set_ps.f, 356]              DEBUG_PS
    Use   [set_ps.f, 357]              DEBUG_PS
    Use   [set_ps.f, 359]              DEBUG_PS
    Use   [set_ps.f, 364]              DEBUG_PS
    Use   [set_ps.f, 376]              DEBUG_PS
    Use   [set_ps.f, 376]              DEBUG_PS
    Use   [set_ps.f, 377]              DEBUG_PS
    Use   [set_ps.f, 377]              DEBUG_PS
    Use   [set_ps.f, 378]              DEBUG_PS
    Use   [set_ps.f, 378]              DEBUG_PS

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

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

LQ    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Set   [ODEPACK.F, 22403]           DSOLPK
    Use   [ODEPACK.F, 22404]           DSOLPK
    Use   [ODEPACK.F, 22410]           DSOLPK

LR    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22366]        DSOLPK
    Set   [ODEPACK.F, 22423]           DSOLPK
    Use   [ODEPACK.F, 22424]           DSOLPK
    Use   [ODEPACK.F, 22428]           DSOLPK
    Use   [ODEPACK.F, 22429]           DSOLPK
    Set   [ODEPACK.F, 22443]           DSOLPK
    Use   [ODEPACK.F, 22444]           DSOLPK
    Use   [ODEPACK.F, 22448]           DSOLPK
    Use   [ODEPACK.F, 22449]           DSOLPK

lRAND    (Dummy Argument)  Declared as: DOUBLE PRECISION (3) INTENT(IN)
    Define   [mass_inflow_dem.f, 129]   SEED_NEW_PARTICLE
    Declare   [mass_inflow_dem.f, 150]   SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 188]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 195]     SEED_NEW_PARTICLE
    Use   [mass_inflow_dem.f, 196]     SEED_NEW_PARTICLE

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [stiff_chem_rrates.f, 93]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 168]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 172]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 175]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 178]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 185]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 188]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 193]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 195]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 201]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 205]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 215]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 237]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 240]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 243]   STIFF_CHEM_RRATES

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_rrates_des.f, 65]   CALC_RRATES_DES
    Set   [calc_rrates_des.f, 122]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 126]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 128]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 131]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 139]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 141]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 146]     CALC_RRATES_DES
    Set   [calc_rrates_des.f, 163]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 167]     CALC_RRATES_DES
    Use   [calc_rrates_des.f, 170]     CALC_RRATES_DES

lRate    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rrates0.f, 129]          RRATES0
    Set   [rrates0.f, 208]             RRATES0
    Use   [rrates0.f, 212]             RRATES0
    Use   [rrates0.f, 214]             RRATES0
    Use   [rrates0.f, 217]             RRATES0
    Use   [rrates0.f, 225]             RRATES0
    Use   [rrates0.f, 228]             RRATES0
    Use   [rrates0.f, 235]             RRATES0
    Use   [rrates0.f, 237]             RRATES0
    Use   [rrates0.f, 242]             RRATES0
    Use   [rrates0.f, 246]             RRATES0
    Use   [rrates0.f, 258]             RRATES0
    Set   [rrates0.f, 299]             RRATES0
    Use   [rrates0.f, 302]             RRATES0
    Use   [rrates0.f, 305]             RRATES0

lRateStrainG    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_g.f, 519]       CALC_CG_DERIV_VEL_GAS
    Declare   [calc_trd_g.f, 547]      CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 572]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 789]          CALC_CG_DERIV_VEL_GAS

lRateStrainG    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_g.f, 430]       CALC_DERIV_VEL_GAS
    Declare   [calc_trd_g.f, 446]      CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 484]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 485]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 487]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 491]          CALC_DERIV_VEL_GAS
    Use   [calc_trd_g.f, 491]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 492]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 493]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 496]          CALC_DERIV_VEL_GAS
    Use   [calc_trd_g.f, 496]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 497]          CALC_DERIV_VEL_GAS
    Use   [calc_trd_g.f, 497]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 498]          CALC_DERIV_VEL_GAS
    Use Argument   [calc_trd_g.f, 502]   CALC_DERIV_VEL_GAS

lRateStrainS    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_s.f, 576]       CALC_CG_DERIV_VEL_SOLIDS
    Declare   [calc_trd_s.f, 606]      CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 634]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 859]          CALC_CG_DERIV_VEL_SOLIDS

lRateStrainS    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_s.f, 484]       CALC_DERIV_VEL_SOLIDS
    Declare   [calc_trd_s.f, 502]      CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 541]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 542]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 544]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 548]          CALC_DERIV_VEL_SOLIDS
    Use   [calc_trd_s.f, 548]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 549]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 550]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 553]          CALC_DERIV_VEL_SOLIDS
    Use   [calc_trd_s.f, 553]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 554]          CALC_DERIV_VEL_SOLIDS
    Use   [calc_trd_s.f, 554]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 555]          CALC_DERIV_VEL_SOLIDS
    Use Argument   [calc_trd_s.f, 559]   CALC_DERIV_VEL_SOLIDS

lratio    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 19474]           cdrv
    Use   [ODEPACK.F, 19488]           cdrv
    Use   [ODEPACK.F, 19497]           cdrv
    Use   [ODEPACK.F, 19498]           cdrv
    Use   [ODEPACK.F, 19529]           cdrv
    Use   [ODEPACK.F, 19529]           cdrv

lRECOVERED    (Local Variable)  Declared as: INTEGER
    Define   [check_cell_movement.f, 358]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 371]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 393]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 393]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 422]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 422]   CHECK_CELL_MOVEMENT_PIC
    Set   [check_cell_movement.f, 452]   CHECK_CELL_MOVEMENT_PIC
    Use   [check_cell_movement.f, 452]   CHECK_CELL_MOVEMENT_PIC
    Use Argument   [check_cell_movement.f, 492]   CHECK_CELL_MOVEMENT_PIC

lRg    (Local Variable)  Declared as: DOUBLE PRECISION (DIMENSION_N_g)
    Define   [stiff_chem_rrates.f, 96]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 137]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 223]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 223]   STIFF_CHEM_RRATES
    Use Argument   [stiff_chem_rrates.f, 296]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 320]   STIFF_CHEM_RRATES

lRg    (Local Variable)  Declared as: DOUBLE PRECISION (NMAX)
    Define   [rxns_gs_des1.f, 293]     DES_STIFF_CHEM
    Set   [rxns_gs_des1.f, 301]        DES_STIFF_CHEM
    Use   [rxns_gs_des1.f, 312]        DES_STIFF_CHEM

lRgc    (Local Variable)  Declared as: DOUBLE PRECISION (NMAX)
    Define   [rxns_gs_des1.f, 59]      RXNS_GS_DES1
    Use Argument   [rxns_gs_des1.f, 80]   RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 92]         RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 102]        RXNS_GS_DES1

lRgc    (Local Variable)  Declared as: DOUBLE PRECISION (NMAX)
    Define   [rxns_gs_des1.f, 177]     RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 206]   RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 210]   RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 219]        RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 226]        RXNS_GS_GAS1

lRgp    (Local Variable)  Declared as: DOUBLE PRECISION (NMAX)
    Define   [rxns_gs_des1.f, 58]      RXNS_GS_DES1
    Use Argument   [rxns_gs_des1.f, 80]   RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 91]         RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 101]        RXNS_GS_DES1

lRgp    (Local Variable)  Declared as: DOUBLE PRECISION (NMAX)
    Define   [rxns_gs_des1.f, 176]     RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 206]   RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 210]   RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 218]        RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 225]        RXNS_GS_GAS1

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

lRPhase    (Local Variable)  Declared as: DOUBLE PRECISION (DIMENSION_LM+DIMENSION_M-1)
    Define   [rxns_gs_des1.f, 64]      RXNS_GS_DES1
    Use Argument   [rxns_gs_des1.f, 80]   RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 93]         RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 103]        RXNS_GS_DES1

lRPhase    (Local Variable)  Declared as: DOUBLE PRECISION (DIMENSION_LM+DIMENSION_M-1)
    Define   [rxns_gs_des1.f, 182]     RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 206]   RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 220]        RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 227]        RXNS_GS_GAS1

lRs    (Local Variable)  Declared as: DOUBLE PRECISION (DIMENSION_M,DIMENSION_N_s)
    Define   [stiff_chem_rrates.f, 106]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 138]   STIFF_CHEM_RRATES
    Set   [stiff_chem_rrates.f, 224]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 224]   STIFF_CHEM_RRATES
    Use Argument   [stiff_chem_rrates.f, 301]   STIFF_CHEM_RRATES
    Use   [stiff_chem_rrates.f, 343]   STIFF_CHEM_RRATES

LRS    (Local Variable)  Declared as: INTEGER
    Define   [check_odepack_stiff_chem.f, 156]   ODEPACK_INIT
    Set   [check_odepack_stiff_chem.f, 189]   ODEPACK_INIT
    Use Argument   [check_odepack_stiff_chem.f, 190]   ODEPACK_INIT

LRTEM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3018]         DLSODES
    Set   [ODEPACK.F, 3191]            DLSODES
    Use   [ODEPACK.F, 3193]            DLSODES

LRTEM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 15985]           DLSODIS
    Use   [ODEPACK.F, 15986]           DLSODIS

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 3737]         DLSODA
    Declare   [ODEPACK.F, 3739]        DLSODA
    Use   [ODEPACK.F, 3741]            DLSODA
    Use   [ODEPACK.F, 4872]            DLSODA
    Use   [ODEPACK.F, 4874]            DLSODA
    Use   [ODEPACK.F, 4878]            DLSODA
    Use Argument   [ODEPACK.F, 4886]   DLSODA
    Use Argument   [ODEPACK.F, 5317]   DLSODA

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 5369]         DLSODAR
    Declare   [ODEPACK.F, 5372]        DLSODAR
    Use   [ODEPACK.F, 5375]            DLSODAR
    Use   [ODEPACK.F, 6628]            DLSODAR
    Use   [ODEPACK.F, 6652]            DLSODAR
    Use   [ODEPACK.F, 6654]            DLSODAR
    Use   [ODEPACK.F, 6658]            DLSODAR
    Use Argument   [ODEPACK.F, 6666]   DLSODAR
    Use Argument   [ODEPACK.F, 7143]   DLSODAR

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 3]            DLSODE
    Declare   [ODEPACK.F, 5]           DLSODE
    Use   [ODEPACK.F, 7]               DLSODE
    Use   [ODEPACK.F, 1335]            DLSODE
    Use Argument   [ODEPACK.F, 1707]   DLSODE

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 1758]         DLSODES
    Declare   [ODEPACK.F, 1760]        DLSODES
    Use   [ODEPACK.F, 1762]            DLSODES
    Use   [ODEPACK.F, 3172]            DLSODES
    Use   [ODEPACK.F, 3193]            DLSODES
    Use Argument   [ODEPACK.F, 3233]   DLSODES
    Use Argument   [ODEPACK.F, 3234]   DLSODES
    Use Argument   [ODEPACK.F, 3235]   DLSODES
    Use   [ODEPACK.F, 3244]            DLSODES
    Use Argument   [ODEPACK.F, 3287]   DLSODES
    Use   [ODEPACK.F, 3296]            DLSODES
    Use Argument   [ODEPACK.F, 3647]   DLSODES
    Use Argument   [ODEPACK.F, 3688]   DLSODES
    Use Argument   [ODEPACK.F, 3693]   DLSODES
    Use Argument   [ODEPACK.F, 3698]   DLSODES
    Use Argument   [ODEPACK.F, 3710]   DLSODES

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 10855]        DLSODI
    Declare   [ODEPACK.F, 10857]       DLSODI
    Use   [ODEPACK.F, 10859]           DLSODI
    Use   [ODEPACK.F, 12148]           DLSODI
    Use Argument   [ODEPACK.F, 12576]   DLSODI

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 14421]        DLSODIS
    Declare   [ODEPACK.F, 14423]       DLSODIS
    Use   [ODEPACK.F, 14425]           DLSODIS
    Use   [ODEPACK.F, 15956]           DLSODIS
    Use   [ODEPACK.F, 15986]           DLSODIS
    Use Argument   [ODEPACK.F, 16025]   DLSODIS
    Use Argument   [ODEPACK.F, 16026]   DLSODIS
    Use Argument   [ODEPACK.F, 16027]   DLSODIS
    Use   [ODEPACK.F, 16038]           DLSODIS
    Use Argument   [ODEPACK.F, 16087]   DLSODIS
    Use   [ODEPACK.F, 16097]           DLSODIS
    Use Argument   [ODEPACK.F, 16492]   DLSODIS
    Use Argument   [ODEPACK.F, 16533]   DLSODIS
    Use Argument   [ODEPACK.F, 16538]   DLSODIS
    Use Argument   [ODEPACK.F, 16543]   DLSODIS
    Use Argument   [ODEPACK.F, 16555]   DLSODIS

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 8950]         DLSODKR
    Declare   [ODEPACK.F, 8953]        DLSODKR
    Use   [ODEPACK.F, 8956]            DLSODKR
    Use   [ODEPACK.F, 10306]           DLSODKR
    Use   [ODEPACK.F, 10338]           DLSODKR
    Use Argument   [ODEPACK.F, 10796]   DLSODKR

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 7208]         DLSODPK
    Declare   [ODEPACK.F, 7210]        DLSODPK
    Use   [ODEPACK.F, 7212]            DLSODPK
    Use   [ODEPACK.F, 8466]            DLSODPK
    Use Argument   [ODEPACK.F, 8904]   DLSODPK

LRW    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 12622]        DLSOIBT
    Declare   [ODEPACK.F, 12624]       DLSOIBT
    Use   [ODEPACK.F, 12626]           DLSOIBT
    Use   [ODEPACK.F, 13947]           DLSOIBT
    Use Argument   [ODEPACK.F, 14375]   DLSOIBT

LS    (Local Variable)  Declared as: INTEGER
    Define   [mass_inflow_dem.f, 25]   MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 43]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 44]      MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 70]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 91]      MASS_INFLOW_DEM
    Set   [mass_inflow_dem.f, 93]      MASS_INFLOW_DEM
    Use   [mass_inflow_dem.f, 99]      MASS_INFLOW_DEM
    Use Argument   [mass_inflow_dem.f, 102]   MASS_INFLOW_DEM

LS    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 70]     DISPLAY_FIELD_RESID
    Set   [display_resid.f, 77]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 79]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 84]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 86]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 96]        DISPLAY_FIELD_RESID
    Use   [display_resid.f, 98]        DISPLAY_FIELD_RESID
    Set   [display_resid.f, 104]       DISPLAY_FIELD_RESID
    Use   [display_resid.f, 106]       DISPLAY_FIELD_RESID

LS    (Local Variable)  Declared as: INTEGER
    Define   [display_resid.f, 139]    DISPLAY_GROUP_RESID
    Set   [display_resid.f, 145]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 147]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 151]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 153]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 158]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 160]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 165]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 167]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 172]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 174]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 179]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 181]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 185]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 187]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 199]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 201]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 205]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 207]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 212]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 214]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 219]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 221]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 226]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 228]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 233]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 235]       DISPLAY_GROUP_RESID
    Set   [display_resid.f, 239]       DISPLAY_GROUP_RESID
    Use   [display_resid.f, 241]       DISPLAY_GROUP_RESID

ls    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 18972]        mdm
    Set   [ODEPACK.F, 18980]           mdm
    Use   [ODEPACK.F, 18981]           mdm
    Set   [ODEPACK.F, 18983]           mdm

ls    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 19027]        mdp
    Set   [ODEPACK.F, 19050]           mdp
    Use   [ODEPACK.F, 19051]           mdp
    Set   [ODEPACK.F, 19052]           mdp
    Use   [ODEPACK.F, 19053]           mdp
    Use   [ODEPACK.F, 19054]           mdp
    Use   [ODEPACK.F, 19056]           mdp
    Use   [ODEPACK.F, 19057]           mdp
    Set   [ODEPACK.F, 19058]           mdp

lS1    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 976]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 995]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 995]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1011]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1015]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1056]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1059]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1059]            IJK_Pg_SEARCH

lS2    (Local Variable)  Declared as: INTEGER
    Define   [set_bc0.f, 975]          IJK_Pg_SEARCH
    Set   [set_bc0.f, 996]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 996]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1010]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1014]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1057]            IJK_Pg_SEARCH
    Set   [set_bc0.f, 1062]            IJK_Pg_SEARCH
    Use   [set_bc0.f, 1062]            IJK_Pg_SEARCH

LSFC    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 18202]        ADJLR
    Set   [ODEPACK.F, 18210]           ADJLR
    Use   [ODEPACK.F, 18212]           ADJLR

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

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

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

lSTART    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [particles_in_cell.f, 314]   PIC_SEARCH
    Declare   [particles_in_cell.f, 329]   PIC_SEARCH
    Use   [particles_in_cell.f, 331]   PIC_SEARCH

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

LSTART    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 487]       PARSE_ARITH
    Set   [parse_line.f, 514]          PARSE_ARITH
    Use   [parse_line.f, 516]          PARSE_ARITH
    Use   [parse_line.f, 518]          PARSE_ARITH
    Use   [parse_line.f, 518]          PARSE_ARITH
    Use   [parse_line.f, 519]          PARSE_ARITH
    Use   [parse_line.f, 520]          PARSE_ARITH
    Use   [parse_line.f, 529]          PARSE_ARITH
    Use   [parse_line.f, 532]          PARSE_ARITH
    Use   [parse_line.f, 553]          PARSE_ARITH
    Use   [parse_line.f, 555]          PARSE_ARITH
    Use   [parse_line.f, 573]          PARSE_ARITH

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

LSTART    (Dummy Argument)  Declared as: INTEGER
    Define   [set_increments.f, 2453]   WRITE_INT_TABLE
    Declare   [set_increments.f, 2479]   WRITE_INT_TABLE
    Use   [set_increments.f, 2512]     WRITE_INT_TABLE
    Use   [set_increments.f, 2514]     WRITE_INT_TABLE
    Use   [set_increments.f, 2520]     WRITE_INT_TABLE

LSUB    (Local Variable)  Declared as: INTEGER
    Define   [parse_line.f, 496]       PARSE_ARITH
    Set   [parse_line.f, 528]          PARSE_ARITH
    Use   [parse_line.f, 531]          PARSE_ARITH
    Use   [parse_line.f, 535]          PARSE_ARITH
    Use   [parse_line.f, 538]          PARSE_ARITH
    Set   [parse_line.f, 545]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Use   [parse_line.f, 549]          PARSE_ARITH
    Set   [parse_line.f, 550]          PARSE_ARITH
    Use   [parse_line.f, 550]          PARSE_ARITH
    Set   [parse_line.f, 574]          PARSE_ARITH
    Use   [parse_line.f, 575]          PARSE_ARITH
    Use   [parse_line.f, 575]          PARSE_ARITH
    Use   [parse_line.f, 581]          PARSE_ARITH

lSubGridWall    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(OUT)
    Define   [drag_gs.f, 1081]         SUBGRID_DRAG_WALL
    Declare   [drag_gs.f, 1096]        SUBGRID_DRAG_WALL
    Set   [drag_gs.f, 1113]            SUBGRID_DRAG_WALL
    Set   [drag_gs.f, 1120]            SUBGRID_DRAG_WALL

lSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_30.f, 575]    CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 600]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 601]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 601]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 603]   CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 604]   CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 605]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 609]   CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 620]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 622]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 627]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 627]       CHECK_RXN_MASS_BALANCE
    Set   [check_data_30.f, 630]       CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 630]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 634]   CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 635]   CHECK_RXN_MASS_BALANCE
    Use   [check_data_30.f, 636]       CHECK_RXN_MASS_BALANCE
    Use Argument   [check_data_30.f, 641]   CHECK_RXN_MASS_BALANCE

lSUM    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [check_data_30.f, 373]    REPORT_SPECIES_STATS
    Set   [check_data_30.f, 398]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 399]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 400]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 403]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 404]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 407]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 409]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 411]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 413]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 415]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 417]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 419]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 421]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 432]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 434]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 435]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 438]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 439]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 442]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 444]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 446]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 448]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 450]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 452]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 454]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 456]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 482]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 485]       REPORT_SPECIES_STATS
    Set   [check_data_30.f, 497]       REPORT_SPECIES_STATS
    Use   [check_data_30.f, 501]       REPORT_SPECIES_STATS

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

lSUMRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rxns_gs_des1.f, 61]      RXNS_GS_DES1
    Use Argument   [rxns_gs_des1.f, 80]   RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 95]         RXNS_GS_DES1
    Use   [rxns_gs_des1.f, 105]        RXNS_GS_DES1

lSUMRg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [rxns_gs_des1.f, 179]     RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 206]   RXNS_GS_GAS1
    Use Argument   [rxns_gs_des1.f, 210]   RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 222]        RXNS_GS_GAS1
    Use   [rxns_gs_des1.f, 229]        RXNS_GS_GAS1

LT    (Local Variable)  Declared as: INTEGER
    Define   [vtk_out.f, 82]           WRITE_VTU_FILE
    Set   [vtk_out.f, 207]             WRITE_VTU_FILE
    Set   [vtk_out.f, 210]             WRITE_VTU_FILE
    Use   [vtk_out.f, 212]             WRITE_VTU_FILE
    Set   [vtk_out.f, 225]             WRITE_VTU_FILE
    Set   [vtk_out.f, 228]             WRITE_VTU_FILE
    Use   [vtk_out.f, 230]             WRITE_VTU_FILE

ltau_u_g    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_u_g.f, 112]       SOURCE_U_G
    Set   [source_u_g.f, 346]          SOURCE_U_G
    Use   [source_u_g.f, 353]          SOURCE_U_G

lTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [tau_u_g.f, 243]          CALC_CG_TAU_U_G
    Declare   [tau_u_g.f, 271]         CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 425]             CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 580]             CALC_CG_TAU_U_G
    Use Argument   [tau_u_g.f, 583]    CALC_CG_TAU_U_G
    Set   [tau_u_g.f, 585]             CALC_CG_TAU_U_G

lTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [tau_u_g.f, 51]           CALC_TAU_U_G
    Declare   [tau_u_g.f, 75]          CALC_TAU_U_G
    Set   [tau_u_g.f, 205]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 208]    CALC_TAU_U_G
    Set   [tau_u_g.f, 211]             CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 219]    CALC_TAU_U_G
    Use Argument   [tau_u_g.f, 222]    CALC_TAU_U_G

lTAU_U_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [tau_u_g.f, 603]          GET_FULL_TAU_U_G
    Declare   [tau_u_g.f, 628]         GET_FULL_TAU_U_G
    Use   [tau_u_g.f, 691]             GET_FULL_TAU_U_G

lTAU_U_s    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,DIMENSION_M) INTENT(OUT)
    Define   [tau_u_s.f, 20]           CALC_TAU_U_S
    Declare   [tau_u_s.f, 46]          CALC_TAU_U_S
    Set   [tau_u_s.f, 106]             CALC_TAU_U_S
    Set   [tau_u_s.f, 108]             CALC_TAU_U_S
    Use Argument   [tau_u_s.f, 124]    CALC_TAU_U_S

ltau_v_g    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_v_g.f, 113]       SOURCE_V_G
    Set   [source_v_g.f, 322]          SOURCE_V_G
    Use   [source_v_g.f, 345]          SOURCE_V_G

lTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [tau_v_g.f, 193]          CALC_CG_TAU_V_G
    Declare   [tau_v_g.f, 224]         CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 375]             CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 532]             CALC_CG_TAU_V_G
    Use Argument   [tau_v_g.f, 535]    CALC_CG_TAU_V_G
    Set   [tau_v_g.f, 537]             CALC_CG_TAU_V_G

lTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [tau_v_g.f, 35]           CALC_TAU_V_G
    Declare   [tau_v_g.f, 59]          CALC_TAU_V_G
    Set   [tau_v_g.f, 156]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 159]    CALC_TAU_V_G
    Set   [tau_v_g.f, 162]             CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 170]    CALC_TAU_V_G
    Use Argument   [tau_v_g.f, 173]    CALC_TAU_V_G

lTAU_V_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [tau_v_g.f, 555]          GET_FULL_TAU_V_G
    Declare   [tau_v_g.f, 577]         GET_FULL_TAU_V_G
    Use   [tau_v_g.f, 623]             GET_FULL_TAU_V_G

lTAU_V_s    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,DIMENSION_M) INTENT(OUT)
    Define   [tau_v_s.f, 19]           CALC_TAU_V_S
    Declare   [tau_v_s.f, 44]          CALC_TAU_V_S
    Set   [tau_v_s.f, 114]             CALC_TAU_V_S
    Set   [tau_v_s.f, 116]             CALC_TAU_V_S
    Use Argument   [tau_v_s.f, 123]    CALC_TAU_V_S

lTAU_w_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [tau_w_g.f, 256]          CALC_CG_TAU_w_G
    Declare   [tau_w_g.f, 284]         CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 429]             CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 581]             CALC_CG_TAU_w_G
    Use Argument   [tau_w_g.f, 584]    CALC_CG_TAU_w_G
    Set   [tau_w_g.f, 587]             CALC_CG_TAU_w_G

lTAU_w_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [tau_w_g.f, 61]           CALC_TAU_W_G
    Declare   [tau_w_g.f, 85]          CALC_TAU_W_G
    Set   [tau_w_g.f, 218]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 221]    CALC_TAU_W_G
    Set   [tau_w_g.f, 224]             CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 232]    CALC_TAU_W_G
    Use Argument   [tau_w_g.f, 235]    CALC_TAU_W_G

lTAU_W_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [tau_w_g.f, 605]          GET_FULL_TAU_W_G
    Declare   [tau_w_g.f, 631]         GET_FULL_TAU_W_G
    Use   [tau_w_g.f, 730]             GET_FULL_TAU_W_G

ltau_w_g    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [source_w_g.f, 117]       SOURCE_W_G
    Set   [source_w_g.f, 395]          SOURCE_W_G
    Use   [source_w_g.f, 408]          SOURCE_W_G

lTAU_W_s    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,DIMENSION_M) INTENT(OUT)
    Define   [tau_w_s.f, 18]           CALC_TAU_W_S
    Declare   [tau_w_s.f, 41]          CALC_TAU_W_S
    Set   [tau_w_s.f, 93]              CALC_TAU_W_S
    Set   [tau_w_s.f, 95]              CALC_TAU_W_S
    Use Argument   [tau_w_s.f, 103]    CALC_TAU_W_S

ltemp_array    (Local Variable)  Declared as: DOUBLE PRECISION (:,:) ALLOCATABLE
    Define   [write_des_data.f, 295]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 364]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 378]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 382]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 386]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 389]      WRITE_DES_TECPLOT
    Set   [write_des_data.f, 391]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 397]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 397]   WRITE_DES_TECPLOT
    Use   [write_des_data.f, 401]      WRITE_DES_TECPLOT
    Use Argument   [write_des_data.f, 401]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 405]      WRITE_DES_TECPLOT

lTg    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [des_thermo_conv.f, 39]   CONV_GS_DES1
    Set   [des_thermo_conv.f, 51]      CONV_GS_DES1
    Set   [des_thermo_conv.f, 54]      CONV_GS_DES1
    Use   [des_thermo_conv.f, 54]      CONV_GS_DES1
    Set   [des_thermo_conv.f, 58]      CONV_GS_DES1
    Use   [des_thermo_conv.f, 71]      CONV_GS_DES1
    Use   [des_thermo_conv.f, 80]      CONV_GS_DES1

lTg_ref    (Dummy Argument)  Declared as: DOUBLE PRECISION (NMAX) INTENT(OUT)
    Define   [calc_dif_g.f, 171]       SET_BINARY_DAB_GAS
    Declare   [calc_dif_g.f, 183]      SET_BINARY_DAB_GAS
    Set   [calc_dif_g.f, 205]          SET_BINARY_DAB_GAS

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

ltotvar    (Local Variable)  Declared as: INTEGER
    Define   [write_des_data.f, 294]   WRITE_DES_TECPLOT
    Set   [write_des_data.f, 302]      WRITE_DES_TECPLOT
    Use   [write_des_data.f, 364]      WRITE_DES_TECPLOT

lTp    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_rrates_des.f, 66]   CALC_RRATES_DES
    Set   [calc_rrates_des.f, 81]      CALC_RRATES_DES
    Use Argument   [calc_rrates_des.f, 141]   CALC_RRATES_DES
    Use Argument   [calc_rrates_des.f, 170]   CALC_RRATES_DES

ltrD_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(INOUT)
    Define   [calc_trd_g.f, 82]        CALC_CG_TRD_G
    Declare   [calc_trd_g.f, 105]      CALC_CG_TRD_G
    Set   [calc_trd_g.f, 133]          CALC_CG_TRD_G
    Set   [calc_trd_g.f, 169]          CALC_CG_TRD_G
    Set   [calc_trd_g.f, 172]          CALC_CG_TRD_G
    Set   [calc_trd_g.f, 175]          CALC_CG_TRD_G
    Set   [calc_trd_g.f, 278]          CALC_CG_TRD_G

ltrD_g    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(OUT)
    Define   [calc_trd_g.f, 10]        CALC_TRD_G
    Declare   [calc_trd_g.f, 29]       CALC_TRD_G
    Set   [calc_trd_g.f, 55]           CALC_TRD_G
    Use Argument   [calc_trd_g.f, 60]   CALC_TRD_G
    Set   [calc_trd_g.f, 64]           CALC_TRD_G

ltrD_s    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,DIMENSION_M) INTENT(INOUT)
    Define   [calc_trd_s.f, 84]        CALC_CG_TRD_S
    Declare   [calc_trd_s.f, 112]      CALC_CG_TRD_S
    Set   [calc_trd_s.f, 142]          CALC_CG_TRD_S
    Set   [calc_trd_s.f, 184]          CALC_CG_TRD_S
    Set   [calc_trd_s.f, 187]          CALC_CG_TRD_S
    Set   [calc_trd_s.f, 190]          CALC_CG_TRD_S
    Set   [calc_trd_s.f, 278]          CALC_CG_TRD_S

ltrD_s    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3,DIMENSION_M) INTENT(OUT)
    Define   [calc_trd_s.f, 10]        CALC_TRD_S
    Declare   [calc_trd_s.f, 30]       CALC_TRD_S
    Set   [calc_trd_s.f, 57]           CALC_TRD_S
    Use Argument   [calc_trd_s.f, 62]   CALC_TRD_S
    Set   [calc_trd_s.f, 66]           CALC_TRD_S

lU    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 204]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 207]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 210]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 216]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 216]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 221]              CALC_PS_VEL_MAG

lu1    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 950]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 968]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 995]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1056]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1060]   IJK_Pg_SEARCH

lu2    (Dummy Argument)  Declared as: INTEGER INTENT(IN)
    Define   [set_bc0.f, 950]          IJK_Pg_SEARCH
    Declare   [set_bc0.f, 967]         IJK_Pg_SEARCH
    Use   [set_bc0.f, 996]             IJK_Pg_SEARCH
    Use   [set_bc0.f, 1057]            IJK_Pg_SEARCH
    Use Argument   [set_bc0.f, 1063]   IJK_Pg_SEARCH

lUg    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [drag_gs_des1.f, 367]     CALC_CELL_CENTER_GAS_VEL
    Declare   [drag_gs_des1.f, 394]    CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 412]        CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 413]        CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 415]   CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 415]   CALC_CELL_CENTER_GAS_VEL

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

luk    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 19892]           nsfc
    Set   [ODEPACK.F, 19901]           nsfc
    Use   [ODEPACK.F, 19901]           nsfc
    Set   [ODEPACK.F, 19931]           nsfc
    Use   [ODEPACK.F, 19931]           nsfc
    Use   [ODEPACK.F, 19941]           nsfc
    Use   [ODEPACK.F, 19942]           nsfc
    Use   [ODEPACK.F, 19965]           nsfc
    Use   [ODEPACK.F, 19966]           nsfc
    Use   [ODEPACK.F, 19973]           nsfc
    Set   [ODEPACK.F, 19977]           nsfc
    Set   [ODEPACK.F, 19990]           nsfc
    Use   [ODEPACK.F, 19990]           nsfc
    Set   [ODEPACK.F, 20028]           nsfc
    Use   [ODEPACK.F, 20028]           nsfc
    Use   [ODEPACK.F, 20043]           nsfc
    Use   [ODEPACK.F, 20044]           nsfc
    Use   [ODEPACK.F, 20067]           nsfc
    Use   [ODEPACK.F, 20068]           nsfc
    Use   [ODEPACK.F, 20075]           nsfc

LUN    (Dummy Argument)  Declared as: INTEGER
    Define   [ODEPACK.F, 27423]        XSETUN
    Declare   [ODEPACK.F, 27448]       XSETUN
    Use   [ODEPACK.F, 27451]           XSETUN
    Use Argument   [ODEPACK.F, 27451]   XSETUN

LUN_1984    (Unknown Variable)
    Use   [calc_grbdry.f, 916]         CALC_GR_BOUNDARY.F_HW
    Use   [calc_grbdry.f, 1156]        CALC_GR_BOUNDARY.F_HW
    Use   [calc_grbdry.f, 1611]        CALC_GR_BOUNDARY.GET_CG_F2
    Use   [calc_grbdry.f, 1655]        CALC_GR_BOUNDARY.GET_CG_F2
    Use   [solve_granular_energy.f, 121]   SOLVE_GRANULAR_ENERGY
    Use   [drag_ss.f, 44]              DRAG_SS
    Use   [bc_theta.f, 882]            THETA_HW_CW
    Use   [bc_theta.f, 1211]           THETA_HW_CW
    Use   [calc_mu_s.f, 216]           CALC_DEFAULT_MUS
    Use   [check_solids_continuum.f, 535]   CHECK_KT_TYPE
    Use   [adjust_theta.f, 78]         ADJUST_THETA

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 797]    CPgErr_LOG
    Set   [physical_prop.f, 797]       CPgErr_LOG
    Use IO   [physical_prop.f, 810]    CPgErr_LOG
    Use IO   [physical_prop.f, 813]    CPgErr_LOG
    Use IO   [physical_prop.f, 818]    CPgErr_LOG
    Use IO   [physical_prop.f, 823]    CPgErr_LOG
    Use IO   [physical_prop.f, 827]    CPgErr_LOG
    Use IO   [physical_prop.f, 828]    CPgErr_LOG
    Use IO   [physical_prop.f, 829]    CPgErr_LOG
    Use IO   [physical_prop.f, 830]    CPgErr_LOG
    Use IO   [physical_prop.f, 831]    CPgErr_LOG
    Use IO   [physical_prop.f, 833]    CPgErr_LOG
    Use IO   [physical_prop.f, 835]    CPgErr_LOG
    Use IO   [physical_prop.f, 838]    CPgErr_LOG
    Use IO   [physical_prop.f, 839]    CPgErr_LOG
    Use IO   [physical_prop.f, 840]    CPgErr_LOG
    Use IO   [physical_prop.f, 844]    CPgErr_LOG

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 898]    CPsErr_LOG
    Set   [physical_prop.f, 898]       CPsErr_LOG
    Use IO   [physical_prop.f, 911]    CPsErr_LOG
    Use IO   [physical_prop.f, 914]    CPsErr_LOG
    Use IO   [physical_prop.f, 919]    CPsErr_LOG
    Use IO   [physical_prop.f, 924]    CPsErr_LOG
    Use IO   [physical_prop.f, 929]    CPsErr_LOG
    Use IO   [physical_prop.f, 930]    CPsErr_LOG
    Use IO   [physical_prop.f, 931]    CPsErr_LOG
    Use IO   [physical_prop.f, 932]    CPsErr_LOG
    Use IO   [physical_prop.f, 933]    CPsErr_LOG
    Use IO   [physical_prop.f, 935]    CPsErr_LOG
    Use IO   [physical_prop.f, 937]    CPsErr_LOG
    Use IO   [physical_prop.f, 940]    CPsErr_LOG
    Use IO   [physical_prop.f, 941]    CPsErr_LOG
    Use IO   [physical_prop.f, 942]    CPsErr_LOG
    Use IO   [physical_prop.f, 946]    CPsErr_LOG

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 598]    ROgErr_LOG
    Set   [physical_prop.f, 598]       ROgErr_LOG
    Use IO   [physical_prop.f, 610]    ROgErr_LOG
    Use IO   [physical_prop.f, 613]    ROgErr_LOG
    Use IO   [physical_prop.f, 618]    ROgErr_LOG
    Use IO   [physical_prop.f, 623]    ROgErr_LOG
    Use IO   [physical_prop.f, 627]    ROgErr_LOG
    Use IO   [physical_prop.f, 628]    ROgErr_LOG
    Use IO   [physical_prop.f, 629]    ROgErr_LOG
    Use IO   [physical_prop.f, 630]    ROgErr_LOG
    Use IO   [physical_prop.f, 632]    ROgErr_LOG
    Use IO   [physical_prop.f, 633]    ROgErr_LOG
    Use IO   [physical_prop.f, 634]    ROgErr_LOG
    Use IO   [physical_prop.f, 638]    ROgErr_LOG

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [physical_prop.f, 699]    ROsErr_LOG
    Set   [physical_prop.f, 699]       ROsErr_LOG
    Use IO   [physical_prop.f, 711]    ROsErr_LOG
    Use IO   [physical_prop.f, 714]    ROsErr_LOG
    Use IO   [physical_prop.f, 719]    ROsErr_LOG
    Use IO   [physical_prop.f, 724]    ROsErr_LOG
    Use IO   [physical_prop.f, 730]    ROsErr_LOG
    Use IO   [physical_prop.f, 731]    ROsErr_LOG
    Use IO   [physical_prop.f, 732]    ROsErr_LOG
    Use IO   [physical_prop.f, 733]    ROsErr_LOG
    Use IO   [physical_prop.f, 734]    ROsErr_LOG
    Use IO   [physical_prop.f, 737]    ROsErr_LOG
    Use IO   [physical_prop.f, 738]    ROsErr_LOG
    Use IO   [physical_prop.f, 739]    ROsErr_LOG
    Use IO   [physical_prop.f, 743]    ROsErr_LOG

lunit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [read_particle_input.f, 32]   READ_PAR_INPUT
    Set   [read_particle_input.f, 32]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 66]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 81]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 84]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 103]   READ_PAR_INPUT
    Use IO   [read_particle_input.f, 142]   READ_PAR_INPUT

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [calc_vol_fr.f, 306]      EPgErr_LOG
    Set   [calc_vol_fr.f, 306]         EPgErr_LOG
    Use IO   [calc_vol_fr.f, 319]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 322]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 326]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 331]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 335]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 336]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 338]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 341]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 343]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 345]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 348]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 350]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 352]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 355]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 358]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 360]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 363]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 365]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 367]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 370]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 372]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 374]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 377]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 379]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 381]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 384]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 386]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 388]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 391]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 393]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 395]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 398]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 402]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 403]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 404]      EPgErr_LOG
    Use IO   [calc_vol_fr.f, 408]      EPgErr_LOG

lUnit    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [set_ro_s.f, 135]         CHECK_SET_ROs
    Set   [set_ro_s.f, 135]            CHECK_SET_ROs
    Use IO   [set_ro_s.f, 168]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 170]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 177]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 184]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 186]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 191]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 192]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 193]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 199]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 202]         CHECK_SET_ROs
    Use IO   [set_ro_s.f, 207]         CHECK_SET_ROs

LUNIT    (Local Variable)  Declared as: INTEGER SAVE
    Define   [ODEPACK.F, 27505]        IXSAV
    Declare   [ODEPACK.F, 27510]       IXSAV
    Set   [ODEPACK.F, 27511]           IXSAV
    Use   [ODEPACK.F, 27515]           IXSAV
    Set   [ODEPACK.F, 27515]           IXSAV
    Use   [ODEPACK.F, 27516]           IXSAV
    Set   [ODEPACK.F, 27517]           IXSAV

LUNIT    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 27359]        XERRWD
    Set   [ODEPACK.F, 27364]           XERRWD
    Use IO   [ODEPACK.F, 27370]        XERRWD
    Use IO   [ODEPACK.F, 27372]        XERRWD
    Use IO   [ODEPACK.F, 27374]        XERRWD
    Use IO   [ODEPACK.F, 27376]        XERRWD
    Use IO   [ODEPACK.F, 27378]        XERRWD

lUpdate_avgTs    (Local Variable)  Declared as: INTEGER SAVE
    Define   [des_thermo_rad.f, 41]    DES_RADIATION
    Set   [des_thermo_rad.f, 41]       DES_RADIATION
    Use Argument   [des_thermo_rad.f, 49]   DES_RADIATION
    Set   [des_thermo_rad.f, 52]       DES_RADIATION
    Set   [des_thermo_rad.f, 54]       DES_RADIATION
    Use   [des_thermo_rad.f, 54]       DES_RADIATION

lUpdateFreq    (Local Variable)  Declared as: INTEGER PARAMETER
    Define   [des_thermo_rad.f, 40]    DES_RADIATION
    Set   [des_thermo_rad.f, 40]       DES_RADIATION
    Use Argument   [des_thermo_rad.f, 49]   DES_RADIATION

LV    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22367]        DSOLPK
    Set   [ODEPACK.F, 22378]           DSOLPK
    Use   [ODEPACK.F, 22379]           DSOLPK
    Use   [ODEPACK.F, 22385]           DSOLPK
    Set   [ODEPACK.F, 22400]           DSOLPK
    Use   [ODEPACK.F, 22401]           DSOLPK
    Use   [ODEPACK.F, 22409]           DSOLPK

lV    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 204]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 207]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 210]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 217]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 217]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 222]              CALC_PS_VEL_MAG

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

lVAR_SIZE    (Local Variable)  Declared as: INTEGER
    Define   [read_res0_des.f, 30]     READ_RES0_DES
    Use Argument   [read_res0_des.f, 70]   READ_RES0_DES
    Use   [read_res0_des.f, 71]        READ_RES0_DES
    Use   [read_res0_des.f, 72]        READ_RES0_DES

lVEL    (Dummy Argument)  Declared as: DOUBLE PRECISION (3) INTENT(IN)
    Define   [integrate_time_pic.f, 219]   AVG_VEL_wGRAV
    Declare   [integrate_time_pic.f, 226]   AVG_VEL_wGRAV
    Use Argument   [integrate_time_pic.f, 238]   AVG_VEL_wGRAV

lvel_s    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_bc1.f, 263]          SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 415]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 423]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 423]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 426]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 426]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 429]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 429]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 435]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 435]             SET_BC1_ADJUST_OUTFLOW
    Set   [set_bc1.f, 437]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 443]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 445]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 448]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 450]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 453]             SET_BC1_ADJUST_OUTFLOW
    Use   [set_bc1.f, 455]             SET_BC1_ADJUST_OUTFLOW

lvel_s    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [set_bc0.f, 398]          SET_BC0_INFLOW
    Set   [set_bc0.f, 467]             SET_BC0_INFLOW
    Set   [set_bc0.f, 485]             SET_BC0_INFLOW
    Use   [set_bc0.f, 485]             SET_BC0_INFLOW
    Set   [set_bc0.f, 487]             SET_BC0_INFLOW
    Use   [set_bc0.f, 487]             SET_BC0_INFLOW
    Set   [set_bc0.f, 489]             SET_BC0_INFLOW
    Use   [set_bc0.f, 489]             SET_BC0_INFLOW
    Set   [set_bc0.f, 497]             SET_BC0_INFLOW
    Use   [set_bc0.f, 497]             SET_BC0_INFLOW
    Use   [set_bc0.f, 502]             SET_BC0_INFLOW
    Use   [set_bc0.f, 505]             SET_BC0_INFLOW
    Use   [set_bc0.f, 508]             SET_BC0_INFLOW

lVELFP    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,DIMENSION_M) INTENT(OUT)
    Define   [drag_ss_dem_noninterp.f, 306]   CALC_CELL_CENTER_CSOLIDS_VEL
    Declare   [drag_ss_dem_noninterp.f, 336]   CALC_CELL_CENTER_CSOLIDS_VEL
    Set   [drag_ss_dem_noninterp.f, 351]   CALC_CELL_CENTER_CSOLIDS_VEL
    Set   [drag_ss_dem_noninterp.f, 354]   CALC_CELL_CENTER_CSOLIDS_VEL
    Set   [drag_ss_dem_noninterp.f, 359]   CALC_CELL_CENTER_CSOLIDS_VEL
    Set   [drag_ss_dem_noninterp.f, 362]   CALC_CELL_CENTER_CSOLIDS_VEL
    Set   [drag_ss_dem_noninterp.f, 368]   CALC_CELL_CENTER_CSOLIDS_VEL
    Set   [drag_ss_dem_noninterp.f, 371]   CALC_CELL_CENTER_CSOLIDS_VEL
    Set   [drag_ss_dem_noninterp.f, 374]   CALC_CELL_CENTER_CSOLIDS_VEL

lVelGradG    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_g.f, 519]       CALC_CG_DERIV_VEL_GAS
    Declare   [calc_trd_g.f, 545]      CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 571]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 582]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 618]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 621]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 624]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 676]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 677]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 678]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 727]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 728]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 729]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 783]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 784]          CALC_CG_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 785]          CALC_CG_DERIV_VEL_GAS
    Use   [calc_trd_g.f, 789]          CALC_CG_DERIV_VEL_GAS
    Use   [calc_trd_g.f, 789]          CALC_CG_DERIV_VEL_GAS

lVelGradG    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_g.f, 430]       CALC_DERIV_VEL_GAS
    Declare   [calc_trd_g.f, 444]      CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 469]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 470]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 471]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 473]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 474]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 475]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 477]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 478]          CALC_DERIV_VEL_GAS
    Set   [calc_trd_g.f, 479]          CALC_DERIV_VEL_GAS
    Use Argument   [calc_trd_g.f, 502]   CALC_DERIV_VEL_GAS

lVelGradS    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_s.f, 576]       CALC_CG_DERIV_VEL_SOLIDS
    Declare   [calc_trd_s.f, 604]      CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 633]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 644]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 686]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 689]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 692]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 745]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 746]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 747]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 796]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 797]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 798]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 853]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 854]          CALC_CG_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 855]          CALC_CG_DERIV_VEL_SOLIDS
    Use   [calc_trd_s.f, 859]          CALC_CG_DERIV_VEL_SOLIDS
    Use   [calc_trd_s.f, 859]          CALC_CG_DERIV_VEL_SOLIDS

lVelGradS    (Dummy Argument)  Declared as: DOUBLE PRECISION (3,3) INTENT(OUT)
    Define   [calc_trd_s.f, 484]       CALC_DERIV_VEL_SOLIDS
    Declare   [calc_trd_s.f, 500]      CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 526]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 527]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 528]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 530]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 531]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 532]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 534]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 535]          CALC_DERIV_VEL_SOLIDS
    Set   [calc_trd_s.f, 536]          CALC_DERIV_VEL_SOLIDS
    Use Argument   [calc_trd_s.f, 559]   CALC_DERIV_VEL_SOLIDS

lVg    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [drag_gs_des1.f, 367]     CALC_CELL_CENTER_GAS_VEL
    Declare   [drag_gs_des1.f, 395]    CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 420]        CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 421]        CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 423]   CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 423]   CALC_CELL_CENTER_GAS_VEL

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

lvi    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 19027]        mdp
    Set   [ODEPACK.F, 19062]           mdp
    Use   [ODEPACK.F, 19063]           mdp
    Use   [ODEPACK.F, 19074]           mdp
    Use   [ODEPACK.F, 19075]           mdp

lvk    (Local Variable)  Declared as: INTEGER (implicit)
    Set   [ODEPACK.F, 18924]           mdi
    Set   [ODEPACK.F, 18928]           mdi
    Use   [ODEPACK.F, 18928]           mdi
    Use   [ODEPACK.F, 18929]           mdi

LW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22367]        DSOLPK
    Set   [ODEPACK.F, 22425]           DSOLPK
    Use   [ODEPACK.F, 22426]           DSOLPK
    Use   [ODEPACK.F, 22430]           DSOLPK
    Set   [ODEPACK.F, 22445]           DSOLPK
    Use   [ODEPACK.F, 22446]           DSOLPK
    Use   [ODEPACK.F, 22450]           DSOLPK

lW    (Dummy Argument)  Declared as: DOUBLE PRECISION INTENT(INOUT)
    Define   [set_ps.f, 204]           CALC_PS_VEL_MAG
    Declare   [set_ps.f, 207]          CALC_PS_VEL_MAG
    Use   [set_ps.f, 211]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 218]              CALC_PS_VEL_MAG
    Use   [set_ps.f, 218]              CALC_PS_VEL_MAG
    Set   [set_ps.f, 223]              CALC_PS_VEL_MAG

LWARN    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 10174]        DLSODKR
    Set   [ODEPACK.F, 10522]           DLSODKR
    Use   [ODEPACK.F, 10523]           DLSODKR

LWARN    (Local Variable)  Declared as: LOGICAL
    Define   [ODEPACK.F, 8329]         DLSODPK
    Set   [ODEPACK.F, 8652]            DLSODPK
    Use   [ODEPACK.F, 8653]            DLSODPK

lWg    (Dummy Argument)  Declared as: DOUBLE PRECISION (DIMENSION_3) INTENT(IN)
    Define   [drag_gs_des1.f, 367]     CALC_CELL_CENTER_GAS_VEL
    Declare   [drag_gs_des1.f, 396]    CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 429]        CALC_CELL_CENTER_GAS_VEL
    Use   [drag_gs_des1.f, 430]        CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 432]   CALC_CELL_CENTER_GAS_VEL
    Use Argument   [drag_gs_des1.f, 432]   CALC_CELL_CENTER_GAS_VEL

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

LWK    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22367]        DSOLPK
    Set   [ODEPACK.F, 22381]           DSOLPK
    Use   [ODEPACK.F, 22386]           DSOLPK
    Set   [ODEPACK.F, 22404]           DSOLPK
    Use   [ODEPACK.F, 22405]           DSOLPK
    Use   [ODEPACK.F, 22410]           DSOLPK
    Set   [ODEPACK.F, 22427]           DSOLPK
    Use   [ODEPACK.F, 22431]           DSOLPK
    Set   [ODEPACK.F, 22447]           DSOLPK
    Use   [ODEPACK.F, 22451]           DSOLPK
    Set   [ODEPACK.F, 22465]           DSOLPK
    Use   [ODEPACK.F, 22468]           DSOLPK

LWP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10163]        DLSODKR
    Set   [ODEPACK.F, 10319]           DLSODKR
    Set   [ODEPACK.F, 10320]           DLSODKR
    Use   [ODEPACK.F, 10321]           DLSODKR

LWP    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 8320]         DLSODPK
    Set   [ODEPACK.F, 8447]            DLSODPK
    Set   [ODEPACK.F, 8448]            DLSODPK
    Use   [ODEPACK.F, 8449]            DLSODPK

LWTEM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3018]         DLSODES
    Set   [ODEPACK.F, 3192]            DLSODES
    Set   [ODEPACK.F, 3193]            DLSODES
    Use   [ODEPACK.F, 3194]            DLSODES
    Use   [ODEPACK.F, 3195]            DLSODES

LWTEM    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 15986]           DLSODIS
    Use   [ODEPACK.F, 15987]           DLSODIS
    Use   [ODEPACK.F, 15988]           DLSODIS

LXE    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 45]        CFWALLCONTACT
    Use   [cfwallcontact.f, 85]        CFWALLCONTACT

lXgN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [calc_dif_g.f, 88]        CALC_DEFAULT_DIF_GAS
    Set   [calc_dif_g.f, 117]          CALC_DEFAULT_DIF_GAS
    Use   [calc_dif_g.f, 119]          CALC_DEFAULT_DIF_GAS

LXW    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 46]        CFWALLCONTACT
    Use   [cfwallcontact.f, 78]        CFWALLCONTACT

LYD0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 12032]        DLSODI
    Set   [ODEPACK.F, 12204]           DLSODI
    Use   [ODEPACK.F, 12208]           DLSODI
    Use   [ODEPACK.F, 12219]           DLSODI
    Use   [ODEPACK.F, 12261]           DLSODI
    Use   [ODEPACK.F, 12272]           DLSODI
    Use   [ODEPACK.F, 12272]           DLSODI
    Set   [ODEPACK.F, 12491]           DLSODI
    Use   [ODEPACK.F, 12493]           DLSODI

LYD0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 16037]           DLSODIS
    Set   [ODEPACK.F, 16077]           DLSODIS
    Use   [ODEPACK.F, 16079]           DLSODIS
    Set   [ODEPACK.F, 16099]           DLSODIS
    Use   [ODEPACK.F, 16102]           DLSODIS
    Use   [ODEPACK.F, 16160]           DLSODIS
    Use   [ODEPACK.F, 16171]           DLSODIS
    Use   [ODEPACK.F, 16171]           DLSODIS
    Set   [ODEPACK.F, 16406]           DLSODIS
    Use   [ODEPACK.F, 16408]           DLSODIS

LYD0    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 13834]        DLSOIBT
    Set   [ODEPACK.F, 14003]           DLSOIBT
    Use   [ODEPACK.F, 14007]           DLSOIBT
    Use   [ODEPACK.F, 14018]           DLSOIBT
    Use   [ODEPACK.F, 14060]           DLSOIBT
    Use   [ODEPACK.F, 14071]           DLSOIBT
    Use   [ODEPACK.F, 14071]           DLSOIBT
    Set   [ODEPACK.F, 14290]           DLSOIBT
    Use   [ODEPACK.F, 14292]           DLSOIBT

LYHD    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 17824]        DIPREP
    Set   [ODEPACK.F, 17847]           DIPREP
    Use   [ODEPACK.F, 17848]           DIPREP
    Use   [ODEPACK.F, 17851]           DIPREP

LYHD    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26057]        DIPREPI
    Set   [ODEPACK.F, 26080]           DIPREPI
    Use   [ODEPACK.F, 26081]           DIPREPI
    Use   [ODEPACK.F, 26084]           DIPREPI

LYHD    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3018]         DLSODES
    Set   [ODEPACK.F, 3210]            DLSODES
    Use   [ODEPACK.F, 3213]            DLSODES
    Use   [ODEPACK.F, 3216]            DLSODES
    Use   [ODEPACK.F, 3218]            DLSODES
    Use   [ODEPACK.F, 3220]            DLSODES

LYHD    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 16003]           DLSODIS
    Use   [ODEPACK.F, 16006]           DLSODIS
    Use   [ODEPACK.F, 16009]           DLSODIS
    Use   [ODEPACK.F, 16011]           DLSODIS
    Use   [ODEPACK.F, 16013]           DLSODIS

LYHN    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 17824]        DIPREP
    Set   [ODEPACK.F, 17845]           DIPREP
    Use   [ODEPACK.F, 17846]           DIPREP
    Use   [ODEPACK.F, 17847]           DIPREP
    Use   [ODEPACK.F, 17849]           DIPREP
    Use   [ODEPACK.F, 17850]           DIPREP
    Use   [ODEPACK.F, 17852]           DIPREP

LYHN    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 26057]        DIPREPI
    Set   [ODEPACK.F, 26078]           DIPREPI
    Use   [ODEPACK.F, 26079]           DIPREPI
    Use   [ODEPACK.F, 26080]           DIPREPI
    Use   [ODEPACK.F, 26082]           DIPREPI
    Use   [ODEPACK.F, 26083]           DIPREPI
    Use   [ODEPACK.F, 26085]           DIPREPI

LYHN    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 3018]         DLSODES
    Set   [ODEPACK.F, 3195]            DLSODES
    Use   [ODEPACK.F, 3196]            DLSODES
    Use   [ODEPACK.F, 3210]            DLSODES
    Use   [ODEPACK.F, 3211]            DLSODES
    Use   [ODEPACK.F, 3214]            DLSODES
    Use   [ODEPACK.F, 3215]            DLSODES
    Use   [ODEPACK.F, 3219]            DLSODES
    Use   [ODEPACK.F, 3222]            DLSODES
    Use   [ODEPACK.F, 3264]            DLSODES

LYHN    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 15804]        DLSODIS
    Set   [ODEPACK.F, 15988]           DLSODIS
    Use   [ODEPACK.F, 15989]           DLSODIS
    Use   [ODEPACK.F, 16003]           DLSODIS
    Use   [ODEPACK.F, 16004]           DLSODIS
    Use   [ODEPACK.F, 16007]           DLSODIS
    Use   [ODEPACK.F, 16008]           DLSODIS
    Use   [ODEPACK.F, 16012]           DLSODIS
    Use   [ODEPACK.F, 16015]           DLSODIS
    Use   [ODEPACK.F, 16062]           DLSODIS

LYHNEW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 6486]         DLSODAR
    Set   [ODEPACK.F, 6623]            DLSODAR
    Use   [ODEPACK.F, 6624]            DLSODAR
    Use   [ODEPACK.F, 6625]            DLSODAR
    Use   [ODEPACK.F, 6628]            DLSODAR
    Use   [ODEPACK.F, 6630]            DLSODAR
    Use   [ODEPACK.F, 6631]            DLSODAR
    Use   [ODEPACK.F, 6632]            DLSODAR
    Use   [ODEPACK.F, 6634]            DLSODAR
    Use   [ODEPACK.F, 6635]            DLSODAR

LYHNEW    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 10165]        DLSODKR
    Set   [ODEPACK.F, 10301]           DLSODKR
    Use   [ODEPACK.F, 10302]           DLSODKR
    Use   [ODEPACK.F, 10303]           DLSODKR
    Use   [ODEPACK.F, 10306]           DLSODKR
    Use   [ODEPACK.F, 10308]           DLSODKR
    Use   [ODEPACK.F, 10309]           DLSODKR
    Use   [ODEPACK.F, 10310]           DLSODKR

LYN    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 47]        CFWALLCONTACT
    Use   [cfwallcontact.f, 95]        CFWALLCONTACT

LYS    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 48]        CFWALLCONTACT
    Use   [cfwallcontact.f, 90]        CFWALLCONTACT

LZ    (Local Variable)  Declared as: INTEGER
    Define   [ODEPACK.F, 22367]        DSOLPK
    Set   [ODEPACK.F, 22426]           DSOLPK
    Use   [ODEPACK.F, 22427]           DSOLPK
    Use   [ODEPACK.F, 22430]           DSOLPK
    Set   [ODEPACK.F, 22446]           DSOLPK
    Use   [ODEPACK.F, 22447]           DSOLPK
    Use   [ODEPACK.F, 22450]           DSOLPK

LZB    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 50]        CFWALLCONTACT
    Use   [cfwallcontact.f, 100]       CFWALLCONTACT

LZT    (Local Variable)  Declared as: DOUBLE PRECISION
    Define   [cfwallcontact.f, 39]     CFWALLCONTACT
    Set   [cfwallcontact.f, 49]        CFWALLCONTACT
    Use   [cfwallcontact.f, 105]       CFWALLCONTACT

Non-AlphaABCDEFGHIJKLMNOPQRSTUVWXYZ