| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_lsr.F |
152 |
SEAICE_LSR |
_RL errIni, errFD, errSum |
|
./pkg/seaice/seaice_lsr.F |
589 |
SEAICE_LSR |
errFD = uRes(i,j,bi,bj)*uRes(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
592 |
SEAICE_LSR |
errFD = errFD *errFD |
|
./pkg/seaice/seaice_lsr.F |
594 |
SEAICE_LSR |
errSum = ( errIni + errFD ) |
|
./pkg/seaice/seaice_lsr.F |
597 |
SEAICE_LSR |
uIce(i,j,bi,bj) = ( errFD *uIce(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
602 |
SEAICE_LSR |
errFD = vRes(i,j,bi,bj)*vRes(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
605 |
SEAICE_LSR |
errFD = errFD *errFD |
|
./pkg/seaice/seaice_lsr.F |
607 |
SEAICE_LSR |
errSum = ( errIni + errFD ) |
|
./pkg/seaice/seaice_lsr.F |
610 |
SEAICE_LSR |
vIce(i,j,bi,bj) = ( errFD *vIce(i,j,bi,bj) |