| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_jfnk.F |
530 |
SEAICE_JFNK_UPDATE |
_RL resLoc, facLS |
|
./pkg/seaice/seaice_jfnk.F |
544 |
SEAICE_JFNK_UPDATE |
facLS = 1. _d 0 |
|
./pkg/seaice/seaice_jfnk.F |
552 |
SEAICE_JFNK_UPDATE |
uIce(I,J,bi,bj) = uIce(I,J,bi,bj)+facLS*duIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_jfnk.F |
553 |
SEAICE_JFNK_UPDATE |
vIce(I,J,bi,bj) = vIce(I,J,bi,bj)+facLS*dvIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_jfnk.F |
587 |
SEAICE_JFNK_UPDATE |
& newtonIter, l, facLS, JFNKresidual, resLoc |
|
./pkg/seaice/seaice_jfnk.F |
595 |
SEAICE_JFNK_UPDATE |
facLS = - 0.5 _d 0 * ABS(facLS) |