Symbol | Description | Uses |
EKnorm | 8 |
File | Line number | Procedure | Code |
./pkg/seaice/seaice_lsr.F | 145 | SEAICE_LSR |
_RL resnorm, EKnorm, counter |
./pkg/seaice/seaice_lsr.F | 936 | SEAICE_LSR |
EKnorm = 0. _d 0 |
./pkg/seaice/seaice_lsr.F | 949 | SEAICE_LSR |
EKnorm = EKnorm + 0.5 _d 0 * heff(i,j,bi,bj) * |
./pkg/seaice/seaice_lsr.F | 959 | SEAICE_LSR |
_GLOBAL_SUM_RL( EKnorm, myThid ) |
./pkg/seaice/seaice_lsr.F | 961 | SEAICE_LSR |
IF ( counter .gt. 0. _d 0 ) EKnorm = EKnorm/counter |
./pkg/seaice/seaice_lsr.F | 965 | SEAICE_LSR |
& ipass, sqrt(resnorm), EKnorm |