| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
167 |
LSR |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/lsr.F |
242 |
LSR |
& *SIGN(SINWAT, _fCori(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
247 |
LSR |
& -SIGN(SINWAT, _fCori(I,J,bi,bj))*GWATY(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
249 |
LSR |
& *(SIGN(SINWAT, _fCori(I,J,bi,bj))*GWATX(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
62 |
LSR |
_RS SINWAT |
|
./pkg/seaice/ostres.F |
34 |
OSTRES |
_RL SINWIN, COSWIN, SINWAT, COSWAT |
|
./pkg/seaice/ostres.F |
42 |
OSTRES |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/ostres.F |
76 |
OSTRES |
& -SIGN(SINWAT,COR_ICE(I,J,bi,bj)) * |
|
./pkg/seaice/ostres.F |
81 |
OSTRES |
& SIGN(SINWAT,COR_ICE(I,J,bi,bj)) * |
|
./pkg/seaice/seaice_calc_lhs.F |
172 |
SEAICE_CALC_LHS |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_calc_lhs.F |
182 |
SEAICE_CALC_LHS |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_calc_lhs.F |
77 |
SEAICE_CALC_LHS |
_RS SINWAT |
|
./pkg/seaice/seaice_calc_lhs.F |
96 |
SEAICE_CALC_LHS |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_calc_rhs.F |
104 |
SEAICE_CALC_RHS |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_calc_rhs.F |
57 |
SEAICE_CALC_RHS |
_RS SINWAT |
|
./pkg/seaice/seaice_calc_rhs.F |
66 |
SEAICE_CALC_RHS |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_calc_rhs.F |
95 |
SEAICE_CALC_RHS |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
111 |
SEAICE_EVP |
_RS SINWAT |
|
./pkg/seaice/seaice_evp.F |
188 |
SEAICE_EVP |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_evp.F |
785 |
SEAICE_EVP |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
796 |
SEAICE_EVP |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_lsr.F |
142 |
SEAICE_LSR |
_RS SINWAT |
|
./pkg/seaice/seaice_lsr.F |
258 |
SEAICE_LSR |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_lsr.F |
383 |
SEAICE_LSR |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_lsr.F |
394 |
SEAICE_LSR |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_ocean_stress.F |
109 |
SEAICE_OCEAN_STRESS |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_ocean_stress.F |
44 |
SEAICE_OCEAN_STRESS |
_RS SINWAT |
|
./pkg/seaice/seaice_ocean_stress.F |
51 |
SEAICE_OCEAN_STRESS |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_ocean_stress.F |
98 |
SEAICE_OCEAN_STRESS |
& - SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_preconditioner.F |
116 |
SEAICE_PRECONDITIONER |
_RS SINWAT |
|
./pkg/seaice/seaice_preconditioner.F |
141 |
SEAICE_PRECONDITIONER |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_preconditioner.F |
243 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
249 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
304 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
311 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
354 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
439 |
SEAICE_PRECOND_RHSU |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
472 |
SEAICE_PRECOND_RHSU |
_RS SINWAT |
|
./pkg/seaice/seaice_preconditioner.F |
515 |
SEAICE_PRECOND_RHSU |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_preconditioner.F |
544 |
SEAICE_PRECOND_RHSV |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
577 |
SEAICE_PRECOND_RHSV |
_RS SINWAT |
|
./pkg/seaice/seaice_preconditioner.F |
620 |
SEAICE_PRECOND_RHSV |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |