| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
11 |
LSR |
SUBROUTINE LSR( ilcall, myThid ) |
|
./pkg/seaice/lsr.F |
38 |
LSR |
INTEGER ilcall |
|
./pkg/seaice/seaice_lsr.F |
1006 |
SEAICE_LSR |
IF ( ilcall .GT. 2 ) THEN |
|
./pkg/seaice/seaice_lsr.F |
1040 |
SEAICE_LSR |
I ilcall, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1045 |
SEAICE_LSR |
I ilcall, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
147 |
SEAICE_LSR |
IF ( ilcall .EQ. 1 ) THEN |
|
./pkg/seaice/seaice_lsr.F |
1748 |
SEAICE_LSR |
IF ( useHB87StressCoupling .AND. ilcall.EQ.NPSEUDOTIMESTEPS ) THEN |
|
./pkg/seaice/seaice_lsr.F |
182 |
SEAICE_LSR |
IF ( ilcall .GT. 2 ) THEN |
|
./pkg/seaice/seaice_lsr.F |
1836 |
SEAICE_LSR |
& ilcall, sqrt(resnorm), EKnorm |
|
./pkg/seaice/seaice_lsr.F |
209 |
SEAICE_LSR |
I ilcall, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
214 |
SEAICE_LSR |
I ilcall, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
39 |
SEAICE_LSR |
INTEGER ilcall |
|
./pkg/seaice/seaice_lsr.F |
7 |
SEAICE_LSR |
SUBROUTINE SEAICE_LSR( ilcall, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
970 |
SEAICE_LSR |
IF ( ilcall .EQ. 1 ) THEN |