| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_ssh_mean.F |
119 |
COST_SSH_MEAN |
if ( tpmeanmask(i,j,bi,bj) .gt. 0. ) then |
|
./pkg/ecco/cost_ssh_mean.F |
237 |
COST_SSH_MEAN |
& * wp(i,j,bi,bj)*tpmeanmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_mean.F |
238 |
COST_SSH_MEAN |
if ( wp(i,j,bi,bj)*tpmeanmask(i,j,bi,bj) .ne. 0. ) |
|
./pkg/ecco/cost_ssh_mean.F |
241 |
COST_SSH_MEAN |
& * wp(i,j,bi,bj)*tpmeanmask(i,j,bi,bj) |
|
./pkg/ecco/cost_readtopexmean.F |
101 |
COST_READTOPEXMEAN |
tpmeanmask(i,j,bi,bj) = tpmeanmask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readtopexmean.F |
103 |
COST_READTOPEXMEAN |
& tpmeanmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_readtopexmean.F |
78 |
COST_READTOPEXMEAN |
tpmeanmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopexmean.F |
80 |
COST_READTOPEXMEAN |
tpmeanmask(i,j,bi,bj) = 1. _d 0 |
|
./pkg/ecco/cost_readtopexmean.F |
83 |
COST_READTOPEXMEAN |
tpmeanmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopexmean.F |
86 |
COST_READTOPEXMEAN |
tpmeanmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopexmean.F |
98 |
COST_READTOPEXMEAN |
tpmeanmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/ecco_cost.h |
838 |
NO PROCEDURE |
& tpmeanmask, |
|
./pkg/ecco/ecco_cost.h |
868 |
NO PROCEDURE |
_RL tpmeanmask(1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |
|
./pkg/ecco/ecco_cost_initvaria.F |
188 |
ECCO_COST_INITVARIA |
tpmeanmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_initvaria.F |
190 |
ECCO_COST_INITVARIA |
tpmeanmask(i,j,bi,bj) = 1. _d 0 |
|
./pkg/ecco/cost_ssh.F |
146 |
COST_SSH |
& psbar(i,j,bi,bj)*tpmeanmask(i,j,bi,bj)/ |
|
./pkg/ecco/cost_ssh.F |
166 |
COST_SSH |
& tpmeanmask(i,j,bi,bj)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/cost_ssh.F |
169 |
COST_SSH |
& tpmeanmask(i,j,bi,bj)*cosphi(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh.F |
249 |
COST_SSH |
& *tpmask(i,j,bi,bj)*tpmeanmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh.F |
264 |
COST_SSH |
& *ersmask(i,j,bi,bj)*tpmeanmask(i,j,bi,bj) |