source: trunk/BioModel/heat_exchangers/heater_w.mso @ 1008

Last change on this file since 1008 was 1008, checked in by Argimiro Resende Secchi, 2 years ago

Adding BioModel? to the MSO library.
File size: 23.4 KB
Line 
1#*-------------------------------------------------------------------
2* Biorrefinaria Petrobras
3*--------------------------------------------------------------------
4* Nome do arquivo: heater_w.mso
5* Projeto: Modelo integrado de producao de etanol 1G/2G
6* Conteudo: trocador de calor
7*--------------------------------------------------------------------*#
8
9#*-------------------------------------------------------------------
10*
11* Versao 2.2
12* Data:    03/2016
13* Autores:   Anderson R. A. Lino e Gabriel C. Fonseca
14*
15*--------------------------------------------------------------------
16*Descricao: modelo simplificado do trocador de calor para agua 
17*que sera empregado na biorrefinaria
18*--------------------------------------------------------------------
19
20*--------------------------------------------------------------------
21*Hipoteses assumidas: 1 - operacao em estado estacionario
22*                     2 - sem perdas de calor para o ambiente
23*--------------------------------------------------------------------
24
25*--------------------------------------------------------------------
26*Notas: Foi feito o flowsheet teste para averiguar o modelo
27*--------------------------------------------------------------------*#
28
29using "water_stream";
30using "energy_stream";
31
32Model heatex_wL
33
34        ATTRIBUTES
35        Pallete         = false;
36        Icon            = "icon/heater_WD";
37        Brief           = "Model of a Heat Exchanger";
38        Info =
39"== GENERAL ==
40* Model of a simplified heat exchanger;
41* The model performes mass and energy balances only.
42       
43== ASSUMPTIONS ==
44* Steady-State operation;
45* No heat loss to the surroundings.
46
47";
48
49#*-------------------------------------------------------------------
50#Parametros
51*--------------------------------------------------------------------*#
52
53        PARAMETERS
54        propterm                as Plugin       (Brief = "IAPWS 97 properties of water",Type = "water");
55       
56#*-------------------------------------------------------------------
57* Declaracao de variaveis
58*--------------------------------------------------------------------*#
59       
60VARIABLES
61
62in  Inlet               as water_stream         (Brief="Inlet Stream", PosX=1.0, PosY=0.5, Protected = false, Symbol="_{in}");
63out Outlet              as water_stream_eq  (Brief="Outlet Stream", PosX=0.0, PosY=0.5, Protected = false, Symbol="_{out}");
64        Q                       as power                        (Brief="Heat Duty", Default=0, Lower=-1e10, Upper=1e10);
65       
66        Pdrop           as press_delta          (Brief="Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa' , Symbol ="\Delta P");
67        lmtd            as temp_delta           (Brief = "Normalized Mean Log", Lower = 1e-6, Symbol = "LMTD");
68        U                       as heat_trans_coeff (Brief = "Overall Heat Transfer Coefficient", Default=0.69445, Lower=1e-6, Upper=1e10);
69        A                       as area                         (Brief = "Exchange Surface Area", Lower = 1e-6);
70       
71#*-------------------------------------------------------------------
72* Equacoes do modelo
73*--------------------------------------------------------------------*#
74
75        EQUATIONS
76       
77        "Energy Balance"
78        Q = Inlet.Fw*(Outlet.H - Inlet.H);
79
80        "Mass Balance"
81        Inlet.Fw  = Outlet.Fw;
82               
83        "Pressure Drop"
84        Outlet.P = Inlet.P - Pdrop;
85       
86end
87
88Model heater_wLD as heatex_wL
89        ATTRIBUTES
90        Pallete         = true;
91        Icon            = "icon/heater_WD";
92        Brief           = "Model of a Heat Exchanger";
93        Info =
94"== GENERAL ==
95*Model of a simplified heat exchanger;
96*The model performes mass and energy balances only.
97
98== ASSUMPTIONS ==
99* Steady-State operation;
100* No heat loss to the surroundings.
101
102== SPECIFY ==
103* The inlet streams:
104  flow rate
105  temperature
106  pressure;
107* Outlet stream temperature;
108* Overall Heat Transfer Coefficient;
109* Exchange Surface Area;
110* Pressure drop.
111
112== SET ==
113* Phase of fluid entering and leaving the heater;.
114";
115
116       
117        VARIABLES
118in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=0.5, PosY=1.0, Symbol="_{in}");
119
120        EQUATIONS
121        "Equate Heat Stream"
122        Inlet_q.Q = Q;
123       
124        "General equation of heat exchange"
125        Inlet_q.Q = U * A * lmtd;
126       
127end
128
129Model cooler_wLD as heatex_wL
130        ATTRIBUTES
131        Pallete         = true;
132        Icon            = "icon/heater_WD";
133        Brief           = "Model of a Heat Exchanger";
134        Info =
135"== GENERAL ==
136*Model of a simplified heat exchanger;
137*The model performes mass and energy balances only.
138
139== ASSUMPTIONS ==
140* Steady-State operation;
141* No heat loss to the surroundings.
142
143== SPECIFY ==
144* The inlet streams:
145  flow rate
146  temperature
147  pressure;
148* Vapourization fraction at the outlet of the cooler;
149* Normalized Mean Log (lmtd);
150* Overall Heat Transfer Coefficient;
151* Pressure drop.
152
153== SET ==
154* Phase of fluid entering and leaving the heater;.
155";
156
157        VARIABLES
158out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=0.5, PosY=1.0, Symbol="_{out}");
159
160        EQUATIONS
161        "Equate Heat Stream"
162        Outlet_q.Q = -Q;
163       
164        "General equation of heat exchange"
165        Outlet_q.Q = U * A * lmtd;
166       
167end
168
169Model heater_wLU as heatex_wL
170        ATTRIBUTES
171        Pallete         = true;
172        Icon            = "icon/heater_WU";
173        Brief           = "Model of a Heat Exchanger";
174        Info =
175"== GENERAL ==
176*Model of a simplified heat exchanger;
177*The model performes mass and energy balances only.
178
179== ASSUMPTIONS ==
180* Steady-State operation;
181* No heat loss to the surroundings.
182
183== SPECIFY ==
184* The inlet streams:
185  flow rate
186  temperature
187  pressure;
188* Outlet stream temperature;
189* Overall Heat Transfer Coefficient;
190* Exchange Surface Area;
191* Pressure drop.
192
193== SET ==
194* Phase of fluid entering and leaving the heater;.
195";
196
197        VARIABLES
198in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=0.5, PosY=0.0, Symbol="_{in}");
199
200        EQUATIONS
201        "Equate Heat Stream"
202        Inlet_q.Q = Q;
203       
204        "General equation of heat exchange"
205        Inlet_q.Q = U * A * lmtd;
206       
207end
208
209Model cooler_wLU as heatex_wL
210        ATTRIBUTES
211        Pallete         = true;
212        Icon            = "icon/heater_WU";
213        Brief           = "Model of a Heat Exchanger";
214        Info =
215"== GENERAL ==
216*Model of a simplified heat exchanger;
217*The model performes mass and energy balances only.
218
219== ASSUMPTIONS ==
220* Steady-State operation;
221* No heat loss to the surroundings.
222
223== SPECIFY ==
224* The inlet streams:
225  flow rate
226  temperature
227  pressure;
228* Vapourization fraction at the outlet of the cooler;
229* Normalized Mean Log (lmtd);
230* Overall Heat Transfer Coefficient;
231* Pressure drop.
232
233== SET ==
234* Phase of fluid entering and leaving the heater;.
235";
236
237       
238        VARIABLES
239out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=0.5, PosY=0.0, Symbol="_{out}");
240
241        EQUATIONS
242        "Equate Heat Stream"
243        Outlet_q.Q = -Q;
244       
245        "General equation of heat exchange"
246        Outlet_q.Q = U * A * lmtd;
247       
248end
249
250Model heatex_wR
251
252        ATTRIBUTES
253        Pallete         = false;
254        Brief           = "Model of a Heat Exchanger";
255        Info =
256"== GENERAL ==
257* Model of a simplified heat exchanger;
258* The model performes mass and energy balances only.
259       
260== ASSUMPTIONS ==
261* Steady-State operation;
262* No heat loss to the surroundings.
263";     
264
265#*-------------------------------------------------------------------
266#Parametros
267*--------------------------------------------------------------------*#
268
269        PARAMETERS
270        propterm                as Plugin               (Brief = "IAPWS 97 properties of water",Type = "water");
271       
272#*-------------------------------------------------------------------
273* Declaracao de variaveis
274*--------------------------------------------------------------------*#
275       
276VARIABLES
277
278in  Inlet               as water_stream                 (Brief="Inlet Stream", PosX=0.0, PosY=0.5, Protected = false, Symbol="_{in}");
279out Outlet              as water_stream_eq      (Brief="Outlet Stream", PosX=1.0, PosY=0.5, Protected = false, Symbol="_{out}");
280        Q                       as power                                (Brief="Heat Duty", Default=0, Lower=-1e10, Upper=1e10);
281       
282        Pdrop           as press_delta          (Brief="Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa' , Symbol ="\Delta P");
283        lmtd            as temp_delta           (Brief = "Normalized Mean Log", Lower = 1e-6, Symbol = "LMTD");
284        U                       as heat_trans_coeff (Brief = "Overall Heat Transfer Coefficient", Default=0.69445, Lower=1e-6, Upper=1e10);
285        A                       as area                         (Brief = "Exchange Surface Area", Lower = 1e-6);
286       
287#*-------------------------------------------------------------------
288* Equacoes do modelo
289*--------------------------------------------------------------------*#
290
291        EQUATIONS
292       
293        "Energy Balance"
294        Q = Inlet.Fw*(Outlet.H - Inlet.H);
295
296        "Mass Balance"
297        Inlet.Fw  = Outlet.Fw;
298       
299        "Pressure Drop"
300        Outlet.P = Inlet.P - Pdrop;
301       
302end
303
304Model heater_wRD as heatex_wR
305        ATTRIBUTES
306        Pallete         = true;
307        Icon            = "icon/heater_WD";
308        Brief           = "Model of a Heat Exchanger";
309        Info =
310"== GENERAL ==
311*Model of a simplified heat exchanger;
312*The model performes mass and energy balances only.
313
314== ASSUMPTIONS ==
315* Steady-State operation;
316* No heat loss to the surroundings.
317
318== SPECIFY ==
319* The inlet streams:
320  flow rate
321  temperature
322  pressure;
323* Outlet stream temperature;
324* Overall Heat Transfer Coefficient;
325* Exchange Surface Area;
326* Pressure drop.
327
328== SET ==
329* Phase of fluid entering and leaving the heater;.
330";
331
332        VARIABLES
333in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=0.5, PosY=1.0, Symbol="_{in}");
334
335        EQUATIONS
336        "Equate Heat Stream"
337        Inlet_q.Q = Q;
338       
339        "General equation of heat exchange"
340        Inlet_q.Q = U * A * lmtd;
341       
342end
343
344Model cooler_wRD as heatex_wR
345        ATTRIBUTES
346        Pallete         = true;
347        Icon            = "icon/heater_WD";
348        Brief           = "Model of a Heat Exchanger";
349        Info =
350"== GENERAL ==
351*Model of a simplified heat exchanger;
352*The model performes mass and energy balances only.
353
354== ASSUMPTIONS ==
355* Steady-State operation;
356* No heat loss to the surroundings.
357
358== SPECIFY ==
359* The inlet streams:
360  flow rate
361  temperature
362  pressure;
363* Vapourization fraction at the outlet of the cooler;
364* Normalized Mean Log (lmtd);
365* Overall Heat Transfer Coefficient;
366* Pressure drop.
367
368== SET ==
369* Phase of fluid entering and leaving the heater;.
370";
371
372
373        VARIABLES
374out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=0.5, PosY=1.0, Symbol="_{out}");
375
376        EQUATIONS
377        "Equate Heat Stream"
378        Outlet_q.Q = -Q;
379       
380        "General equation of heat exchange"
381        Outlet_q.Q = U * A * lmtd;
382       
383end
384
385Model heater_wRU as heatex_wR
386        ATTRIBUTES
387        Pallete         = true;
388        Icon            = "icon/heater_WU";
389        Brief           = "Model of a Heat Exchanger";
390        Info =
391"== GENERAL ==
392*Model of a simplified heat exchanger;
393*The model performes mass and energy balances only.
394
395== ASSUMPTIONS ==
396* Steady-State operation;
397* No heat loss to the surroundings.
398
399== SPECIFY ==
400* The inlet streams:
401  flow rate
402  temperature
403  pressure;
404* Outlet stream temperature;
405* Overall Heat Transfer Coefficient;
406* Exchange Surface Area;
407* Pressure drop.
408
409== SET ==
410* Phase of fluid entering and leaving the heater;.
411";
412
413        VARIABLES
414in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=0.5, PosY=0.0, Symbol="_{in}");
415
416        EQUATIONS
417        "Equate Heat Stream"
418        Inlet_q.Q = Q;
419       
420        "General equation of heat exchange"
421        Inlet_q.Q = U * A * lmtd;
422       
423end
424
425Model cooler_wRU as heatex_wR
426        ATTRIBUTES
427        Pallete         = true;
428        Icon            = "icon/heater_WU";
429        Brief           = "Model of a Heat Exchanger";
430        Info =
431"== GENERAL ==
432*Model of a simplified heat exchanger;
433*The model performes mass and energy balances only.
434
435== ASSUMPTIONS ==
436* Steady-State operation;
437* No heat loss to the surroundings.
438
439== SPECIFY ==
440* The inlet streams:
441  flow rate
442  temperature
443  pressure;
444* Vapourization fraction at the outlet of the cooler;
445* Normalized Mean Log (lmtd);
446* Overall Heat Transfer Coefficient;
447* Pressure drop.
448
449== SET ==
450* Phase of fluid entering and leaving the heater;.
451";
452
453
454        VARIABLES
455out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=0.5, PosY=0.0, Symbol="_{out}");
456
457        EQUATIONS
458        "Equate Heat Stream"
459        Outlet_q.Q = -Q;
460       
461        "General equation of heat exchange"
462        Outlet_q.Q = U * A * lmtd;
463       
464end
465
466Model heatex_wU
467
468        ATTRIBUTES
469        Pallete         = false;
470        Brief           = "Model of a Heat Exchanger";
471        Info =
472"== GENERAL ==
473* Model of a simplified heat exchanger;
474* The model performes mass and energy balances only.
475       
476== ASSUMPTIONS ==
477* Steady-State operation;
478* No heat loss to the surroundings.
479";
480
481#*-------------------------------------------------------------------
482#Parametros
483*--------------------------------------------------------------------*#
484
485        PARAMETERS
486        propterm                as Plugin               (Brief = "IAPWS 97 properties of water",Type = "water");
487       
488#*-------------------------------------------------------------------
489* Declaracao de variaveis
490*--------------------------------------------------------------------*#
491       
492VARIABLES
493
494in  Inlet               as water_stream                 (Brief="Inlet Stream", PosX=0.5, PosY=1.0, Protected = false, Symbol="_{in}");
495out Outlet              as water_stream_eq      (Brief="Outlet Stream", PosX=0.5, PosY=0.0, Protected = false, Symbol="_{out}");
496        Q                       as power                                (Brief="Heat Duty", Default=0, Lower=-1e10, Upper=1e10);
497       
498        Pdrop           as press_delta          (Brief="Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa' , Symbol ="\Delta P");
499        lmtd            as temp_delta           (Brief = "Normalized Mean Log", Lower = 1e-6, Symbol = "LMTD");
500        U                       as heat_trans_coeff (Brief = "Overall Heat Transfer Coefficient", Default=0.69445, Lower=1e-6, Upper=1e10);
501        A                       as area                         (Brief = "Exchange Surface Area", Lower = 1e-6);
502       
503#*-------------------------------------------------------------------
504* Equacoes do modelo
505*--------------------------------------------------------------------*#
506
507        EQUATIONS
508       
509        "Energy Balance"
510        Q = Inlet.Fw*(Outlet.H - Inlet.H);
511
512        "Mass Balance"
513        Inlet.Fw  = Outlet.Fw;
514       
515        "Pressure Drop"
516        Outlet.P = Inlet.P - Pdrop;
517
518end
519
520Model heater_wUR as heatex_wU
521        ATTRIBUTES
522        Pallete         = true;
523        Icon            = "icon/heater_WR";
524        Brief           = "Model of a Heat Exchanger";
525        Info =
526"== GENERAL ==
527*Model of a simplified heat exchanger;
528*The model performes mass and energy balances only.
529
530== ASSUMPTIONS ==
531* Steady-State operation;
532* No heat loss to the surroundings.
533
534== SPECIFY ==
535* The inlet streams:
536  flow rate
537  temperature
538  pressure;
539* Outlet stream temperature;
540* Overall Heat Transfer Coefficient;
541* Exchange Surface Area;
542* Pressure drop.
543
544== SET ==
545* Phase of fluid entering and leaving the heater;.
546";
547
548        VARIABLES
549in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=1.0, PosY=0.5, Symbol="_{in}");
550
551        EQUATIONS
552        "Equate Heat Stream"
553        Inlet_q.Q = Q;
554       
555        "General equation of heat exchange"
556        Inlet_q.Q = U * A * lmtd;
557       
558end
559
560Model cooler_wUR as heatex_wU
561        ATTRIBUTES
562        Pallete         = true;
563        Icon            = "icon/heater_WR";
564        Brief           = "Model of a Heat Exchanger";
565        Info =
566"== GENERAL ==
567*Model of a simplified heat exchanger;
568*The model performes mass and energy balances only.
569
570== ASSUMPTIONS ==
571* Steady-State operation;
572* No heat loss to the surroundings.
573
574== SPECIFY ==
575* The inlet streams:
576  flow rate
577  temperature
578  pressure;
579* Vapourization fraction at the outlet of the cooler;
580* Normalized Mean Log (lmtd);
581* Overall Heat Transfer Coefficient;
582* Pressure drop.
583
584== SET ==
585* Phase of fluid entering and leaving the heater;.
586";
587
588
589        VARIABLES
590out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=1.0, PosY=0.5, Symbol="_{out}");
591
592        EQUATIONS
593        "Equate Heat Stream"
594        Outlet_q.Q = -Q;
595       
596        "General equation of heat exchange"
597        Outlet_q.Q = U * A * lmtd;
598       
599end
600
601Model heater_wUL as heatex_wU
602        ATTRIBUTES
603        Pallete         = true;
604        Icon            = "icon/heater_WL";
605        Brief           = "Model of a Heat Exchanger";
606        Info =
607"== GENERAL ==
608*Model of a simplified heat exchanger;
609*The model performes mass and energy balances only.
610
611== ASSUMPTIONS ==
612* Steady-State operation;
613* No heat loss to the surroundings.
614
615== SPECIFY ==
616* The inlet streams:
617  flow rate
618  temperature
619  pressure;
620* Outlet stream temperature;
621* Overall Heat Transfer Coefficient;
622* Exchange Surface Area;
623* Pressure drop.
624
625== SET ==
626* Phase of fluid entering and leaving the heater;.
627";
628
629        VARIABLES
630in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=0.0, PosY=0.5, Symbol="_{in}");
631
632        EQUATIONS
633        "Equate Heat Stream"
634        Inlet_q.Q = Q;
635       
636        "General equation of heat exchange"
637        Inlet_q.Q = U * A * lmtd;
638       
639end
640
641Model cooler_wUL as heatex_wU
642        ATTRIBUTES
643        Pallete         = true;
644        Icon            = "icon/heater_WL";
645        Brief           = "Model of a Heat Exchanger";
646        Info =
647"== GENERAL ==
648*Model of a simplified heat exchanger;
649*The model performes mass and energy balances only.
650
651== ASSUMPTIONS ==
652* Steady-State operation;
653* No heat loss to the surroundings.
654
655== SPECIFY ==
656* The inlet streams:
657  flow rate
658  temperature
659  pressure;
660* Vapourization fraction at the outlet of the cooler;
661* Normalized Mean Log (lmtd);
662* Overall Heat Transfer Coefficient;
663* Pressure drop.
664
665== SET ==
666* Phase of fluid entering and leaving the heater;.
667";
668
669
670        VARIABLES
671out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=0.0, PosY=0.5, Symbol="_{out}");
672
673        EQUATIONS
674        "Equate Heat Stream"
675        Outlet_q.Q = -Q;
676       
677        "General equation of heat exchange"
678        Outlet_q.Q = U * A * lmtd;
679       
680end
681
682Model heatex_wD
683
684        ATTRIBUTES
685        Pallete         = false;
686        Brief           = "Model of a Heat Exchanger";
687        Info =
688"== GENERAL ==
689* Model of a simplified heat exchanger;
690* The model performes mass and energy balances only.
691       
692== ASSUMPTIONS ==
693* Steady-State operation;
694* No heat loss to the surroundings.
695";
696
697#*-------------------------------------------------------------------
698#Parametros
699*--------------------------------------------------------------------*#
700
701        PARAMETERS
702        propterm                as Plugin                       (Brief = "IAPWS 97 properties of water",Type = "water");
703       
704#*-------------------------------------------------------------------
705* Declaracao de variaveis
706*--------------------------------------------------------------------*#
707       
708VARIABLES
709
710in  Inlet               as water_stream                 (Brief="Inlet Stream", PosX=0.5, PosY=0.0, Protected = false, Symbol="_{in}");
711out Outlet              as water_stream_eq      (Brief="Outlet Stream", PosX=0.5, PosY=1.0, Protected = false, Symbol="_{out}");
712        Q                       as power                                (Brief="Heat Duty", Default=0, Lower=-1e10, Upper=1e10);
713       
714        Pdrop           as press_delta          (Brief="Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa' , Symbol ="\Delta P");
715        lmtd            as temp_delta           (Brief = "Normalized Mean Log", Lower = 1e-6, Symbol = "LMTD");
716        U                       as heat_trans_coeff (Brief = "Overall Heat Transfer Coefficient", Default=0.69445, Lower=1e-6, Upper=1e10);
717        A                       as area                         (Brief = "Exchange Surface Area", Lower = 1e-6);
718       
719#*-------------------------------------------------------------------
720* Equacoes do modelo
721*--------------------------------------------------------------------*#
722
723        EQUATIONS
724       
725        "Energy Balance"
726        Q = Inlet.Fw*(Outlet.H - Inlet.H);
727
728        "Mass Balance"
729        Inlet.Fw  = Outlet.Fw;
730       
731        "Pressure Drop"
732        Outlet.P = Inlet.P - Pdrop;
733       
734end
735
736Model heater_wDR as heatex_wD
737        ATTRIBUTES
738        Pallete         = true;
739        Icon            = "icon/heater_WR";
740        Brief           = "Model of a Heat Exchanger";
741        Info =
742"== GENERAL ==
743*Model of a simplified heat exchanger;
744*The model performes mass and energy balances only.
745
746== ASSUMPTIONS ==
747* Steady-State operation;
748* No heat loss to the surroundings.
749
750== SPECIFY ==
751* The inlet streams:
752  flow rate
753  temperature
754  pressure;
755* Outlet stream temperature;
756* Overall Heat Transfer Coefficient;
757* Exchange Surface Area;
758* Pressure drop.
759
760== SET ==
761* Phase of fluid entering and leaving the heater;.
762";
763
764        VARIABLES
765in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=1.0, PosY=0.5, Symbol="_{in}");
766
767        EQUATIONS
768        "Equate Heat Stream"
769        Inlet_q.Q = Q;
770       
771        "General equation of heat exchange"
772        Inlet_q.Q = U * A * lmtd;
773       
774end
775
776Model cooler_wDR as heatex_wD
777        ATTRIBUTES
778        Pallete         = true;
779        Icon            = "icon/heater_WL";
780        Brief           = "Model of a Heat Exchanger";
781        Info =
782"== GENERAL ==
783*Model of a simplified heat exchanger;
784*The model performes mass and energy balances only.
785
786== SPECIFY ==
787* The inlet streams:
788  flow rate
789  temperature
790  pressure;
791* Vapourization fraction at the outlet of the cooler;
792* Normalized Mean Log (lmtd);
793* Overall Heat Transfer Coefficient;
794* Pressure drop.
795
796== SET ==
797* Phase of fluid entering and leaving the heater;.
798";
799
800
801        VARIABLES
802out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=1.0, PosY=0.5, Symbol="_{out}");
803
804        EQUATIONS
805        "Equate Heat Stream"
806        Outlet_q.Q = -Q;
807       
808        "General equation of heat exchange"
809        Outlet_q.Q = U * A * lmtd;
810       
811end
812
813Model heater_wDL as heatex_wD
814        ATTRIBUTES
815        Pallete         = true;
816        Icon            = "icon/heater_WR";
817        Brief           = "Model of a Heat Exchanger";
818        Info =
819"== GENERAL ==
820*Model of a simplified heat exchanger;
821*The model performes mass and energy balances only.
822
823== ASSUMPTIONS ==
824* Steady-State operation;
825* No heat loss to the surroundings.
826
827== SPECIFY ==
828* The inlet streams:
829  flow rate
830  temperature
831  pressure;
832* Outlet stream temperature;
833* Overall Heat Transfer Coefficient;
834* Exchange Surface Area;
835* Pressure drop.
836
837== SET ==
838* Phase of fluid entering and leaving the heater;.
839";
840
841        VARIABLES
842in      Inlet_q as heat_stream  (Brief = "Inlet Heat Stream", PosX=0.0, PosY=0.5, Symbol="_{in}");
843
844        EQUATIONS
845        "Equate Heat Stream"
846        Inlet_q.Q = Q;
847       
848        "General equation of heat exchange"
849        Inlet_q.Q = U * A * lmtd;
850       
851end
852
853Model cooler_wDL as heatex_wD
854        ATTRIBUTES
855        Pallete         = true;
856        Icon            = "icon/heater_WR";
857        Brief           = "Model of a Heat Exchanger";
858        Info =
859"== GENERAL ==
860*Model of a simplified heat exchanger;
861*The model performes mass and energy balances only.
862
863== SPECIFY ==
864* The inlet streams:
865  flow rate
866  temperature
867  pressure;
868* Vapourization fraction at the outlet of the cooler;
869* Normalized Mean Log (lmtd);
870* Overall Heat Transfer Coefficient;
871* Pressure drop.
872
873== SET ==
874* Phase of fluid entering and leaving the heater;.
875";
876
877       
878        VARIABLES
879out     Outlet_q        as heat_stream  (Brief = "Outlet Heat Stream", PosX=0.0, PosY=0.5, Symbol="_{out}");
880
881        EQUATIONS
882        "Equate Heat Stream"
883        Outlet_q.Q = -Q;
884       
885        "General equation of heat exchange"
886        Outlet_q.Q = U * A * lmtd;
887       
888end
889
890FlowSheet teste_cooler_w
891       
892#*-------------------------------------------------------------------
893* Declaracao de dispositivos (ou blocos contendo o modelo)
894*--------------------------------------------------------------------*#
895       
896        DEVICES
897        SCold as water_sourceR;
898        H as cooler_wLD;
899       
900#*-------------------------------------------------------------------
901* Especifica as conexoes entre os modelos
902*--------------------------------------------------------------------*#
903       
904        CONNECTIONS
905        SCold.Outlet to H.Inlet;
906       
907#*-------------------------------------------------------------------
908* Especifica variaveis definidas no modelo
909*--------------------------------------------------------------------*#
910       
911        SPECIFY
912        SCold.Fw = 85341.7 * 'kg/h';
913        SCold.T = 388.7 * 'K';
914        SCold.P = 1.69596 * 'atm';
915       
916        H.Pdrop = 0 * 'atm';
917        H.Outlet.v = 0;
918        H.lmtd = 18 * 'K';
919        H.U = 0.69445 * 'kW/m^2/K';
920       
921#*-------------------------------------------------------------------
922* Define o valor dos parametros declarados no modelo
923*--------------------------------------------------------------------*#
924       
925        SET
926        SCold.ValidPhases = "Vapour-Only";
927        H.Outlet.ValidPhases = "Vapour-Liquid";
928       
929#*-------------------------------------------------------------------
930* Opcoes de Solver
931*--------------------------------------------------------------------*#
932       
933        OPTIONS
934        Dynamic = false;
935
936end
937
938FlowSheet teste_heater_w
939       
940#*-------------------------------------------------------------------
941* Declaracao de dispositivos (ou blocos contendo o modelo)
942*--------------------------------------------------------------------*#
943       
944        DEVICES
945        SHot as water_sourceR;
946        H as heater_wLD;
947        SQ as heat_sourceR;
948       
949#*-------------------------------------------------------------------
950* Especifica as conexoes entre os modelos
951*--------------------------------------------------------------------*#
952       
953        CONNECTIONS
954        SHot.Outlet to H.Inlet;
955        SQ.Outlet_q to H.Inlet_q;
956       
957#*-------------------------------------------------------------------
958* Especifica variaveis definidas no modelo
959*--------------------------------------------------------------------*#
960       
961        SPECIFY
962
963        SHot.Fw = 52200 * 'kg/h';
964        SHot.T = 340 * 'K';
965        SHot.P = 1 * 'atm';
966        H.Pdrop = 0 * 'atm';
967        H.Outlet.T = 350.0 * 'K';
968        H.U = 0.69445 * 'kW/m^2/K';
969        H.lmtd = 10 * 'K';
970
971
972#*-------------------------------------------------------------------
973* Define o valor dos parametros declarados no modelo
974*--------------------------------------------------------------------*#
975       
976        SET
977        SHot.ValidPhases = "Liquid-Only";
978        H.Outlet.ValidPhases = "Liquid-Only";
979       
980#*-------------------------------------------------------------------
981* Opcoes de Solver
982*--------------------------------------------------------------------*#
983       
984        OPTIONS
985        Dynamic = false;
986        GuessFile = "teste3.rlt";
987       
988end
989
Note: See TracBrowser for help on using the repository browser.