| Symbol | Description | Uses |
| no_ice | 6 |
| File | Line number | Procedure | Code |
| ./pkg/ecco/ecco_cost_final.F | 188 | ECCO_COST_FINAL |
no_ice = 0. _d 0 |
| ./pkg/ecco/ecco_cost_final.F | 330 | ECCO_COST_FINAL |
no_ice = no_ice + num_ice(bi,bj) |
| ./pkg/ecco/ecco_cost_final.F | 444 | ECCO_COST_FINAL |
_GLOBAL_SUM_R8( no_ice , myThid ) |
| ./pkg/ecco/ecco_cost_final.F | 613 | ECCO_COST_FINAL |
write(ifc,*) 'f_ice =', f_ice, no_ice |
| ./pkg/ecco/ecco_cost_final.F | 74 | ECCO_COST_FINAL |
_RL no_ice |