| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_krylov.F |
111 |
SEAICE_KRYLOV |
picardIter = 0 |
|
./pkg/seaice/seaice_krylov.F |
184 |
SEAICE_KRYLOV |
DO WHILE ( picardIter.LT.picardIterMax .AND. |
|
./pkg/seaice/seaice_krylov.F |
186 |
SEAICE_KRYLOV |
picardIter = picardIter + 1 |
|
./pkg/seaice/seaice_krylov.F |
230 |
SEAICE_KRYLOV |
I picardIter, 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
235 |
SEAICE_KRYLOV |
I picardIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
349 |
SEAICE_KRYLOV |
I picardIter, krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
359 |
SEAICE_KRYLOV |
I picardIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
380 |
SEAICE_KRYLOV |
& picardIterMax*(myIter-nIter0)+picardIter |
|
./pkg/seaice/seaice_krylov.F |
384 |
SEAICE_KRYLOV |
& picardIter, totalPicardItersLoc, |
|
./pkg/seaice/seaice_krylov.F |
390 |
SEAICE_KRYLOV |
& picardIter, ' / ', totalPicardItersLoc, |
|
./pkg/seaice/seaice_krylov.F |
401 |
SEAICE_KRYLOV |
IF ( picardIter .EQ. 1 ) THEN |
|
./pkg/seaice/seaice_krylov.F |
415 |
SEAICE_KRYLOV |
totalNewtonIters = totalNewtonIters + picardIter |
|
./pkg/seaice/seaice_krylov.F |
419 |
SEAICE_KRYLOV |
IF ( picardIter .EQ. picardIterMax ) THEN |
|
./pkg/seaice/seaice_krylov.F |
495 |
SEAICE_KRYLOV |
IF ( picardIter .EQ. picardIterMax ) THEN |
|
./pkg/seaice/seaice_krylov.F |
60 |
SEAICE_KRYLOV |
INTEGER picardIter |