Changeset 890 for branches/new_gui/eml/streams/streams.mso
- Timestamp:
- Nov 13, 2009, 5:04:29 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/new_gui/eml/streams/streams.mso
r889 r890 23 23 24 24 Model stream 25 ATTRIBUTES 25 26 ATTRIBUTES 26 27 Pallete = false; 27 28 Brief = "General Material Stream"; … … 31 32 from this model."; 32 33 33 34 PARAMETERS 34 35 outer NComp as Integer (Brief = "Number of chemical components", Lower = 1); 35 36 36 37 VARIABLES 37 38 F as flow_mol (Brief = "Stream Molar Flow Rate"); 38 39 T as temperature (Brief = "Stream Temperature"); … … 44 45 45 46 Model liquid_stream as stream 46 ATTRIBUTES 47 48 ATTRIBUTES 47 49 Pallete = false; 48 50 Brief = "Liquid Material Stream"; … … 52 54 is known ''a priori''."; 53 55 54 56 PARAMETERS 55 57 outer PP as Plugin(Brief = "External Physical Properties", Type="PP"); 56 58 57 58 59 EQUATIONS 60 "Liquid Enthalpy" 59 61 h = PP.LiquidEnthalpy(T, P, z); 60 "Liquid stream" 62 63 "Liquid stream" 61 64 v = 0; 62 65 end 63 66 64 67 Model vapour_stream as stream 65 ATTRIBUTES 68 69 ATTRIBUTES 66 70 Pallete = false; 67 71 Brief = "Vapour Material Stream"; … … 71 75 is known ''a priori''."; 72 76 73 77 PARAMETERS 74 78 outer PP as Plugin(Brief = "External Physical Properties", Type="PP"); 75 79 76 77 80 EQUATIONS 81 "Vapour Enthalpy" 78 82 h = PP.VapourEnthalpy(T, P, z); 79 "Vapour stream" 83 84 "Vapour stream" 80 85 v = 1; 81 86 end 82 87 83 Model streamPH as stream 84 ATTRIBUTES 88 Model streamPH as stream 89 90 ATTRIBUTES 85 91 Brief = "Stream with built-in flash calculation"; 86 92 Info = " … … 97 103 Pallete = false; 98 104 99 105 PARAMETERS 100 106 outer PP as Plugin(Brief = "External Physical Properties", Type="PP"); 101 107 102 108 VARIABLES 103 109 x(NComp) as fraction (Brief = "Liquid Molar Fraction",Hidden=true); 104 110 y(NComp) as fraction (Brief = "Vapour Molar Fraction",Hidden=true); 105 111 106 107 112 EQUATIONS 113 "Flash Calculation" 108 114 [v, x, y] = PP.FlashPH(P, h, z); 109 115 110 116 "Enthalpy" 111 117 h = (1-v)*PP.LiquidEnthalpy(T, P, x) + v*PP.VapourEnthalpy(T, P, y); 112 118 113 119 end 114 120 115 Model streamPHS as streamPH 116 ATTRIBUTES 121 Model streamPHS as streamPH 122 123 ATTRIBUTES 117 124 Brief = "Stream with built-in flash calculation"; 118 125 Info = "
Note: See TracChangeset
for help on using the changeset viewer.