source: trunk/eml/costs/flash_cost.mso @ 970

Last change on this file since 970 was 918, checked in by Rafael de Pelegrini Soares, 13 years ago

Fixed some flash and cost models

File size: 3.3 KB
Line 
1#*-------------------------------------------------------------------
2* EMSO Model Library (EML) Copyright (C) 2004 - 2007 ALSOC.
3*
4* This LIBRARY is free software; you can distribute it and/or modify
5* it under the therms of the ALSOC FREE LICENSE as available at
6* http://www.enq.ufrgs.br/alsoc.
7*
8* EMSO Copyright (C) 2004 - 2007 ALSOC, original code
9* from http://www.rps.eng.br Copyright (C) 2002-2004.
10* All rights reserved.
11*
12* EMSO is distributed under the therms of the ALSOC LICENSE as
13* available at http://www.enq.ufrgs.br/alsoc.
14*
15*-------------------------------------------------------------------
16* Model of costs for a dynamic flash
17*--------------------------------------------------------------------
18*       - Streams
19*               * a liquid outlet stream
20*               * a vapour outlet stream
21*               * a feed stream
22*
23*       - Assumptions
24*               * both phases are perfectly mixed
25*
26*       - Specify:
27*               * the feed stream;
28*               * the outlet flows: OutletV.F and OutletL.F
29*
30*       - Initial:
31*               * the flash initial temperature (OutletL.T)
32*               * the flash initial liquid level (Ll)
33*               * (NoComps - 1) OutletL (OR OutletV) compositions
34*
35*       - This model is valid if:
36*         369 kg < Equipment Weight (horizontal) < 415000kg
37*             2210 kg < Equipment Weight (vertical) < 103000kg
38*             0.92m < Di (horizontal) < 3.66m
39*             1.83m < Di (vertical) < 3.05m
40*             3.66m < Flash Length (vertical) < 6.10m
41*----------------------------------------------------------------------
42* Author: Núbia do Carmo Ferreira
43* $Id: flash.mso 118 2007-01-15 18:48:01Z rafael $
44*--------------------------------------------------------------------*#
45
46using "stage_separators/flash";
47
48Model flash_cost as flash
49        ATTRIBUTES
50        Pallete         = true;
51        Icon            = "icon/Flash";
52
53        PARAMETERS
54        Material                as Switcher (Valid = ["Stainless steell 304", "Stainless steel 316", "Carpenter 20CB_3", "Nickel 200", "Monel 400", "Inconel 600", "Incoloy 825", "Titanium"],
55                                                                                Default = "Stainless steel 304");
56        Cost(6,3)               as Real;
57        flash_length    as length (Brief = "Flash Length");
58        Div                     as length (Brief="Internal Diameter for vertical vases");
59        Dih                     as length (Brief="Internal Diameter for horizontal vases");
60        Ts                              as length (Brief="Thickness");
61        dens_mass_material as dens_mass (Brief = "Mass Density of the Material");
62
63        VARIABLES
64        Ce as currency  (Brief="Capital Cost");
65        Cb as currency  (Brief="Basic Cost");
66        Ca as currency  (Brief="Cost for stairs, railing and platform");
67        Fm as positive  (Brief="Cost Factor based on the construction material");
68        Ws as mass              (Brief="Equipment Weight");
69
70        EQUATIONS
71       
72        "Capital Cost"
73        Ce = Cb*Fm + Ca;
74       
75        switch Orientation
76                case "vertical":
77               
78        "Basic Cost"
79                Cb = 'US$'*exp(Cost(2,1) - Cost(2,2)*ln(Ws/'kg') + Cost(2,3)*(ln(Ws/'kg'))^2);
80               
81        "Cost for stairs, railing and platform"
82                Ca = 'US$'*Cost(4,1)*((Div^0.73960)/'m^0.73960')*((flash_length^0.70684)/'m^0.70684');
83       
84        "Equipment Weight for vertical vases"
85                Ws = dens_mass_material*Div*(flash_length + Cost(5,1)*Div)*Ts;
86                       
87                case "horizontal":
88               
89        "Basic Cost for horizontal flash"
90                Cb = 'US$'*exp(Cost(1,1) - Cost(1,2)*ln(Ws/'kg') + Cost(1,3)*(ln(Ws/'kg'))^2);
91
92        "Cost for stairs, railing and platform"
93                Ca = 'US$'*Cost(3,1)*((Dih^0.20294)/'m^0.20294');
94
95        "Equipment Weight for horizontal vases"
96                Ws = dens_mass_material*Dih*(flash_length + Cost(5,1)*Dih)*Ts*Pi;
97       
98        end     
99       
100        "Cost Factor based on the construction material"
101                Fm = Cost(6,1);
102
103end
Note: See TracBrowser for help on using the repository browser.