| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_vdifsc.F |
149 |
VDIFSC |
FLUXQ = FSHCQ*QSAT(J,Ktmp)*DRH |
|
./pkg/aim_v23/phy_vdifsc.F |
150 |
VDIFSC |
QTENVD(J,NL1) = FLUXQ*RSIG(NL1) |
|
./pkg/aim_v23/phy_vdifsc.F |
151 |
VDIFSC |
QTENVD(J,Ktmp) =-FLUXQ*RSIG(Ktmp) |
|
./pkg/aim_v23/phy_vdifsc.F |
157 |
VDIFSC |
FLUXQ = QSAT(J,NL1)*DRH*CVDI(J)/TRVDI |
|
./pkg/aim_v23/phy_vdifsc.F |
158 |
VDIFSC |
QTENVD(J,NL1) = FLUXQ*RSIG(NL1) |
|
./pkg/aim_v23/phy_vdifsc.F |
159 |
VDIFSC |
QTENVD(J,Ktmp) =-FLUXQ*RSIG(Ktmp) |
|
./pkg/aim_v23/phy_vdifsc.F |
178 |
VDIFSC |
FLUXQ = QSAT(J,K)*DRH*CVDI(J)/TRVDI |
|
./pkg/aim_v23/phy_vdifsc.F |
179 |
VDIFSC |
QTENVD(J,K) = QTENVD(J,K) +FLUXQ*RSIG(K) |
|
./pkg/aim_v23/phy_vdifsc.F |
180 |
VDIFSC |
QTENVD(J,K+1)= QTENVD(J,K+1)-FLUXQ*RSIG(K+1) |
|
./pkg/aim_v23/phy_vdifsc.F |
74 |
VDIFSC |
_RL DRH0, DRH, DMSE, FLUXSE, FLUXQ |