CALL WRITE_0D_R8( SEAICE_strength ,INDEX_NONE,
PSTAR=SEAICE_strength
SEAICE_strength = 2.75 _d +04
& SEAICE_waterAlbedo, SEAICE_strength,
_RL SEAICE_waterAlbedo, SEAICE_strength