| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
203 |
SEAICE_DO_RIDGING |
doRidgeAgain = .TRUE. |
|
./pkg/seaice/seaice_do_ridging.F |
205 |
SEAICE_DO_RIDGING |
DO WHILE (doRidgeAgain) |
|
./pkg/seaice/seaice_do_ridging.F |
408 |
SEAICE_DO_RIDGING |
doRidgeAgain = .FALSE. |
|
./pkg/seaice/seaice_do_ridging.F |
415 |
SEAICE_DO_RIDGING |
doRidgeAgain = .TRUE. |
|
./pkg/seaice/seaice_do_ridging.F |
427 |
SEAICE_DO_RIDGING |
IF ( doRidgeAgain .AND. n.GE.SEAICEridgingIterMax ) THEN |
|
./pkg/seaice/seaice_do_ridging.F |
439 |
SEAICE_DO_RIDGING |
doRidgeAgain = doRidgeAgain .AND. n.LT.SEAICEridgingIterMax |
|
./pkg/seaice/seaice_do_ridging.F |
440 |
SEAICE_DO_RIDGING |
IF ( doRidgeAgain .AND. debugLevel .GE. debLevA ) THEN |
|
./pkg/seaice/seaice_do_ridging.F |
448 |
SEAICE_DO_RIDGING |
IF ( doRidgeAgain ) CALL SEAICE_PREPARE_RIDGING( |
|
./pkg/seaice/seaice_do_ridging.F |
92 |
SEAICE_DO_RIDGING |
LOGICAL doRidgeAgain, areaTooLarge |