| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_obcs_ageos.F |
280 |
COST_OBCS_AGEOS |
j = ob_js(i,bi,bj) |
|
./pkg/ecco/cost_obcs_ageos.F |
302 |
COST_OBCS_AGEOS |
j = ob_js(i,bi,bj) |
|
./pkg/ecco/cost_obcs_ageos.F |
312 |
COST_OBCS_AGEOS |
j = ob_js(i,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
257 |
CTRL_OBCSVOL |
if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then |
|
./pkg/ctrl/ctrl_obcsvol.F |
293 |
CTRL_OBCSVOL |
if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then |
|
./pkg/ctrl/ctrl_obcsvol.F |
415 |
CTRL_OBCSVOL |
if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then |
|
./pkg/ctrl/ctrl_obcsvol.F |
451 |
CTRL_OBCSVOL |
if (ob_jn(i,bi,bj).ne.j .and. ob_js(i,bi,bj).ne.j)then |
|
./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 |
351 |
CTRL_VOLFLUX |
if (ob_jn(i,bi,bj).ne.j .and.ob_js(i,bi,bj).ne.j)then |