| [261] | 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 | * Sample file for a Plate Heat Exchanger |
|---|
| 17 | *-------------------------------------------------------------------- |
|---|
| 18 | * |
|---|
| 19 | * This sample file needs VRTherm Demo (www.vrtech.com.br) to run. |
|---|
| 20 | * |
|---|
| 21 | *---------------------------------------------------------------------- |
|---|
| 22 | * Author: Gerson B. Bicca |
|---|
| 23 | * $Id: Sample_PHE.mso 157 2007-02-07 13:44:17Z rafael $ |
|---|
| 24 | *--------------------------------------------------------------------*# |
|---|
| 25 | |
|---|
| 26 | using "heat_exchangers/PHE"; |
|---|
| 27 | |
|---|
| 28 | FlowSheet Plate_and_Frame |
|---|
| 29 | |
|---|
| 30 | PARAMETERS |
|---|
| 31 | PP as Plugin (Type ="PP", LiquidModel = "PR", VapourModel = "PR", |
|---|
| 32 | Components = ["water"]); |
|---|
| 33 | NComp as Integer; |
|---|
| 34 | |
|---|
| 35 | DEVICES |
|---|
| 36 | |
|---|
| 37 | exchanger as PHE; |
|---|
| 38 | InletHot as source; |
|---|
| 39 | InletCold as source; |
|---|
| 40 | |
|---|
| 41 | CONNECTIONS |
|---|
| 42 | |
|---|
| 43 | InletHot.Outlet to exchanger.InletHot; |
|---|
| 44 | InletCold.Outlet to exchanger.InletCold; |
|---|
| 45 | |
|---|
| 46 | SET |
|---|
| 47 | |
|---|
| 48 | NComp = PP.NumberOfComponents; |
|---|
| 49 | |
|---|
| 50 | exchanger.SideOne = "cold"; |
|---|
| [386] | 51 | |
|---|
| [261] | 52 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| 53 | # PHE Geometrical Parameters and Alocation |
|---|
| 54 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| [387] | 55 | exchanger.ChevronAngle = "A60_Deg"; |
|---|
| [523] | 56 | exchanger.Geometry.Nplates = 129; |
|---|
| 57 | exchanger.Geometry.NpassHot = 4; |
|---|
| 58 | exchanger.Geometry.NpassCold = 2; |
|---|
| 59 | exchanger.Geometry.Dports = 15*'cm'; |
|---|
| 60 | exchanger.Geometry.PhiFactor = 1.17; |
|---|
| 61 | exchanger.Geometry.Lv = 155*'cm'; |
|---|
| 62 | exchanger.Geometry.Lw = 70*'cm'; |
|---|
| 63 | exchanger.Geometry.pitch = 3.7*'mm'; |
|---|
| 64 | exchanger.Geometry.pt = 0.70*'mm'; |
|---|
| 65 | exchanger.Geometry.Kwall = 17 *'W/m/K'; |
|---|
| [261] | 66 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| 67 | # Fouling |
|---|
| 68 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| [523] | 69 | exchanger.Geometry.Rfc= 3.4e-5*'m^2*K/W'; |
|---|
| 70 | exchanger.Geometry.Rfh = 9e-6*'m^2*K/W'; |
|---|
| [261] | 71 | |
|---|
| 72 | SPECIFY |
|---|
| 73 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| 74 | # Hot Stream |
|---|
| 75 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| 76 | InletHot.Fw = 21 * 'kg/s'; |
|---|
| 77 | InletHot.Outlet.T = (87+273.15) * 'K'; |
|---|
| 78 | InletHot.Outlet.P = 2 * 'atm'; |
|---|
| 79 | InletHot.Outlet.z = [1]; |
|---|
| 80 | |
|---|
| 81 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| 82 | # Cold Stream |
|---|
| 83 | #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|---|
| 84 | InletCold.Fw = 62.5 * 'kg/s'; |
|---|
| 85 | InletCold.Outlet.P = 2 * 'atm'; |
|---|
| 86 | InletCold.Outlet.T = (20+273.15) * 'K'; |
|---|
| 87 | InletCold.Outlet.z = [1]; |
|---|
| [384] | 88 | |
|---|
| [261] | 89 | OPTIONS |
|---|
| 90 | |
|---|
| 91 | Dynamic = false; |
|---|
| 92 | GuessFile = "GuessPHE"; |
|---|
| 93 | |
|---|
| 94 | end |
|---|
| 95 | |
|---|
