| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_readscatyfields.F |
166 |
COST_READSCATYFIELDS |
& scatydat, localrec, mythid ) |
|
./pkg/ecco/cost_readscatyfields.F |
172 |
COST_READSCATYFIELDS |
scatydat(i,j,bi,bj) = spval |
|
./pkg/ecco/cost_readscatyfields.F |
191 |
COST_READSCATYFIELDS |
if (scatydat(i,j,bi,bj) .le. spval) then |
|
./pkg/ecco/cost_readscatyfields.F |
194 |
COST_READSCATYFIELDS |
if (scatydat(i,j,bi,bj) .eq. 0. _d 0 ) then |
|
./pkg/ecco/cost_readscatyfields.F |
198 |
COST_READSCATYFIELDS |
scatydat(i,j,bi,bj) = scatydat(i,j,bi,bj)* |
|
./pkg/ecco/cost_readscatyfields.F |
213 |
COST_READSCATYFIELDS |
vartile=vartile+scatydat(i,j,bi,bj)*scatydat(i,j,bi,bj) |
|
./pkg/ecco/cost_scat.F |
188 |
COST_SCAT |
& ( (tauybar(i,j,bi,bj)-scatydat(i,j,bi,bj))* |
|
./pkg/ecco/cost_scat.F |
189 |
COST_SCAT |
& (tauybar(i,j,bi,bj)-scatydat(i,j,bi,bj))* |
|
./pkg/ecco/ecco_cost.h |
1373 |
NO PROCEDURE |
& scatydat, |
|
./pkg/ecco/ecco_cost.h |
1409 |
NO PROCEDURE |
_RL scatydat (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |