File |
Line number |
Procedure |
Code |
./pkg/aim_v23/phy_shtorh.F |
43 |
SHTORH |
_RL E0, C1, C2, T0, T1, T2, QS1, QS2 |
./pkg/aim_v23/phy_shtorh.F |
57 |
SHTORH |
QS2= .378 _d 0 |
./pkg/aim_v23/phy_shtorh.F |
68 |
SHTORH |
QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ) |
./pkg/aim_v23/phy_shtorh.F |
70 |
SHTORH |
RH(J) = QSAT(J)*C1*(T0-T1)*recT*recT*sigP/(sigP-QS2*tmpQ) |
./pkg/aim_v23/phy_shtorh.F |
73 |
SHTORH |
QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ) |
./pkg/aim_v23/phy_shtorh.F |
75 |
SHTORH |
RH(J) = QSAT(J)*C2*(T0-T2)*recT*recT*sigP/(sigP-QS2*tmpQ) |
./pkg/aim_v23/phy_shtorh.F |
92 |
SHTORH |
QSAT(J)= QS1*QSAT(J)/( PS(1) - QS2*QSAT(J)) |
./pkg/aim_v23/phy_shtorh.F |
96 |
SHTORH |
QSAT(J)= QS1*QSAT(J)/(SIG*PS(J)- QS2*QSAT(J)) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
43 |
BULKF_SH2RH_AIM |
_RL E0, C1, C2, T0, T1, T2, QS1, QS2 |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
57 |
BULKF_SH2RH_AIM |
QS2= .378 _d 0 |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
68 |
BULKF_SH2RH_AIM |
QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
70 |
BULKF_SH2RH_AIM |
RH(J) = QSAT(J)*C1*(T0-T1)*recT*recT*sigP/(sigP-QS2*tmpQ) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
73 |
BULKF_SH2RH_AIM |
QSAT(J)= QS1*tmpQ/(sigP-QS2*tmpQ) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
75 |
BULKF_SH2RH_AIM |
RH(J) = QSAT(J)*C2*(T0-T2)*recT*recT*sigP/(sigP-QS2*tmpQ) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
92 |
BULKF_SH2RH_AIM |
QSAT(J)= QS1*QSAT(J)/( PS(1) - QS2*QSAT(J)) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
96 |
BULKF_SH2RH_AIM |
QSAT(J)= QS1*QSAT(J)/(SIG*PS(J)- QS2*QSAT(J)) |