| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
248 |
DYNSOLVER |
DRAGA(I,J,bi,bj)=DWATN(I,J,bi,bj)*SINWAT+COR_ICE(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
252 |
DYNSOLVER |
& -SINWAT*GWATY(I,J,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
254 |
DYNSOLVER |
& *(SINWAT*GWATX(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
355 |
DYNSOLVER |
DRAGA(I,J,bi,bj)=DWATN(I,J,bi,bj)*SINWAT+COR_ICE(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
359 |
DYNSOLVER |
& -SINWAT*GWATY(I,J,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
361 |
DYNSOLVER |
& *(SINWAT*GWATX(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
43 |
DYNSOLVER |
_RL RHOICE, RHOAIR, SINWIN, COSWIN, SINWAT, COSWAT |
|
./pkg/seaice/dynsolver.F |
71 |
DYNSOLVER |
SINWAT=0.4226 _d 0 |
|
./pkg/seaice/dynsolver.F |
77 |
DYNSOLVER |
SINWAT=ZERO |
|
./pkg/seaice/ostres.F |
34 |
OSTRES |
_RL SINWIN, COSWIN, SINWAT, COSWAT |
|
./pkg/seaice/ostres.F |
39 |
OSTRES |
SINWAT=0.4226 _d 0 |
|
./pkg/seaice/ostres.F |
44 |
OSTRES |
SINWAT=ZERO |
|
./pkg/seaice/ostres.F |
58 |
OSTRES |
& -SINWAT*(GWATY(I,J,bi,bj)-VICEC(I,J,bi,bj))) |
|
./pkg/seaice/ostres.F |
60 |
OSTRES |
& *(SINWAT*(GWATX(I,J,bi,bj)-UICEC(I,J,bi,bj)) |