Symbol | Description | Uses |
S2 | 9 |
File | Line number | Procedure | Code |
./pkg/seaice/lsr.F | 48 | LSR |
_RL AA1, AA2, AA3, AA4, AA5, AA6, S1, S2, S1A, S2A |
./pkg/seaice/lsr.F | 538 | LSR |
S2=ZERO |
./pkg/seaice/lsr.F | 543 | LSR |
S2=MAX(ABS(UERR(I,J,bi,bj)),S2) |
./pkg/seaice/lsr.F | 546 | LSR |
_GLOBAL_MAX_R8( S2, myThid ) |
./pkg/seaice/lsr.F | 550 | LSR |
IF(M.GT.1.AND.S2.GT.S2A) WFAV=WFAV2 |
./pkg/seaice/lsr.F | 551 | LSR |
S2A=S2 |
./pkg/seaice/lsr.F | 552 | LSR |
IF(S2.LT.LSR_ERROR) THEN |
./pkg/seaice/lsr.F | 573 | LSR |
write(*,'(A,I6,1P2E22.14)')' V lsr iters, error = ',ICOUNT2,S2 |