File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_solve4temp.F |
117 |
SEAICE_SOLVE4TEMP |
_RL aa1,aa2,bb1,bb2,Ppascals,cc0,cc1,cc2,cc3t |
./pkg/seaice/seaice_solve4temp.F |
174 |
SEAICE_SOLVE4TEMP |
bb1 = 0.622 _d 0 |
./pkg/seaice/seaice_solve4temp.F |
175 |
SEAICE_SOLVE4TEMP |
bb2 = 1.0 _d 0 - bb1 |
./pkg/seaice/seaice_solve4temp.F |
179 |
SEAICE_SOLVE4TEMP |
cc1 = cc0*aa1*bb1*Ppascals*lnTEN |
./pkg/seaice/seaice_solve4temp.F |
389 |
SEAICE_SOLVE4TEMP |
qhice(I,J) = bb1*mm_pi/( Ppascals -(1.0 _d 0 - bb1)*mm_pi ) |
./pkg/seaice/seaice_solve4temp.F |
504 |
SEAICE_SOLVE4TEMP |
qhice(I,J) = bb1*mm_pi/( Ppascals -(1.0 _d 0 - bb1)*mm_pi ) |