| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_readscatyfields.F |
116 |
COST_READSCATYFIELDS |
& scatydat, imonth, mythid ) |
|
./pkg/ecco/cost_readscatyfields.F |
130 |
COST_READSCATYFIELDS |
if (scatydat(i,j,bi,bj) .lt. spval) then |
|
./pkg/ecco/cost_readscatyfields.F |
133 |
COST_READSCATYFIELDS |
if (scatydat(i,j,bi,bj) .eq. 0. _d 0 ) then |
|
./pkg/ecco/cost_readscatyfields.F |
137 |
COST_READSCATYFIELDS |
scatydat(i,j,bi,bj) = scatydat(i,j,bi,bj)* |
|
./pkg/ecco/cost_readscatyfields.F |
152 |
COST_READSCATYFIELDS |
vartile=vartile+scatydat(i,j,bi,bj)*scatydat(i,j,bi,bj) |
|
./pkg/ecco/cost_scat.F |
187 |
COST_SCAT |
& ( (tauybar(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/ecco_cost.h |
1221 |
NO PROCEDURE |
& scatydat, |
|
./pkg/ecco/ecco_cost.h |
1252 |
NO PROCEDURE |
_RL scatydat (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |