Symbol Description Uses
Ar 13



File Line number Procedure Code
./pkg/obcs/obcs_calc.F 385 OBCS_CALC
            Ar = drF(k)*hFacC(I_obc,j,k,bi,bj)*dyG(I_obc,j,bi,bj)
./pkg/obcs/obcs_calc.F 386 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 387 OBCS_CALC
            Tr_T = Tr_T + Ar * OBEu(J,K,bi,bj)
./pkg/obcs/obcs_calc.F 422 OBCS_CALC
            Ar = drF(k)*hFacC(I_obc,j,k,bi,bj)*dyG(I_obc,j,bi,bj)
./pkg/obcs/obcs_calc.F 423 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 424 OBCS_CALC
            Tr_T = Tr_T + Ar * OBWu(J,K,bi,bj)
./pkg/obcs/obcs_calc.F 459 OBCS_CALC
            Ar = drF(k)*hFacC(i,J_obc,k,bi,bj)*dxG(i,J_obc,bi,bj)
./pkg/obcs/obcs_calc.F 460 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 461 OBCS_CALC
            Tr_T = Tr_T + Ar * OBNv(I,K,bi,bj)
./pkg/obcs/obcs_calc.F 496 OBCS_CALC
            Ar = drF(k)*hFacC(i,J_obc,k,bi,bj)*dxG(i,J_obc,bi,bj)
./pkg/obcs/obcs_calc.F 497 OBCS_CALC
            Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 498 OBCS_CALC
            Tr_T = Tr_T + Ar * OBSv(I,K,bi,bj)
./pkg/obcs/obcs_calc.F 51 OBCS_CALC
      _RL Tr_T, Ar_T, Ar