| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_drifter.F |
215 |
COST_DRIFTER |
masktmp(i,j,bi,bj) = |
|
./pkg/ecco/cost_drifter.F |
222 |
COST_DRIFTER |
if ( masktmp(i,j,bi,bj) .eq. 0.0 ) then |
|
./pkg/ecco/cost_drifter.F |
238 |
COST_DRIFTER |
& / ( masktmp(i,j,bi,bj) ) |
|
./pkg/ecco/cost_drifter.F |
245 |
COST_DRIFTER |
masktmp(i,j,bi,bj) = |
|
./pkg/ecco/cost_drifter.F |
252 |
COST_DRIFTER |
if ( masktmp(i,j,bi,bj) .eq.0.0 ) then |
|
./pkg/ecco/cost_drifter.F |
268 |
COST_DRIFTER |
& / ( masktmp(i,j,bi,bj) ) |
|
./pkg/ecco/cost_drifter.F |
87 |
COST_DRIFTER |
_RL masktmp(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |