| Symbol | Description | Uses |
| f_ageos | 7 |
| File | Line number | Procedure | Code |
| ./pkg/ecco/ecco_cost_final.F | 190 | ECCO_COST_FINAL |
f_ageos = 0. _d 0 |
| ./pkg/ecco/ecco_cost_final.F | 413 | ECCO_COST_FINAL |
f_ageos = f_ageos + objf_ageos(bi,bj) |
| ./pkg/ecco/ecco_cost_final.F | 571 | ECCO_COST_FINAL |
_GLOBAL_SUM_R8( f_ageos , myThid ) |
| ./pkg/ecco/ecco_cost_final.F | 74 | ECCO_COST_FINAL |
_RL f_ageos, f_curmtr |
| ./pkg/ecco/ecco_cost_final.F | 790 | ECCO_COST_FINAL |
& ' --> f_ageos =',f_ageos |
| ./pkg/ecco/ecco_cost_final.F | 912 | ECCO_COST_FINAL |
write(ifc,*) 'f_ageos =', f_ageos, no_ageos |