| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_gencost_sshv4.F |
1091 |
COST_GENCOST_SSHV4 |
if ( gfomask(i,j,bi,bj)*mean_psMslaobs_MSK(i,j,bi,bj).NE.0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1162 |
COST_GENCOST_SSHV4 |
& *gfomask(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
275 |
COST_GENCOST_SSHV4 |
& gfoobs, gfomask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
299 |
COST_GENCOST_SSHV4 |
if ( gfomask(i,j,bi,bj)*mdtmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_gencost_sshv4.F |
429 |
COST_GENCOST_SSHV4 |
& gfoobs, gfomask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
464 |
COST_GENCOST_SSHV4 |
if ( gfomask(i,j,bi,bj)* |
|
./pkg/ecco/cost_gencost_sshv4.F |
780 |
COST_GENCOST_SSHV4 |
& gfoobs, gfomask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
817 |
COST_GENCOST_SSHV4 |
if ( gfomask(i,j,bi,bj)*mean_psMslaobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_readgfo.F |
147 |
COST_READGFO |
gfomask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readgfo.F |
149 |
COST_READGFO |
gfomask(i,j,bi,bj) = 1. _d 0 |
|
./pkg/ecco/cost_readgfo.F |
152 |
COST_READGFO |
gfomask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readgfo.F |
155 |
COST_READGFO |
gfomask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readgfo.F |
160 |
COST_READGFO |
gfomask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readgfo.F |
165 |
COST_READGFO |
gfomask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readgfo.F |
168 |
COST_READGFO |
gfomask(i,j,bi,bj) = gfomask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readgfo.F |
169 |
COST_READGFO |
gfoobs(i,j,bi,bj) = gfomask(i,j,bi,bj)*factor* |
|
./pkg/ecco/cost_ssh.F |
323 |
COST_SSH |
& *gfomask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh.F |
329 |
COST_SSH |
if (mdtmask(i,j,bi,bj)*gfomask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
201 |
COST_SSH_NEW |
if ( gfomask(i,j,bi,bj)*wgfo(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
408 |
COST_SSH_NEW |
& *gfomask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
418 |
COST_SSH_NEW |
if (mdtmask(i,j,bi,bj)*gfomask(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
235 |
COST_SSHV4 |
& gfoobs, gfomask, |
|
./pkg/ecco/cost_sshv4.F |
259 |
COST_SSHV4 |
if ( gfomask(i,j,bi,bj)*mdtmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_sshv4.F |
384 |
COST_SSHV4 |
& gfoobs, gfomask, |
|
./pkg/ecco/cost_sshv4.F |
419 |
COST_SSHV4 |
if ( gfomask(i,j,bi,bj)*wsshv4(i,j,4,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
695 |
COST_SSHV4 |
& gfoobs, gfomask, |
|
./pkg/ecco/cost_sshv4.F |
738 |
COST_SSHV4 |
if ( gfomask(i,j,bi,bj)*mean_psMgfoobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
925 |
COST_SSHV4 |
if ( gfomask(i,j,bi,bj)*mean_psMgfoobs_MSK(i,j,bi,bj).NE.0. ) |
|
./pkg/ecco/cost_sshv4.F |
996 |
COST_SSHV4 |
& *gfomask(i,j,bi,bj) |
|
./pkg/ecco/ecco_cost.h |
1393 |
NO PROCEDURE |
& gfomask, |
|
./pkg/ecco/ecco_cost.h |
1429 |
NO PROCEDURE |
_RL gfomask (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |
|
./pkg/ecco/ecco_cost_init_varia.F |
269 |
ECCO_COST_INIT_VARIA |
gfomask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_init_varia.F |
271 |
ECCO_COST_INIT_VARIA |
gfomask(i,j,bi,bj) = 1. _d 0 |