| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_drifter.F |
216 |
COST_DRIFTER |
masktmp(i,j,bi,bj) = |
|
./pkg/ecco/cost_drifter.F |
223 |
COST_DRIFTER |
if ( masktmp(i,j,bi,bj) .eq. 0.0 ) then |
|
./pkg/ecco/cost_drifter.F |
239 |
COST_DRIFTER |
& / ( masktmp(i,j,bi,bj) ) |
|
./pkg/ecco/cost_drifter.F |
246 |
COST_DRIFTER |
masktmp(i,j,bi,bj) = |
|
./pkg/ecco/cost_drifter.F |
253 |
COST_DRIFTER |
if ( masktmp(i,j,bi,bj) .eq.0.0 ) then |
|
./pkg/ecco/cost_drifter.F |
269 |
COST_DRIFTER |
& / ( masktmp(i,j,bi,bj) ) |
|
./pkg/ecco/cost_drifter.F |
88 |
COST_DRIFTER |
_RL masktmp(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |