INTEGER SEAICE_JFNK_lsIter, SEAICE_JFNK_tolIter
& SEAICE_JFNK_tolIter,
IF ( newtonIter.GT.1.AND.newtonIter.LE.SEAICE_JFNK_tolIter
& SEAICE_JFNK_lsIter, SEAICE_JFNK_tolIter, JFNKres_t,JFNKres_tFac,
SEAICE_JFNK_tolIter = 100
CALL WRITE_0D_I ( SEAICE_JFNK_tolIter, INDEX_NONE,