File |
Line number |
Procedure |
Code |
./pkg/aim_v23/phy_convmf.F |
222 |
CONVMF |
FMASS = FM0(J)*MIN(FQMAX,(QA(J,K)-QATHR(J))/(QMAX-QB)) |
./pkg/aim_v23/phy_convmf.F |
223 |
CONVMF |
CBMF(J)=FMASS |
./pkg/aim_v23/phy_convmf.F |
227 |
CONVMF |
FUQ=FMASS*QMAX |
./pkg/aim_v23/phy_convmf.F |
231 |
CONVMF |
FDQ=FMASS*QB |
./pkg/aim_v23/phy_convmf.F |
234 |
CONVMF |
FDMUS = FMASS*dSEdp(J,K1)*(WVI(K1,2)-1.) |
./pkg/aim_v23/phy_convmf.F |
251 |
CONVMF |
FMASS=FMASS+ENMASS |
./pkg/aim_v23/phy_convmf.F |
261 |
CONVMF |
FDQ=FMASS*QB |
./pkg/aim_v23/phy_convmf.F |
264 |
CONVMF |
DFSE(J,K) = FMASS*(WVI(K1,2)-1.)*dSEdp(J,K1) |
./pkg/aim_v23/phy_convmf.F |
265 |
CONVMF |
& -(FMASS-ENMASS)*WVI(K,2)*dSEdp(J,K) |
./pkg/aim_v23/phy_convmf.F |
286 |
CONVMF |
PRECNV(J)=MAX(FUQ-FMASS*QSATB, 0. _d 0) |
./pkg/aim_v23/phy_convmf.F |
69 |
CONVMF |
_RL QMAX, DELQ, QB, QSATB, FMASS, ENMASS, SENTR |