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 |