& , mult_ice_export
_RL mult_ice_export
& + mult_ice_export * objf_ice_export(bi,bj)
& mult_ice_export, mult_ice, cost_ice_flag,
mult_ice_export = 0. _d 0