_RL SEAICE_dryIceAlb_south, SEAICE_wetIceAlb_south
& SEAICE_dryIceAlb_south, SEAICE_wetIceAlb_south,
SEAICE_dryIceAlb_south = UNSET_RL
IF (SEAICE_dryIceAlb_south .EQ. UNSET_RL)
& SEAICE_dryIceAlb_south = SEAICE_dryIceAlb
ALB_ICE (I,J) = SEAICE_dryIceAlb_south
CALL WRITE_0D_RL( SEAICE_dryIceAlb_south ,INDEX_NONE,