File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_sshv4.F |
221 |
COST_GENCOST_SSHV4 |
& tpobs, tpmask, |
./pkg/ecco/cost_gencost_sshv4.F |
242 |
COST_GENCOST_SSHV4 |
& tpobs(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
365 |
COST_GENCOST_SSHV4 |
& tpobs, tpmask, |
./pkg/ecco/cost_gencost_sshv4.F |
391 |
COST_GENCOST_SSHV4 |
& mean_slaobs2(i,j,bi,bj)+tpobs(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
394 |
COST_GENCOST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
669 |
COST_GENCOST_SSHV4 |
& tpobs, tpmask, |
./pkg/ecco/cost_gencost_sshv4.F |
693 |
COST_GENCOST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
696 |
COST_GENCOST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
699 |
COST_GENCOST_SSHV4 |
& tpobs(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
890 |
COST_GENCOST_SSHV4 |
& psbar(i,j,bi,bj) - tpobs(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
892 |
COST_GENCOST_SSHV4 |
anom_tpobs(i,j,bi,bj)=tpobs(i,j,bi,bj) |
./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 |
201 |
COST_SSHV4 |
& tpobs, tpmask, |
./pkg/ecco/cost_sshv4.F |
222 |
COST_SSHV4 |
& tpobs(i,j,bi,bj) |
./pkg/ecco/cost_sshv4.F |
345 |
COST_SSHV4 |
& tpobs, tpmask, |
./pkg/ecco/cost_sshv4.F |
371 |
COST_SSHV4 |
& mean_slaobs2(i,j,bi,bj)+tpobs(i,j,bi,bj) |
./pkg/ecco/cost_sshv4.F |
374 |
COST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
./pkg/ecco/cost_sshv4.F |
648 |
COST_SSHV4 |
& tpobs, tpmask, |
./pkg/ecco/cost_sshv4.F |
672 |
COST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
./pkg/ecco/cost_sshv4.F |
675 |
COST_SSHV4 |
& psbar(i,j,bi,bj)-tpobs(i,j,bi,bj) |
./pkg/ecco/cost_sshv4.F |
678 |
COST_SSHV4 |
& tpobs(i,j,bi,bj) |
./pkg/ecco/cost_sshv4.F |
869 |
COST_SSHV4 |
& psbar(i,j,bi,bj) - tpobs(i,j,bi,bj) |
./pkg/ecco/cost_sshv4.F |
871 |
COST_SSHV4 |
anom_tpobs(i,j,bi,bj)=tpobs(i,j,bi,bj) |
./pkg/ecco/ecco_cost.h |
1234 |
NO PROCEDURE |
& tpobs, |
./pkg/ecco/ecco_cost.h |
1265 |
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 |