File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_bpv4.F |
118 |
COST_GENCOST_BPV4 |
locbpbar(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_bpv4.F |
158 |
COST_GENCOST_BPV4 |
call ACTIVE_READ_XY( fname, locbpbar, irec, doglobalread, |
./pkg/ecco/cost_gencost_bpv4.F |
162 |
COST_GENCOST_BPV4 |
CALL READ_REC_XY_RL( fname, locbpbar, |
./pkg/ecco/cost_gencost_bpv4.F |
177 |
COST_GENCOST_BPV4 |
& ( fac*locbpbar(i,j,bi,bj) - locbpdat(i,j,bi,bj) ) |
./pkg/ecco/cost_gencost_bpv4.F |
211 |
COST_GENCOST_BPV4 |
call ACTIVE_READ_XY( fname, locbpbar, irec, doglobalread, |
./pkg/ecco/cost_gencost_bpv4.F |
215 |
COST_GENCOST_BPV4 |
CALL READ_REC_XY_RL( fname, locbpbar, |
./pkg/ecco/cost_gencost_bpv4.F |
231 |
COST_GENCOST_BPV4 |
& ( fac*locbpbar(i,j,bi,bj) - locbpdat(i,j,bi,bj) ) |
./pkg/ecco/cost_gencost_bpv4.F |
57 |
COST_GENCOST_BPV4 |
_RL locbpbar(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |