| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_getobcse.F |
102 |
CTRL_GETOBCSE |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcse.F |
145 |
CTRL_GETOBCSE |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcse.F |
154 |
CTRL_GETOBCSE |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcse.F |
155 |
CTRL_GETOBCSE |
& maskW(i+ip1,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcse.F |
163 |
CTRL_GETOBCSE |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcse.F |
180 |
CTRL_GETOBCSE |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcse.F |
189 |
CTRL_GETOBCSE |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcse.F |
190 |
CTRL_GETOBCSE |
& maskS(i,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcse.F |
198 |
CTRL_GETOBCSE |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcse.F |
263 |
CTRL_GETOBCSE |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcse.F |
272 |
CTRL_GETOBCSE |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcse.F |
273 |
CTRL_GETOBCSE |
& maskW(i+ip1,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcse.F |
281 |
CTRL_GETOBCSE |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcse.F |
298 |
CTRL_GETOBCSE |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcse.F |
307 |
CTRL_GETOBCSE |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcse.F |
308 |
CTRL_GETOBCSE |
& maskS(i,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcse.F |
316 |
CTRL_GETOBCSE |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcse.F |
79 |
CTRL_GETOBCSE |
_RL utop |
|
./pkg/ctrl/ctrl_getobcsw.F |
103 |
CTRL_GETOBCSW |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcsw.F |
145 |
CTRL_GETOBCSW |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcsw.F |
154 |
CTRL_GETOBCSW |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcsw.F |
155 |
CTRL_GETOBCSW |
& maskW(i+ip1,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcsw.F |
163 |
CTRL_GETOBCSW |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcsw.F |
180 |
CTRL_GETOBCSW |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcsw.F |
189 |
CTRL_GETOBCSW |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcsw.F |
190 |
CTRL_GETOBCSW |
& maskS(i,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcsw.F |
198 |
CTRL_GETOBCSW |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcsw.F |
266 |
CTRL_GETOBCSW |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcsw.F |
275 |
CTRL_GETOBCSW |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcsw.F |
276 |
CTRL_GETOBCSW |
& maskW(i+ip1,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcsw.F |
284 |
CTRL_GETOBCSW |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcsw.F |
301 |
CTRL_GETOBCSW |
utop = 0.d0 |
|
./pkg/ctrl/ctrl_getobcsw.F |
310 |
CTRL_GETOBCSW |
utop = tmpfldyz(j,k,bi,bj)* |
|
./pkg/ctrl/ctrl_getobcsw.F |
311 |
CTRL_GETOBCSW |
& maskS(i,j,k,bi,bj) * delR(k) + utop |
|
./pkg/ctrl/ctrl_getobcsw.F |
319 |
CTRL_GETOBCSW |
& - utop / delR(1) |
|
./pkg/ctrl/ctrl_getobcsw.F |
80 |
CTRL_GETOBCSW |
_RL utop |