| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_volflux.F |
289 |
CTRL_VOLFLUX |
if (ob_jn(i,bi,bj).ne.j.and. ob_js(i,bi,bj).ne.j)then |
|
./pkg/ctrl/ctrl_volflux.F |
297 |
CTRL_VOLFLUX |
if (ob_jn(i,bi,bj).eq.(j+1) .and. |
|
./pkg/ctrl/ctrl_volflux.F |
298 |
CTRL_VOLFLUX |
& ob_jn(i,bi,bj).ne. 0) then |
|
./pkg/ctrl/ctrl_volflux.F |
351 |
CTRL_VOLFLUX |
if (ob_jn(i,bi,bj).ne.j .and.ob_js(i,bi,bj).ne.j)then |
|
./pkg/ctrl/ctrl_volflux.F |
360 |
CTRL_VOLFLUX |
if (ob_jn(i,bi,bj).eq.(j+1) .and. |
|
./pkg/ctrl/ctrl_volflux.F |
361 |
CTRL_VOLFLUX |
& ob_jn(i,bi,bj).ne. 0) then |