| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_lsr.F |
142 |
SEAICE_LSR |
_RL errIni, errFD, errSum |
|
./pkg/seaice/seaice_lsr.F |
506 |
SEAICE_LSR |
errFD = uRes(i,j,bi,bj)*uRes(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
509 |
SEAICE_LSR |
errFD = errFD *errFD |
|
./pkg/seaice/seaice_lsr.F |
511 |
SEAICE_LSR |
errSum = ( errIni + errFD ) |
|
./pkg/seaice/seaice_lsr.F |
514 |
SEAICE_LSR |
uIce(i,j,bi,bj) = ( errFD *uIce(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
519 |
SEAICE_LSR |
errFD = vRes(i,j,bi,bj)*vRes(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
522 |
SEAICE_LSR |
errFD = errFD *errFD |
|
./pkg/seaice/seaice_lsr.F |
524 |
SEAICE_LSR |
errSum = ( errIni + errFD ) |
|
./pkg/seaice/seaice_lsr.F |
527 |
SEAICE_LSR |
vIce(i,j,bi,bj) = ( errFD *vIce(i,j,bi,bj) |