File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_bpv4.F |
116 |
COST_GENCOST_BPV4 |
bpcount(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_bpv4.F |
180 |
COST_GENCOST_BPV4 |
bpcount(i,j,bi,bj) = bpcount(i,j,bi,bj) + 1. _d 0 |
./pkg/ecco/cost_gencost_bpv4.F |
193 |
COST_GENCOST_BPV4 |
if (bpcount(i,j,bi,bj).GT. 0. _d 0) then |
./pkg/ecco/cost_gencost_bpv4.F |
195 |
COST_GENCOST_BPV4 |
& bpdifmean(i,j,bi,bj)/bpcount(i,j,bi,bj) |
./pkg/ecco/cost_gencost_bpv4.F |
197 |
COST_GENCOST_BPV4 |
& bpdatmean(i,j,bi,bj)/bpcount(i,j,bi,bj) |
./pkg/ecco/cost_gencost_bpv4.F |
66 |
COST_GENCOST_BPV4 |
_RL bpcount ( 1-olx:snx+olx, 1-oly:sny+oly, nsx, nsy ) |