| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_shtorh.F |
44 |
SHTORH |
_RL sigP, recT, tmpQ |
|
./pkg/aim_v23/phy_shtorh.F |
69 |
SHTORH |
recT = 1. _d 0 / (TA(J)-T1) |
|
./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 |
74 |
SHTORH |
recT = 1. _d 0 / (TA(J)-T2) |
|
./pkg/aim_v23/phy_shtorh.F |
75 |
SHTORH |
RH(J) = QSAT(J)*C2*(T0-T2)*recT*recT*sigP/(sigP-QS2*tmpQ) |
|
./pkg/bulk_force/bulkf_sh2rh_aim.F |
44 |
BULKF_SH2RH_AIM |
_RL sigP, recT, tmpQ |
|
./pkg/bulk_force/bulkf_sh2rh_aim.F |
69 |
BULKF_SH2RH_AIM |
recT = 1. _d 0 / (TA(J)-T1) |
|
./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 |
74 |
BULKF_SH2RH_AIM |
recT = 1. _d 0 / (TA(J)-T2) |
|
./pkg/bulk_force/bulkf_sh2rh_aim.F |
75 |
BULKF_SH2RH_AIM |
RH(J) = QSAT(J)*C2*(T0-T2)*recT*recT*sigP/(sigP-QS2*tmpQ) |