Symbol Description Uses
Ar 13



File Line number Procedure Code
./pkg/obcs/obcs_calc.F 446 OBCS_CALC
            Ar = drF(k)*hFacC(I_obc,j,k,bi,bj)*dyG(I_obc,j,bi,bj)
./pkg/obcs/obcs_calc.F 447 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 448 OBCS_CALC
            Tr_T = Tr_T + Ar * OBEu(J,K,bi,bj)
./pkg/obcs/obcs_calc.F 483 OBCS_CALC
            Ar = drF(k)*hFacC(I_obc,j,k,bi,bj)*dyG(I_obc,j,bi,bj)
./pkg/obcs/obcs_calc.F 484 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 485 OBCS_CALC
            Tr_T = Tr_T + Ar * OBWu(J,K,bi,bj)
./pkg/obcs/obcs_calc.F 520 OBCS_CALC
            Ar = drF(k)*hFacC(i,J_obc,k,bi,bj)*dxG(i,J_obc,bi,bj)
./pkg/obcs/obcs_calc.F 521 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 522 OBCS_CALC
            Tr_T = Tr_T + Ar * OBNv(I,K,bi,bj)
./pkg/obcs/obcs_calc.F 54 OBCS_CALC
      _RL Tr_T, Ar_T, Ar
./pkg/obcs/obcs_calc.F 557 OBCS_CALC
            Ar = drF(k)*hFacC(i,J_obc,k,bi,bj)*dxG(i,J_obc,bi,bj)
./pkg/obcs/obcs_calc.F 558 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 559 OBCS_CALC
            Tr_T = Tr_T + Ar * OBSv(I,K,bi,bj)