_RL SEAICE_JFNKphi, SEAICE_JFNKalpha
& SEAICE_JFNKphi, SEAICE_JFNKalpha,
JFNKgamma_lin = SEAICE_JFNKphi
& SEAICE_JFNKphi, SEAICE_JFNKalpha, SEAICEuseIMEX, SEAICEuseBDF2,
SEAICE_JFNKphi = 1. _d 0
CALL WRITE_0D_RL( SEAICE_JFNKphi, INDEX_NONE,