| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_readtopex.F |
121 |
COST_READTOPEX |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, tpobs, |
|
./pkg/ecco/cost_readtopex.F |
134 |
COST_READTOPEX |
if (tpobs(i,j,bi,bj) .le. spval) then |
|
./pkg/ecco/cost_readtopex.F |
137 |
COST_READTOPEX |
if (abs(tpobs(i,j,bi,bj)) .lt. 1.d-8 ) then |
|
./pkg/ecco/cost_readtopex.F |
146 |
COST_READTOPEX |
tpobs(i,j,bi,bj) = tpmask(i,j,bi,bj)*factor* |
|
./pkg/ecco/cost_readtopex.F |
147 |
COST_READTOPEX |
& ( tpobs(i,j,bi,bj) - |
|
./pkg/ecco/cost_ssh.F |
265 |
COST_SSH |
& tpobs(i,j,bi,bj)) |
|
./pkg/ecco/cost_ssh.F |
275 |
COST_SSH |
& (tpobs(i,j,bi,bj)+tpmean(i,j,bi,bj)-offset) ) |
|
./pkg/ecco/cost_ssh_new.F |
351 |
COST_SSH_NEW |
& - psmeantp(i,j,bi,bj) - tpobs(i,j,bi,bj) ) |
|
./pkg/ecco/cost_ssh_new.F |
360 |
COST_SSH_NEW |
& (tpobs(i,j,bi,bj)+tpmean(i,j,bi,bj)-offset) ) |
|
./pkg/ecco/cost_sshv4.F |
190 |
COST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_sshv4.F |
210 |
COST_SSHV4 |
& tpobs(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
329 |
COST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_sshv4.F |
356 |
COST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
597 |
COST_SSHV4 |
& tpobs, tpmask, |
|
./pkg/ecco/cost_sshv4.F |
621 |
COST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
624 |
COST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
627 |
COST_SSHV4 |
& tpobs(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
807 |
COST_SSHV4 |
& psbar(i,j,bi,bj) - tpobs(i,j,bi,bj) |
|
./pkg/ecco/ecco_cost.h |
1228 |
NO PROCEDURE |
& tpobs, |
|
./pkg/ecco/ecco_cost.h |
1259 |
NO PROCEDURE |
_RL tpobs (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |
|
./pkg/ecco/ecco_cost_init_varia.F |
241 |
ECCO_COST_INIT_VARIA |
tpobs(i,j,bi,bj) = 0. _d 0 |