Symbol Description Uses
tmpA 40



File Line number Procedure Code
./pkg/obcs/obcs_balance_flow.F 101 OBCS_BALANCE_FLOW
            tmpA = drF(k)*hFacW(iB,j,k,bi,bj)*dyG(iB,j,bi,bj)
./pkg/obcs/obcs_balance_flow.F 103 OBCS_BALANCE_FLOW
            tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_balance_flow.F 104 OBCS_BALANCE_FLOW
            tileFlow(bi,bj) = tileFlow(bi,bj) + tmpA*OBEu(j,k,bi,bj)
./pkg/obcs/obcs_balance_flow.F 150 OBCS_BALANCE_FLOW
            tmpA = drF(k)*hFacW(1+iB,j,k,bi,bj)*dyG(1+iB,j,bi,bj)
./pkg/obcs/obcs_balance_flow.F 152 OBCS_BALANCE_FLOW
            tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_balance_flow.F 153 OBCS_BALANCE_FLOW
            tileFlow(bi,bj) = tileFlow(bi,bj) + tmpA*OBWu(j,k,bi,bj)
./pkg/obcs/obcs_balance_flow.F 199 OBCS_BALANCE_FLOW
            tmpA = drF(k)*hFacS(i,jB,k,bi,bj)*dxG(i,jB,bi,bj)
./pkg/obcs/obcs_balance_flow.F 201 OBCS_BALANCE_FLOW
            tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_balance_flow.F 202 OBCS_BALANCE_FLOW
            tileFlow(bi,bj) = tileFlow(bi,bj) + tmpA*OBNv(i,k,bi,bj)
./pkg/obcs/obcs_balance_flow.F 248 OBCS_BALANCE_FLOW
            tmpA = drF(k)*hFacS(i,1+jB,k,bi,bj)*dxG(i,1+jB,bi,bj)
./pkg/obcs/obcs_balance_flow.F 250 OBCS_BALANCE_FLOW
            tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_balance_flow.F 251 OBCS_BALANCE_FLOW
            tileFlow(bi,bj) = tileFlow(bi,bj) + tmpA*OBSv(i,k,bi,bj)
./pkg/obcs/obcs_balance_flow.F 50 OBCS_BALANCE_FLOW
      _RL areaOB, areaE, areaW, areaN, areaS, tmpA
./pkg/obcs/obcs_diag_balance.F 120 OBCS_DIAG_BALANCE
              tmpA = drF(k)*hFacW(iB,j,k,bi,bj)*dyG(iB,j,bi,bj)
./pkg/obcs/obcs_diag_balance.F 122 OBCS_DIAG_BALANCE
              tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA
./pkg/obcs/obcs_diag_balance.F 142 OBCS_DIAG_BALANCE
              tmpA = drF(k)*hFacS(i,jB,k,bi,bj)*dxG(i,jB,bi,bj)
./pkg/obcs/obcs_diag_balance.F 144 OBCS_DIAG_BALANCE
              tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA
./pkg/obcs/obcs_diag_balance.F 165 OBCS_DIAG_BALANCE
              tmpA = drF(k)*hFacS(i,jB,k,bi,bj)*dxG(i,jB,bi,bj)
./pkg/obcs/obcs_diag_balance.F 167 OBCS_DIAG_BALANCE
              tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA
./pkg/obcs/obcs_diag_balance.F 65 OBCS_DIAG_BALANCE
      _RL areaOB(OBCS_maxConnect), tmpA
./pkg/obcs/obcs_diag_balance.F 97 OBCS_DIAG_BALANCE
              tmpA = drF(k)*hFacW(iB,j,k,bi,bj)*dyG(iB,j,bi,bj)
./pkg/obcs/obcs_diag_balance.F 99 OBCS_DIAG_BALANCE
              tileAreaOB(bi,bj,n) = tileAreaOB(bi,bj,n) + tmpA
./pkg/obcs/obcs_mon_stats.F 123 OBCS_MON_STATS_EW_RL
              tmpA = arrDy(iB,j,bi,bj)*arrDr(k)*tmpMask
./pkg/obcs/obcs_mon_stats.F 131 OBCS_MON_STATS_EW_RL
              tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_mon_stats.F 132 OBCS_MON_STATS_EW_RL
              tileMean(bi,bj) = tileMean(bi,bj) + tmpA*tmpV
./pkg/obcs/obcs_mon_stats.F 133 OBCS_MON_STATS_EW_RL
              tileVar (bi,bj) = tileVar (bi,bj) + tmpA*tmpV*tmpV
./pkg/obcs/obcs_mon_stats.F 196 OBCS_MON_STATS_EW_RL
              tmpA = arrDy(iB,j,bi,bj)*arrDr(k)*tmpMask
./pkg/obcs/obcs_mon_stats.F 204 OBCS_MON_STATS_EW_RL
              tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_mon_stats.F 205 OBCS_MON_STATS_EW_RL
              tileMean(bi,bj) = tileMean(bi,bj) + tmpA*tmpV
./pkg/obcs/obcs_mon_stats.F 206 OBCS_MON_STATS_EW_RL
              tileVar (bi,bj) = tileVar (bi,bj) + tmpA*tmpV*tmpV
./pkg/obcs/obcs_mon_stats.F 316 OBCS_MON_STATS_NS_RL
      _RL tmpA, tmpV, tmpMask
./pkg/obcs/obcs_mon_stats.F 355 OBCS_MON_STATS_NS_RL
              tmpA = arrDx(i,jB,bi,bj)*arrDr(k)*tmpMask
./pkg/obcs/obcs_mon_stats.F 363 OBCS_MON_STATS_NS_RL
              tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_mon_stats.F 364 OBCS_MON_STATS_NS_RL
              tileMean(bi,bj) = tileMean(bi,bj) + tmpA*tmpV
./pkg/obcs/obcs_mon_stats.F 365 OBCS_MON_STATS_NS_RL
              tileVar (bi,bj) = tileVar (bi,bj) + tmpA*tmpV*tmpV
./pkg/obcs/obcs_mon_stats.F 428 OBCS_MON_STATS_NS_RL
              tmpA = arrDx(i,jB,bi,bj)*arrDr(k)*tmpMask
./pkg/obcs/obcs_mon_stats.F 436 OBCS_MON_STATS_NS_RL
              tileArea(bi,bj) = tileArea(bi,bj) + tmpA
./pkg/obcs/obcs_mon_stats.F 437 OBCS_MON_STATS_NS_RL
              tileMean(bi,bj) = tileMean(bi,bj) + tmpA*tmpV
./pkg/obcs/obcs_mon_stats.F 438 OBCS_MON_STATS_NS_RL
              tileVar (bi,bj) = tileVar (bi,bj) + tmpA*tmpV*tmpV
./pkg/obcs/obcs_mon_stats.F 84 OBCS_MON_STATS_EW_RL
      _RL tmpA, tmpV, tmpMask