| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_gencost_sshv4.F |
1069 |
COST_GENCOST_SSHV4 |
if ( tpmask(i,j,bi,bj)*mean_psMslaobs_MSK(i,j,bi,bj).NE.0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1136 |
COST_GENCOST_SSHV4 |
& *tpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
265 |
COST_GENCOST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
283 |
COST_GENCOST_SSHV4 |
if ( tpmask(i,j,bi,bj)*mdtmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_gencost_sshv4.F |
417 |
COST_GENCOST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
440 |
COST_GENCOST_SSHV4 |
if ( tpmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_gencost_sshv4.F |
768 |
COST_GENCOST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
789 |
COST_GENCOST_SSHV4 |
if ( tpmask(i,j,bi,bj)*mean_psMslaobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_readtopex.F |
174 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopex.F |
176 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = 1. _d 0 |
|
./pkg/ecco/cost_readtopex.F |
179 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopex.F |
182 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopex.F |
187 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopex.F |
192 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readtopex.F |
196 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = tpmask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readtopex.F |
197 |
COST_READTOPEX |
tpobs(i,j,bi,bj) = tpmask(i,j,bi,bj)*factor* |
|
./pkg/ecco/cost_ssh.F |
269 |
COST_SSH |
& *tpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh.F |
275 |
COST_SSH |
if (mdtmask(i,j,bi,bj)*tpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
185 |
COST_SSH_NEW |
if ( tpmask(i,j,bi,bj)*wtp(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
350 |
COST_SSH_NEW |
& *tpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
360 |
COST_SSH_NEW |
if (mdtmask(i,j,bi,bj)*tpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
225 |
COST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_sshv4.F |
243 |
COST_SSHV4 |
if ( tpmask(i,j,bi,bj)*mdtmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_sshv4.F |
372 |
COST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_sshv4.F |
395 |
COST_SSHV4 |
if ( tpmask(i,j,bi,bj)*wsshv4(i,j,2,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
683 |
COST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_sshv4.F |
704 |
COST_SSHV4 |
if ( tpmask(i,j,bi,bj)*mean_psMtpobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
907 |
COST_SSHV4 |
if ( tpmask(i,j,bi,bj)*mean_psMtpobs_MSK(i,j,bi,bj).NE.0. ) |
|
./pkg/ecco/cost_sshv4.F |
968 |
COST_SSHV4 |
& *tpmask(i,j,bi,bj) |
|
./pkg/ecco/ecco_cost.h |
1389 |
NO PROCEDURE |
& tpmask, |
|
./pkg/ecco/ecco_cost.h |
1425 |
NO PROCEDURE |
_RL tpmask (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |
|
./pkg/ecco/ecco_cost_init_varia.F |
253 |
ECCO_COST_INIT_VARIA |
tpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_init_varia.F |
255 |
ECCO_COST_INIT_VARIA |
tpmask(i,j,bi,bj) = 1. _d 0 |