| Symbol | Description | Uses |
| f_swdown | 7 |
| File | Line number | Procedure | Code |
| ./pkg/ecco/ecco_cost_final.F | 147 | ECCO_COST_FINAL |
f_swdown = 0. _d 0 |
| ./pkg/ecco/ecco_cost_final.F | 374 | ECCO_COST_FINAL |
f_swdown = f_swdown + objf_swdown(bi,bj) |
| ./pkg/ecco/ecco_cost_final.F | 528 | ECCO_COST_FINAL |
_GLOBAL_SUM_R8( f_swdown , myThid ) |
| ./pkg/ecco/ecco_cost_final.F | 57 | ECCO_COST_FINAL |
_RL f_swflux, f_swdown |
| ./pkg/ecco/ecco_cost_final.F | 720 | ECCO_COST_FINAL |
& ' --> f_swdown =',f_swdown |
| ./pkg/ecco/ecco_cost_final.F | 869 | ECCO_COST_FINAL |
write(ifc,*) 'f_swdown =', f_swdown, no_swdown |