| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
138 |
DYNSOLVER |
& (COSWIN*U1-SIGN(SINWIN, _fCori(I,J,bi,bj))*V1) |
|
./pkg/seaice/dynsolver.F |
140 |
DYNSOLVER |
& (SIGN(SINWIN, _fCori(I,J,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/dynsolver.F |
155 |
DYNSOLVER |
& (COSWIN*U1-SIGN(SINWIN, _fCori(I,J,bi,bj))*V1) |
|
./pkg/seaice/dynsolver.F |
157 |
DYNSOLVER |
& (SIGN(SINWIN, _fCori(I,J,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/dynsolver.F |
58 |
DYNSOLVER |
_RL COSWIN |
|
./pkg/seaice/dynsolver.F |
74 |
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 |
121 |
SEAICE_GET_DYNFORCING |
& (COSWIN*U1-SIGN(SINWIN, _fCori(i,j,bi,bj))*V1) |
|
./pkg/seaice/seaice_get_dynforcing.F |
123 |
SEAICE_GET_DYNFORCING |
& (SIGN(SINWIN, _fCori(i,j,bi,bj))*U1+COSWIN*V1) |
|
./pkg/seaice/seaice_get_dynforcing.F |
190 |
SEAICE_GET_DYNFORCING |
& ( CDAIR(i,j)*(COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
198 |
SEAICE_GET_DYNFORCING |
& +CDAIR(i-1,j)*(COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
213 |
SEAICE_GET_DYNFORCING |
& +COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
221 |
SEAICE_GET_DYNFORCING |
& +COSWIN* |
|
./pkg/seaice/seaice_get_dynforcing.F |
234 |
SEAICE_GET_DYNFORCING |
& COSWIN *uWind(i ,j,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
237 |
SEAICE_GET_DYNFORCING |
& COSWIN *uWind(i-1,j,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
244 |
SEAICE_GET_DYNFORCING |
& +COSWIN*vWind(i,j ,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
247 |
SEAICE_GET_DYNFORCING |
& +COSWIN*vWind(i,j-1,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
72 |
SEAICE_GET_DYNFORCING |
_RL COSWIN |
|
./pkg/seaice/seaice_get_dynforcing.F |
94 |
SEAICE_GET_DYNFORCING |
COSWIN=COS(SEAICE_airTurnAngle*deg2rad) |