File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_glbmean.F |
120 |
COST_GENCOST_GLBMEAN |
locbar(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_glbmean.F |
177 |
COST_GENCOST_GLBMEAN |
call ACTIVE_READ_XY( fname, locbar, irec, doglobalread, |
./pkg/ecco/cost_gencost_glbmean.F |
187 |
COST_GENCOST_GLBMEAN |
& fac*locbar(i,j,bi,bj) |
./pkg/ecco/cost_gencost_glbmean.F |
219 |
COST_GENCOST_GLBMEAN |
call ACTIVE_READ_XY( fname, locbar, irec, doglobalread, |
./pkg/ecco/cost_gencost_glbmean.F |
230 |
COST_GENCOST_GLBMEAN |
& fac*locbar(i,j,bi,bj) - locbarmean(i,j,bi,bj) |
./pkg/ecco/cost_gencost_glbmean.F |
58 |
COST_GENCOST_GLBMEAN |
_RL locbar(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |