& useImportCO2, useImportWSpd,
LOGICAL useImportCO2
useImportCO2 = .FALSE.
IF ( ( useImportFice.OR.useImportCO2.OR.useImportWSpd ) .AND.
CALL WRITE_0D_L( useImportCO2 , INDEX_NONE,
useImportCO2 = .TRUE.
IF ( useImportCO2 ) THEN
IF ( useImportCO2 ) _EXCH_XY_RL(AtmospCO2 , myThid )