| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_drifter.F |
160 |
COST_DRIFTER |
udmod(i,j,bi,bj)=ubar(i,j,k,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
163 |
COST_DRIFTER |
udmod(i,j,bi,bj)=udmod(i,j,bi,bj)/float(nmonsrec) |
|
./pkg/ecco/cost_drifter.F |
166 |
COST_DRIFTER |
udmod(i,j,bi,bj)=udmod(i,j,bi,bj)+ubar(i,j,k,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
223 |
COST_DRIFTER |
& udmod(i,j,bi,bj)*mask13c(i,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
224 |
COST_DRIFTER |
& + udmod(i+1,j,bi,bj)*mask13c(i+1,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
225 |
COST_DRIFTER |
& + udmod(i+2,j,bi,bj)*mask13c(i+2,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
226 |
COST_DRIFTER |
& + udmod(i+3,j,bi,bj)*mask13c(i+3,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
227 |
COST_DRIFTER |
& + udmod(i+4,j,bi,bj)*mask13c(i+4,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
228 |
COST_DRIFTER |
& + udmod(i+5,j,bi,bj)*mask13c(i+5,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
229 |
COST_DRIFTER |
& + udmod(i,j+1,bi,bj)*mask13c(i,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
230 |
COST_DRIFTER |
& + udmod(i+1,j+1,bi,bj)*mask13c(i+1,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
231 |
COST_DRIFTER |
& + udmod(i+2,j+1,bi,bj)*mask13c(i+2,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
232 |
COST_DRIFTER |
& + udmod(i+3,j+1,bi,bj)*mask13c(i+3,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
233 |
COST_DRIFTER |
& + udmod(i+4,j+1,bi,bj)*mask13c(i+4,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
234 |
COST_DRIFTER |
& + udmod(i+5,j+1,bi,bj)*mask13c(i+5,j+1,bi,bj) ) |
|
./pkg/ecco/cost_drifter.F |
80 |
COST_DRIFTER |
_RL udmod (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |