| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
164 |
LSR |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/lsr.F |
239 |
LSR |
& *SIGN(SINWAT, _fCori(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
244 |
LSR |
& -SIGN(SINWAT, _fCori(I,J,bi,bj))*GWATY(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
246 |
LSR |
& *(SIGN(SINWAT, _fCori(I,J,bi,bj))*GWATX(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
59 |
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 |
174 |
SEAICE_CALC_LHS |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_calc_lhs.F |
184 |
SEAICE_CALC_LHS |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_calc_lhs.F |
74 |
SEAICE_CALC_LHS |
_RS SINWAT |
|
./pkg/seaice/seaice_calc_lhs.F |
87 |
SEAICE_CALC_LHS |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_calc_rhs.F |
57 |
SEAICE_CALC_RHS |
_RS SINWAT |
|
./pkg/seaice/seaice_calc_rhs.F |
63 |
SEAICE_CALC_RHS |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_calc_rhs.F |
76 |
SEAICE_CALC_RHS |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_calc_rhs.F |
85 |
SEAICE_CALC_RHS |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
119 |
SEAICE_EVP |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_evp.F |
494 |
SEAICE_EVP |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
505 |
SEAICE_EVP |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
90 |
SEAICE_EVP |
_RS SINWAT |
|
./pkg/seaice/seaice_lsr.F |
132 |
SEAICE_LSR |
_RS SINWAT |
|
./pkg/seaice/seaice_lsr.F |
219 |
SEAICE_LSR |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_lsr.F |
326 |
SEAICE_LSR |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_lsr.F |
337 |
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 |
114 |
SEAICE_PRECONDITIONER |
_RS SINWAT |
|
./pkg/seaice/seaice_preconditioner.F |
139 |
SEAICE_PRECONDITIONER |
SINWAT=SIN(SEAICE_waterTurnAngle*deg2rad) |
|
./pkg/seaice/seaice_preconditioner.F |
239 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
244 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
300 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
306 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
348 |
SEAICE_PRECONDITIONER |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
432 |
SEAICE_PRECOND_RHSU |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
461 |
SEAICE_PRECOND_RHSU |
_RS SINWAT |
|
./pkg/seaice/seaice_preconditioner.F |
525 |
SEAICE_PRECOND_RHSU |
& - SIGN(SINWAT, _fCori(I,J,bi,bj))* 0.5 _d 0 * |
|
./pkg/seaice/seaice_preconditioner.F |
554 |
SEAICE_PRECOND_RHSV |
I dwatPre, coriFac, fricFac, SINWAT, COSWAT, |
|
./pkg/seaice/seaice_preconditioner.F |
583 |
SEAICE_PRECOND_RHSV |
_RS SINWAT |
|
./pkg/seaice/seaice_preconditioner.F |
647 |
SEAICE_PRECOND_RHSV |
& + SIGN(SINWAT, _fCori(I,J,bi,bj)) * 0.5 _d 0 * |