| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_obcsvol.F |
131 |
COST_OBCSVOL |
sumvol = 0. _d 0 |
|
./pkg/ecco/cost_obcsvol.F |
229 |
COST_OBCSVOL |
sumvol = sumvol + fctile |
|
./pkg/ecco/cost_obcsvol.F |
271 |
COST_OBCSVOL |
sumvol = sumvol + fctile |
|
./pkg/ecco/cost_obcsvol.F |
314 |
COST_OBCSVOL |
sumvol = sumvol + fctile |
|
./pkg/ecco/cost_obcsvol.F |
357 |
COST_OBCSVOL |
sumvol = sumvol + fctile |
|
./pkg/ecco/cost_obcsvol.F |
368 |
COST_OBCSVOL |
_GLOBAL_SUM_RL( sumvol, mythid ) |
|
./pkg/ecco/cost_obcsvol.F |
369 |
COST_OBCSVOL |
objf_obcsvol = wobcsvol * sumvol* sumvol |
|
./pkg/ecco/cost_obcsvol.F |
77 |
COST_OBCSVOL |
_RL sumvol |