| Symbol | Description | Uses |
| f_ssh | 7 |
| File | Line number | Procedure | Code |
| ./pkg/ecco/ecco_cost_final.F | 162 | ECCO_COST_FINAL |
f_ssh = 0. _d 0 |
| ./pkg/ecco/ecco_cost_final.F | 389 | ECCO_COST_FINAL |
f_ssh = f_ssh + objf_h(bi,bj) |
| ./pkg/ecco/ecco_cost_final.F | 543 | ECCO_COST_FINAL |
_GLOBAL_SUM_R8( f_ssh , myThid ) |
| ./pkg/ecco/ecco_cost_final.F | 672 | ECCO_COST_FINAL |
& ' --> f_ssh =',f_ssh |
| ./pkg/ecco/ecco_cost_final.F | 70 | ECCO_COST_FINAL |
_RL f_ssh , f_tp, f_ers, f_gfo |
| ./pkg/ecco/ecco_cost_final.F | 884 | ECCO_COST_FINAL |
write(ifc,*) 'f_ssh =', f_ssh, no_ssh |