| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_drifter.F |
161 |
COST_DRIFTER |
vdmod(i,j,bi,bj)=vbar(i,j,k,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
164 |
COST_DRIFTER |
vdmod(i,j,bi,bj)=vdmod(i,j,bi,bj)/float(nmonsrec) |
|
./pkg/ecco/cost_drifter.F |
167 |
COST_DRIFTER |
vdmod(i,j,bi,bj)=vdmod(i,j,bi,bj)+vbar(i,j,k,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
253 |
COST_DRIFTER |
& vdmod(i,j,bi,bj)*mask13c(i,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
254 |
COST_DRIFTER |
& + vdmod(i+1,j,bi,bj)*mask13c(i+1,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
255 |
COST_DRIFTER |
& + vdmod(i+2,j,bi,bj)*mask13c(i+2,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
256 |
COST_DRIFTER |
& + vdmod(i+3,j,bi,bj)*mask13c(i+3,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
257 |
COST_DRIFTER |
& + vdmod(i+4,j,bi,bj)*mask13c(i+4,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
258 |
COST_DRIFTER |
& + vdmod(i+5,j,bi,bj)*mask13c(i+5,j,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
259 |
COST_DRIFTER |
& + vdmod(i,j+1,bi,bj)*mask13c(i,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
260 |
COST_DRIFTER |
& + vdmod(i+1,j+1,bi,bj)*mask13c(i+1,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
261 |
COST_DRIFTER |
& + vdmod(i+2,j+1,bi,bj)*mask13c(i+2,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
262 |
COST_DRIFTER |
& + vdmod(i+3,j+1,bi,bj)*mask13c(i+3,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
263 |
COST_DRIFTER |
& + vdmod(i+4,j+1,bi,bj)*mask13c(i+4,j+1,bi,bj) |
|
./pkg/ecco/cost_drifter.F |
264 |
COST_DRIFTER |
& + vdmod(i+5,j+1,bi,bj)*mask13c(i+5,j+1,bi,bj) ) |
|
./pkg/ecco/cost_drifter.F |
81 |
COST_DRIFTER |
_RL vdmod (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |