| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_gencost_sshv4.F |
1080 |
COST_GENCOST_SSHV4 |
if ( ersmask(i,j,bi,bj)*mean_psMslaobs_MSK(i,j,bi,bj).NE.0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1149 |
COST_GENCOST_SSHV4 |
& *ersmask(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
270 |
COST_GENCOST_SSHV4 |
& ersobs, ersmask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
291 |
COST_GENCOST_SSHV4 |
if ( ersmask(i,j,bi,bj)*mdtmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_gencost_sshv4.F |
423 |
COST_GENCOST_SSHV4 |
& ersobs, ersmask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
452 |
COST_GENCOST_SSHV4 |
if ( ersmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_gencost_sshv4.F |
774 |
COST_GENCOST_SSHV4 |
& ersobs, ersmask, |
|
./pkg/ecco/cost_gencost_sshv4.F |
803 |
COST_GENCOST_SSHV4 |
if ( ersmask(i,j,bi,bj)*mean_psMslaobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_readers.F |
147 |
COST_READERS |
ersmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readers.F |
149 |
COST_READERS |
ersmask(i,j,bi,bj) = 1. _d 0 |
|
./pkg/ecco/cost_readers.F |
152 |
COST_READERS |
ersmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readers.F |
155 |
COST_READERS |
ersmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readers.F |
160 |
COST_READERS |
ersmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readers.F |
165 |
COST_READERS |
ersmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_readers.F |
169 |
COST_READERS |
ersmask(i,j,bi,bj) = ersmask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readers.F |
170 |
COST_READERS |
ersobs(i,j,bi,bj) = ersmask(i,j,bi,bj)*factor* |
|
./pkg/ecco/cost_ssh.F |
296 |
COST_SSH |
& *ersmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh.F |
302 |
COST_SSH |
if (mdtmask(i,j,bi,bj)*ersmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
193 |
COST_SSH_NEW |
if ( ersmask(i,j,bi,bj)*wers(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
379 |
COST_SSH_NEW |
& *ersmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ssh_new.F |
389 |
COST_SSH_NEW |
if (mdtmask(i,j,bi,bj)*ersmask(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
230 |
COST_SSHV4 |
& ersobs, ersmask, |
|
./pkg/ecco/cost_sshv4.F |
251 |
COST_SSHV4 |
if ( ersmask(i,j,bi,bj)*mdtmask(i,j,bi,bj)* |
|
./pkg/ecco/cost_sshv4.F |
378 |
COST_SSHV4 |
& ersobs, ersmask, |
|
./pkg/ecco/cost_sshv4.F |
407 |
COST_SSHV4 |
if ( ersmask(i,j,bi,bj)*wsshv4(i,j,3,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
689 |
COST_SSHV4 |
& ersobs, ersmask, |
|
./pkg/ecco/cost_sshv4.F |
721 |
COST_SSHV4 |
if ( ersmask(i,j,bi,bj)*mean_psMersobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
916 |
COST_SSHV4 |
if ( ersmask(i,j,bi,bj)*mean_psMersobs_MSK(i,j,bi,bj).NE.0. ) |
|
./pkg/ecco/cost_sshv4.F |
982 |
COST_SSHV4 |
& *ersmask(i,j,bi,bj) |
|
./pkg/ecco/ecco_cost.h |
1391 |
NO PROCEDURE |
& ersmask, |
|
./pkg/ecco/ecco_cost.h |
1427 |
NO PROCEDURE |
_RL ersmask (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |
|
./pkg/ecco/ecco_cost_init_varia.F |
261 |
ECCO_COST_INIT_VARIA |
ersmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_init_varia.F |
263 |
ECCO_COST_INIT_VARIA |
ersmask(i,j,bi,bj) = 1. _d 0 |