File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_solve4temp.F |
133 |
SEAICE_SOLVE4TEMP |
_RL dqh_dTs (1:sNx,1:sNy) |
./pkg/seaice/seaice_solve4temp.F |
234 |
SEAICE_SOLVE4TEMP |
dqh_dTs (I,J) = 0. _d 0 |
./pkg/seaice/seaice_solve4temp.F |
379 |
SEAICE_SOLVE4TEMP |
dqh_dTs(I,J) = 0. _d 0 |
./pkg/seaice/seaice_solve4temp.F |
395 |
SEAICE_SOLVE4TEMP |
dqh_dTs(I,J) = cc1*cc3t/((cc2-cc3t*Ppascals)**2 *t2) |
./pkg/seaice/seaice_solve4temp.F |
410 |
SEAICE_SOLVE4TEMP |
dqh_dTs(I,J) = ZERO |
./pkg/seaice/seaice_solve4temp.F |
420 |
SEAICE_SOLVE4TEMP |
& + D1I*UG(I,J)*dqh_dTs(I,J) |
./pkg/seaice/seaice_solve4temp.F |
525 |
SEAICE_SOLVE4TEMP |
& + D1I*UG(I,J)*dqh_dTs(I,J)*delTsurf |