| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
135 |
DYNSOLVER |
& (COSWIN*U1-SIGN(SINWIN, _fCori(I,J,bi,bj))*V1) |
|
./pkg/seaice/dynsolver.F |
137 |
DYNSOLVER |
& (SIGN(SINWIN, _fCori(I,J,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/dynsolver.F |
152 |
DYNSOLVER |
& (COSWIN*U1-SIGN(SINWIN, _fCori(I,J,bi,bj))*V1) |
|
./pkg/seaice/dynsolver.F |
154 |
DYNSOLVER |
& (SIGN(SINWIN, _fCori(I,J,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/dynsolver.F |
55 |
DYNSOLVER |
_RL COSWIN |
|
./pkg/seaice/dynsolver.F |
71 |
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 |
109 |
SEAICE_GET_DYNFORCING |
& (COSWIN*U1-SIGN(SINWIN, _fCori(i,j,bi,bj))*V1) |
|
./pkg/seaice/seaice_get_dynforcing.F |
111 |
SEAICE_GET_DYNFORCING |
& (SIGN(SINWIN, _fCori(i,j,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/seaice_get_dynforcing.F |
178 |
SEAICE_GET_DYNFORCING |
& ( CDAIR(i,j)*(COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
186 |
SEAICE_GET_DYNFORCING |
& +CDAIR(i-1,j)*(COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
201 |
SEAICE_GET_DYNFORCING |
& +COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
209 |
SEAICE_GET_DYNFORCING |
& +COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
222 |
SEAICE_GET_DYNFORCING |
& COSWIN *uWind(i ,j,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
225 |
SEAICE_GET_DYNFORCING |
& COSWIN *uWind(i-1,j,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
232 |
SEAICE_GET_DYNFORCING |
& +COSWIN*vWind(i,j ,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
235 |
SEAICE_GET_DYNFORCING |
& +COSWIN*vWind(i,j-1,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
64 |
SEAICE_GET_DYNFORCING |
_RL COSWIN |
|
./pkg/seaice/seaice_get_dynforcing.F |
82 |
SEAICE_GET_DYNFORCING |
COSWIN=COS(SEAICE_airTurnAngle*deg2rad) |