File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_bpv4.F |
113 |
COST_GENCOST_BPV4 |
bpdifanom(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_bpv4.F |
230 |
COST_GENCOST_BPV4 |
bpdifanom(i,j,bi,bj) = |
./pkg/ecco/cost_gencost_bpv4.F |
236 |
COST_GENCOST_BPV4 |
bpdifanom(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_bpv4.F |
254 |
COST_GENCOST_BPV4 |
offset = offset + RA(i,j,bi,bj)*bpdifanom(i,j,bi,bj) |
./pkg/ecco/cost_gencost_bpv4.F |
272 |
COST_GENCOST_BPV4 |
bpdifanom(i,j,bi,bj) = bpdifanom(i,j,bi,bj) |
./pkg/ecco/cost_gencost_bpv4.F |
284 |
COST_GENCOST_BPV4 |
& 1,bpdifanom,irec,1,mythid) |
./pkg/ecco/cost_gencost_bpv4.F |
292 |
COST_GENCOST_BPV4 |
& call SMOOTH_BASIC2D(bpdifanom,maskc,300000. _d 0,3000,mythid) |
./pkg/ecco/cost_gencost_bpv4.F |
303 |
COST_GENCOST_BPV4 |
& 1,bpdifanom,irec,1,mythid) |
./pkg/ecco/cost_gencost_bpv4.F |
318 |
COST_GENCOST_BPV4 |
junk = bpdifanom(i,j,bi,bj) |
./pkg/ecco/cost_gencost_bpv4.F |
63 |
COST_GENCOST_BPV4 |
_RL bpdifanom ( 1-olx:snx+olx, 1-oly:sny+oly, nsx, nsy ) |