| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_jfnk.F |
124 |
SEAICE_JFNK |
JFNKresidual = 0. _d 0 |
|
./pkg/seaice/seaice_jfnk.F |
191 |
SEAICE_JFNK |
U uIce, vIce, JFNKresidual, |
|
./pkg/seaice/seaice_jfnk.F |
212 |
SEAICE_JFNK |
& .AND.JFNKresidual.LT.JFNKres_t ) THEN |
|
./pkg/seaice/seaice_jfnk.F |
215 |
SEAICE_JFNK |
& *( JFNKresidual/JFNKresidualKm1 )**SEAICE_JFNKalpha |
|
./pkg/seaice/seaice_jfnk.F |
220 |
SEAICE_JFNK |
JFNKresidualKm1 = JFNKresidual |
|
./pkg/seaice/seaice_jfnk.F |
230 |
SEAICE_JFNK |
JFNKconverged = JFNKresidual.LT.JFNKtol |
|
./pkg/seaice/seaice_jfnk.F |
231 |
SEAICE_JFNK |
& .OR.JFNKresidual.EQ.0. _d 0 |
|
./pkg/seaice/seaice_jfnk.F |
240 |
SEAICE_JFNK |
FGMRESeps = JFNKgamma_lin * JFNKresidual |
|
./pkg/seaice/seaice_jfnk.F |
308 |
SEAICE_JFNK |
& JFNKgamma_lin,JFNKresidual |
|
./pkg/seaice/seaice_jfnk.F |
325 |
SEAICE_JFNK |
JFNKtol=SEAICEnonLinTol*JFNKresidual |
|
./pkg/seaice/seaice_jfnk.F |
327 |
SEAICE_JFNK |
& JFNKres_t = JFNKresidual * JFNKres_tFac |
|
./pkg/seaice/seaice_jfnk.F |
337 |
SEAICE_JFNK |
U uIce, vIce, JFNKresidual, |
|
./pkg/seaice/seaice_jfnk.F |
475 |
SEAICE_JFNK_UPDATE |
U uIce, vIce, JFNKresidual, |
|
./pkg/seaice/seaice_jfnk.F |
514 |
SEAICE_JFNK_UPDATE |
_RL JFNKresidual |
|
./pkg/seaice/seaice_jfnk.F |
543 |
SEAICE_JFNK_UPDATE |
resLoc = JFNKresidual |
|
./pkg/seaice/seaice_jfnk.F |
570 |
SEAICE_JFNK_UPDATE |
doLineSearch = resLoc .GE. JFNKresidual |
|
./pkg/seaice/seaice_jfnk.F |
587 |
SEAICE_JFNK_UPDATE |
& newtonIter, l, facLS, JFNKresidual, resLoc |
|
./pkg/seaice/seaice_jfnk.F |
598 |
SEAICE_JFNK_UPDATE |
JFNKresidual = resLoc |
|
./pkg/seaice/seaice_jfnk.F |
82 |
SEAICE_JFNK |
_RL JFNKresidual |