IF (using_cost_seaice)
& using_cost_seaice=using_gencost(k)
& using_cost_seaice
logical using_cost_seaice
using_cost_seaice=.TRUE.
using_cost_seaice=.FALSE.
& using_cost_sst, using_cost_seaice,