if ( (using_gencost(k)).AND.(gencost_barfile(k).ne.' ') ) then
if ( (using_gencost(k)).AND.( gencost_flag(k).EQ.1 ) ) then
if ( (using_gencost(k)).AND.( gencost_flag(k).GE.1 ) ) then
CALL ECCO_CHECK_FILES( using_gencost(k), 'gencost',
& using_cost_seaice=using_gencost(k)
& using_gencost
LOGICAL using_gencost(NGENCOST)
& using_gencost,
using_gencost(k) = .FALSE.
using_gencost(k)=.TRUE.