Changeset 372 for trunk/eml/pressure_changers/pump.mso
- Timestamp:
- Sep 21, 2007, 7:17:36 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/eml/pressure_changers/pump.mso
r353 r372 54 54 BPower as power (Brief = "Brake Power"); 55 55 EPower as power (Brief = "Eletrical Potency"); 56 P diff as press_delta (Brief = "Pressure Increase", DisplayUnit='kPa');57 P ratio as positive (Brief = "Pressure Ratio");56 Pratio as positive (Brief = "Pressure Ratio", Symbol ="P_{ratio}"); 57 Pdrop as press_delta (Brief = "Pressure Drop", DisplayUnit = 'kPa', Symbol ="\Delta P"); 58 58 Head as head (Brief = "Head Developed"); 59 59 Head_is as head (Brief = "Isoentripic Head"); … … 90 90 vm = PP.LiquidVolume(Inlet.T,Inlet.P,Inlet.z); 91 91 92 #Mass and Energy Balance and Pump Equations 93 "Calculate Outlet Stream Pressure" 94 Outlet.P = Inlet.P + Pdiff; 95 96 "Pratio Definition" 92 "Pressure Ratio" 97 93 Outlet.P = Inlet.P * Pratio; 98 94 95 "Pressure Drop" 96 Outlet.P = Inlet.P - Pdrop; 97 99 98 "Calculate Isentropic Head" 100 Head_is = Pdiff* Mwm/rho;99 Head_is = -Pdrop * Mwm/rho; 101 100 102 101 "Calculate Real Head" … … 116 115 117 116 "Calculate Outlet Temperature" 118 (Outlet.T - Inlet.T) * Cp = (Outlet.h - Inlet.h) - Pdiff* Mwm / rho * (1 - Beta * Inlet.T);117 (Outlet.T - Inlet.T) * Cp = (Outlet.h - Inlet.h) + Pdrop * Mwm / rho * (1 - Beta * Inlet.T); 119 118 120 119 "Molar Balance"
Note: See TracChangeset
for help on using the changeset viewer.