| 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 |
59 |
DYNSOLVER |
_RS SINWIN |
|
./pkg/seaice/dynsolver.F |
73 |
DYNSOLVER |
SINWIN=SIN(SEAICE_airTurnAngle*deg2rad) |
|
./pkg/seaice/ostres.F |
34 |
OSTRES |
_RL SINWIN, COSWIN, SINWAT, COSWAT |
|
./pkg/seaice/ostres.F |
40 |
OSTRES |
SINWIN=SIN(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 |
194 |
SEAICE_GET_DYNFORCING |
& -SIGN(SINWIN, _fCori(i,j,bi,bj))* |
|
./pkg/seaice/seaice_get_dynforcing.F |
202 |
SEAICE_GET_DYNFORCING |
& -SIGN(SINWIN, _fCori(i-1,j,bi,bj))* |
|
./pkg/seaice/seaice_get_dynforcing.F |
209 |
SEAICE_GET_DYNFORCING |
& ( CDAIR(i,j)*(SIGN(SINWIN, _fCori(i,j,bi,bj))* |
|
./pkg/seaice/seaice_get_dynforcing.F |
217 |
SEAICE_GET_DYNFORCING |
& +CDAIR(i,j-1)*(SIGN(SINWIN, _fCori(i,j-1,bi,bj))* |
|
./pkg/seaice/seaice_get_dynforcing.F |
235 |
SEAICE_GET_DYNFORCING |
& -SIGN(SINWIN, _fCori(i ,j,bi,bj))*vWind(i ,j,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
238 |
SEAICE_GET_DYNFORCING |
& -SIGN(SINWIN, _fCori(i-1,j,bi,bj))*vWind(i-1,j,bi,bj) ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
243 |
SEAICE_GET_DYNFORCING |
& SIGN(SINWIN, _fCori(i,j ,bi,bj))*uWind(i,j ,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
246 |
SEAICE_GET_DYNFORCING |
& SIGN(SINWIN, _fCori(i,j-1,bi,bj))*uWind(i,j-1,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
73 |
SEAICE_GET_DYNFORCING |
_RS SINWIN |
|
./pkg/seaice/seaice_get_dynforcing.F |
93 |
SEAICE_GET_DYNFORCING |
SINWIN=SIN(SEAICE_airTurnAngle*deg2rad) |