| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
131 |
DYNSOLVER |
& (COSWIN*U1-SIGN(SINWIN, _fCori(I,J,bi,bj))*V1) |
|
./pkg/seaice/dynsolver.F |
133 |
DYNSOLVER |
& (SIGN(SINWIN, _fCori(I,J,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/dynsolver.F |
148 |
DYNSOLVER |
& (COSWIN*U1-SIGN(SINWIN, _fCori(I,J,bi,bj))*V1) |
|
./pkg/seaice/dynsolver.F |
150 |
DYNSOLVER |
& (SIGN(SINWIN, _fCori(I,J,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/dynsolver.F |
54 |
DYNSOLVER |
_RL COSWIN, COSWAT |
|
./pkg/seaice/dynsolver.F |
70 |
DYNSOLVER |
COSWIN=COS(SEAICE_airTurnAngle*deg2rad) |
|
./pkg/seaice/ostres.F |
34 |
OSTRES |
_RL SINWIN, COSWIN, SINWAT, COSWAT |
|
./pkg/seaice/ostres.F |
41 |
OSTRES |
COSWIN=COS(SEAICE_airTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_get_dynforcing.F |
101 |
SEAICE_GET_DYNFORCING |
& (SIGN(SINWIN, _fCori(I,J,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/seaice_get_dynforcing.F |
161 |
SEAICE_GET_DYNFORCING |
& (CDAIR(I,J)*(COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
169 |
SEAICE_GET_DYNFORCING |
& +CDAIR(I-1,J)*(COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
183 |
SEAICE_GET_DYNFORCING |
& +COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
191 |
SEAICE_GET_DYNFORCING |
& +COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
203 |
SEAICE_GET_DYNFORCING |
& COSWIN *uWind(I ,J,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
206 |
SEAICE_GET_DYNFORCING |
& COSWIN *uWind(I-1,J,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
213 |
SEAICE_GET_DYNFORCING |
& +COSWIN*vWind(I,J ,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
216 |
SEAICE_GET_DYNFORCING |
& +COSWIN*vWind(I,J-1,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
58 |
SEAICE_GET_DYNFORCING |
_RL COSWIN |
|
./pkg/seaice/seaice_get_dynforcing.F |
73 |
SEAICE_GET_DYNFORCING |
COSWIN=COS(SEAICE_airTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_get_dynforcing.F |
99 |
SEAICE_GET_DYNFORCING |
& (COSWIN*U1-SIGN(SINWIN, _fCori(I,J,bi,bj))*V1) |