| Symbol | Description | Uses |
| f_swdownm | 7 |
| File | Line number | Procedure | Code |
| ./pkg/ecco/ecco_cost_final.F | 154 | ECCO_COST_FINAL |
f_swdownm = 0. _d 0 |
| ./pkg/ecco/ecco_cost_final.F | 381 | ECCO_COST_FINAL |
f_swdownm = f_swdownm + objf_swdownm(bi,bj) |
| ./pkg/ecco/ecco_cost_final.F | 535 | ECCO_COST_FINAL |
_GLOBAL_SUM_R8( f_swdownm , myThid ) |
| ./pkg/ecco/ecco_cost_final.F | 60 | ECCO_COST_FINAL |
_RL f_swfluxm, f_swdownm |
| ./pkg/ecco/ecco_cost_final.F | 734 | ECCO_COST_FINAL |
& ' --> f_swdownm =',f_swdownm |
| ./pkg/ecco/ecco_cost_final.F | 876 | ECCO_COST_FINAL |
write(ifc,*) 'f_swdownm =', f_swdownm, no_swdownm |