File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_kapredi.F |
114 |
COST_KAPREDI |
& + wkaprediFld(i,j,k,bi,bj)*cosphi(i,j,bi,bj) |
./pkg/ecco/ecco_cost.h |
1022 |
NO PROCEDURE |
& wkapredi,wkapredi2,wkaprediFld, |
./pkg/ecco/ecco_cost.h |
1092 |
NO PROCEDURE |
_RL wkaprediFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
./pkg/ecco/ecco_cost_weights.F |
185 |
ECCO_COST_WEIGHTS |
wkaprediFld (i,j,k,bi,bj) = wkapredi0 |
./pkg/ecco/ecco_cost_weights.F |
1876 |
ECCO_COST_WEIGHTS |
wkaprediFld(i,j,k,bi,bj) = wkapredi2(i,j,k,bi,bj) |
./pkg/ecco/ecco_cost_weights.F |
1984 |
ECCO_COST_WEIGHTS |
call ACTIVE_WRITE_XYZ( 'wkaprediFld',wkaprediFld, |