| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_calc.F |
212 |
OBCS_CALC |
Ar = drF(k)*hFacC(I_obc,j,k,bi,bj)*dyG(I_obc,j,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
213 |
OBCS_CALC |
Ar_T = Ar_T + Ar |
|
./pkg/obcs/obcs_calc.F |
214 |
OBCS_CALC |
Tr_T = Tr_T + Ar * OBEu(J,K,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
239 |
OBCS_CALC |
Ar = drF(k)*hFacC(I_obc,j,k,bi,bj)*dyG(I_obc,j,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
240 |
OBCS_CALC |
Ar_T = Ar_T + Ar |
|
./pkg/obcs/obcs_calc.F |
241 |
OBCS_CALC |
Tr_T = Tr_T + Ar * OBWu(J,K,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
266 |
OBCS_CALC |
Ar = drF(k)*hFacC(i,J_obc,k,bi,bj)*dxG(i,J_obc,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
267 |
OBCS_CALC |
Ar_T = Ar_T + Ar |
|
./pkg/obcs/obcs_calc.F |
268 |
OBCS_CALC |
Tr_T = Tr_T + Ar * OBNv(I,K,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
293 |
OBCS_CALC |
Ar = drF(k)*hFacC(i,J_obc,k,bi,bj)*dxG(i,J_obc,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
294 |
OBCS_CALC |
Ar_T = Ar_T + Ar |
|
./pkg/obcs/obcs_calc.F |
295 |
OBCS_CALC |
Tr_T = Tr_T + Ar * OBSv(I,K,bi,bj) |
|
./pkg/obcs/obcs_calc.F |
40 |
OBCS_CALC |
_RL Tr_T, Ar_T, Tr, Ar |