source: mso/eml/mixers_splitters/mixer.mso @ 46

Last change on this file since 46 was 1, checked in by Rafael de Pelegrini Soares, 16 years ago

Initial import of the library

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1.7 KB
Line 
1#*-------------------------------------------------------------------
2* Model of a mixer
3*--------------------------------------------------------------------
4*
5*       Streams:
6*               * "Ninlet" inlet streams
7*               * a outlet stream
8*
9*       Assumptions:
10*               * thermodynamics equilibrium
11*               * adiabatic
12*                       
13*       Specify:
14*               * the inlet streams
15*
16*----------------------------------------------------------------------
17* Author: Maurício Carvalho Maciel
18* $Id: mixer.mso 1 2006-06-20 17:33:53Z rafael $
19*--------------------------------------------------------------------*#
20
21using "stage_separators/flash";
22
23Model mixer as flash_Steady
24        PARAMETERS
25ext     NComp as Integer (Brief = "Number of chemical components", Lower = 1);
26        Ninlet as Integer (Brief = "Number of Inlet Streams", Lower = 1, Default = 2);
27       
28        VARIABLES
29in  Inlet_mixer(Ninlet) as stream;      #(Brief = "Inlet streams", Lower = 1);
30out Outlet                      as stream;      #(Brief = "Outlet stream", Default = 1, Lower = 1, Upper = 1);
31out Out_int                             as stream;  #(Brief = "Intermediate Outlet stream", Default = 1, Lower = 1, Upper = 1);
32        zeroQ as heat_rate (Brief="No Heat rate supplied");
33       
34        CONNECTIONS
35       
36        Out_int to Inlet;
37        zeroQ to Q;
38
39        EQUATIONS
40       
41        "Flow"
42        Out_int.F = sum(Inlet_mixer.F);
43               
44         for i in [1:NComp]
45       
46                "Composition"
47        Out_int.F*Out_int.z(i) = sum(Inlet_mixer.F*Inlet_mixer.z(i));
48    end
49
50        "Energy Balance"
51        Out_int.F*Out_int.h = sum(Inlet_mixer.F*Inlet_mixer.h);
52       
53        "Pressure"
54        Out_int.P = min(Inlet_mixer.P);
55        Out_int.P = OutletV.P;
56       
57        "Temperature"
58        Out_int.T = OutletV.T;
59       
60        "Vapourisation Fraction"
61        Out_int.v = vfrac;
62       
63        Outlet.F = Inlet.F;
64        Outlet.z = Inlet.z;
65        Outlet.v = Inlet.v;
66        Outlet.T = Inlet.T;
67        Outlet.h = Inlet.h;
68        Outlet.P = Inlet.P;
69       
70        SPECIFY
71        zeroQ = 0*"kW";
72end
73
Note: See TracBrowser for help on using the repository browser.