| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_vdifsc.F |
144 |
VDIFSC |
FLUXSE = FSHCQ *DMSE/CP |
|
./pkg/aim_v23/phy_vdifsc.F |
145 |
VDIFSC |
TTENVD(J,NL1) = FLUXSE*RSIG(NL1) |
|
./pkg/aim_v23/phy_vdifsc.F |
146 |
VDIFSC |
TTENVD(J,Ktmp) =-FLUXSE*RSIG(Ktmp) |
|
./pkg/aim_v23/phy_vdifsc.F |
199 |
VDIFSC |
FLUXSE = DMSE*CVDI(J)/(TRVDS*CP) |
|
./pkg/aim_v23/phy_vdifsc.F |
200 |
VDIFSC |
TTENVD(J,K ) = TTENVD(J,K )+FLUXSE*RSIG(K) |
|
./pkg/aim_v23/phy_vdifsc.F |
201 |
VDIFSC |
TTENVD(J,K+1) = TTENVD(J,K+1)-FLUXSE*RSIG(K+1) |
|
./pkg/aim_v23/phy_vdifsc.F |
74 |
VDIFSC |
_RL DRH0, DRH, DMSE, FLUXSE, FLUXQ |