| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_readscatxfields.F |
167 |
COST_READSCATXFIELDS |
& scatxdat, localrec, mythid ) |
|
./pkg/ecco/cost_readscatxfields.F |
173 |
COST_READSCATXFIELDS |
scatxdat(i,j,bi,bj) = spval |
|
./pkg/ecco/cost_readscatxfields.F |
193 |
COST_READSCATXFIELDS |
if (scatxdat(i,j,bi,bj) .le. spval) then |
|
./pkg/ecco/cost_readscatxfields.F |
196 |
COST_READSCATXFIELDS |
if (scatxdat(i,j,bi,bj) .eq. 0. _d 0 ) then |
|
./pkg/ecco/cost_readscatxfields.F |
200 |
COST_READSCATXFIELDS |
scatxdat(i,j,bi,bj) = scatxdat(i,j,bi,bj)* |
|
./pkg/ecco/cost_readscatxfields.F |
215 |
COST_READSCATXFIELDS |
vartile=vartile+scatxdat(i,j,bi,bj)*scatxdat(i,j,bi,bj) |
|
./pkg/ecco/cost_scat.F |
168 |
COST_SCAT |
& ( (tauxbar(i,j,bi,bj)-scatxdat(i,j,bi,bj))* |
|
./pkg/ecco/cost_scat.F |
169 |
COST_SCAT |
& (tauxbar(i,j,bi,bj)-scatxdat(i,j,bi,bj))* |
|
./pkg/ecco/ecco_cost.h |
1372 |
NO PROCEDURE |
& scatxdat, |
|
./pkg/ecco/ecco_cost.h |
1408 |
NO PROCEDURE |
_RL scatxdat (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |