| Symbol | Description | Uses |
| f_ice | 7 |
| File | Line number | Procedure | Code |
| ./pkg/seaice/seaice_cost_final.F | 100 | SEAICE_COST_FINAL |
& ' --> f_ice =',f_ice |
| ./pkg/seaice/seaice_cost_final.F | 111 | SEAICE_COST_FINAL |
write(ifc,*) 'f_ice =', f_ice, no_ice |
| ./pkg/seaice/seaice_cost_final.F | 45 | SEAICE_COST_FINAL |
_RL f_ice |
| ./pkg/seaice/seaice_cost_final.F | 65 | SEAICE_COST_FINAL |
f_ice = 0. _d 0 |
| ./pkg/seaice/seaice_cost_final.F | 79 | SEAICE_COST_FINAL |
f_ice = f_ice + objf_ice(bi,bj) |
| ./pkg/seaice/seaice_cost_final.F | 93 | SEAICE_COST_FINAL |
_GLOBAL_SUM_R8( f_ice , myThid ) |