| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_getobcsn.F |
106 |
CTRL_GETOBCSN |
vbaro = 0.d0 |
|
./pkg/ctrl/ctrl_getobcsn.F |
146 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
154 |
CTRL_GETOBCSN |
vbaro = shiftvel(1) |
|
./pkg/ctrl/ctrl_getobcsn.F |
170 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcsn.F |
190 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
208 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcsn.F |
276 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
282 |
CTRL_GETOBCSN |
print*,'correct vbaro',vbaro |
|
./pkg/ctrl/ctrl_getobcsn.F |
285 |
CTRL_GETOBCSN |
vbaro = shiftvel(2) |
|
./pkg/ctrl/ctrl_getobcsn.F |
301 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcsn.F |
320 |
CTRL_GETOBCSN |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcsn.F |
338 |
CTRL_GETOBCSN |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcsn.F |
79 |
CTRL_GETOBCSN |
_RL vbaro |
|
./pkg/ctrl/ctrl_getobcss.F |
103 |
CTRL_GETOBCSS |
vbaro = 0.d0 |
|
./pkg/ctrl/ctrl_getobcss.F |
144 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
159 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcss.F |
180 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
195 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcss.F |
263 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
278 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcss.F |
299 |
CTRL_GETOBCSS |
vbaro = tmpfldxz(i,1,bi,bj) |
|
./pkg/ctrl/ctrl_getobcss.F |
314 |
CTRL_GETOBCSS |
tmpfldxz(i,k,bi,bj) = tmpfldxz(i,k,bi,bj)+ vbaro |
|
./pkg/ctrl/ctrl_getobcss.F |
80 |
CTRL_GETOBCSS |
_RL vbaro |