Symbol | Description | Uses |
S1 | 9 |
File | Line number | Procedure | Code |
./pkg/seaice/lsr.F | 314 | LSR |
S1=ZERO |
./pkg/seaice/lsr.F | 319 | LSR |
S1=MAX(ABS(UERR(I,J,bi,bj)),S1) |
./pkg/seaice/lsr.F | 322 | LSR |
_GLOBAL_MAX_R8( S1, myThid ) |
./pkg/seaice/lsr.F | 326 | LSR |
IF(M.GT.1.AND.S1.GT.S1A) WFAU=WFAU2 |
./pkg/seaice/lsr.F | 327 | LSR |
S1A=S1 |
./pkg/seaice/lsr.F | 328 | LSR |
IF(S1.LT.LSR_ERROR) THEN |
./pkg/seaice/lsr.F | 348 | LSR |
write(*,'(A,I6,1P2E22.14)')' U lsr iters, error = ',ICOUNT1,S1 |
./pkg/seaice/lsr.F | 48 | LSR |
_RL AA1, AA2, AA3, AA4, AA5, AA6, S1, S2, S1A, S2A |