| Symbol | Description | Uses |
| f_ctds | 7 |
| File | Line number | Procedure | Code |
| ./pkg/ecco/ecco_cost_final.F | 118 | ECCO_COST_FINAL |
f_ctds = 0. _d 0 |
| ./pkg/ecco/ecco_cost_final.F | 272 | ECCO_COST_FINAL |
f_ctds = f_ctds + objf_ctds(bi,bj) |
| ./pkg/ecco/ecco_cost_final.F | 372 | ECCO_COST_FINAL |
_GLOBAL_SUM_R8( f_ctds , myThid ) |
| ./pkg/ecco/ecco_cost_final.F | 497 | ECCO_COST_FINAL |
& ' --> f_ctds =',f_ctds |
| ./pkg/ecco/ecco_cost_final.F | 52 | ECCO_COST_FINAL |
_RL f_sst, f_tmi, f_sss, f_atl, f_ctdt, f_ctds |
| ./pkg/ecco/ecco_cost_final.F | 593 | ECCO_COST_FINAL |
write(ifc,*) 'f_ctds =', f_ctds, no_ctds |