/[ascend]/trunk/models/johnpye/fprops/heatex_pinch.a4c
ViewVC logotype

Diff of /trunk/models/johnpye/fprops/heatex_pinch.a4c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2630 by jpye, Mon Aug 6 13:42:14 2012 UTC revision 2631 by jpye, Wed Aug 8 03:32:55 2012 UTC
# Line 1  Line 1 
1  REQUIRE "johnpye/fprops/rankine_fprops.a4c";  REQUIRE "johnpye/fprops/rankine_fprops.a4c";
2  IMPORT "johnpye/fprops/heatex_pinch";  IMPORT "johnpye/fprops/heatex_pinch";
3    IMPORT "johnpye/extpy/extpy";
4    IMPORT "johnpye/fprops/regenerator_plot";
5    
6  MODEL heatex_pinch_data;  MODEL heatex_pinch_data;
7      component IS_A symbol_constant;      component IS_A symbol_constant;
# Line 29  MODEL heatex_pinch REFINES stream_equipm Line 31  MODEL heatex_pinch REFINES stream_equipm
31      outlet_hot.h = inlet_hot.h - Qdot/inlet_hot.mdot;      outlet_hot.h = inlet_hot.h - Qdot/inlet_hot.mdot;
32    
33      pinch_ext: heatex_DT_phmphmQ(      pinch_ext: heatex_DT_phmphmQ(
34          inlet_hot.p, inlet_hot.h, inlet_hot.mdot, inlet.p, inlet.h, inlet.mdot,Qdot  : INPUT;          inlet.p, inlet.h, inlet.mdot, inlet_hot.p, inlet_hot.h, inlet_hot.mdot, Qdot  : INPUT;
35          DT_pinch : OUTPUT;          DT_pinch : OUTPUT;
36          hxd : DATA          hxd : DATA
37      );      );
# Line 43  END heatex_pinch; Line 45  END heatex_pinch;
45  MODEL heatex_pinch_test REFINES heatex_pinch;  MODEL heatex_pinch_test REFINES heatex_pinch;
46      inlet.cd.component :== 'carbondioxide';      inlet.cd.component :== 'carbondioxide';
47      inlet_hot.cd.component :== 'carbondioxide';      inlet_hot.cd.component :== 'carbondioxide';
48      n :== 20;      n :== 8;
49  METHODS  METHODS
50  METHOD on_load;  METHOD on_load;
51      RUN heatex_pinch::default_self;      RUN heatex_pinch::default_self;
52      FIX inlet.p := 200 {bar};      FIX inlet.p := 200 {bar};
53      FIX inlet_hot.p := 74 {bar};      FIX inlet_hot.p := 74 {bar};
54      FIX inlet_hot.T := 100 {K} + 273.15{K};      FIX inlet_hot.T := 100 {K} + 273.15 {K};
55      FIX inlet.T := 31 {K};      FIX inlet.T := 31 {K} + 273.15 {K};
56      FIX mdot_hot := 1.1 {kg/s};      FIX mdot_hot := 1.1 {kg/s};
57      FIX mdot := 0.81 {kg/s};      FIX mdot := 0.81 {kg/s};
58      FIX DT_pinch := 10 {K};      FIX DT_pinch := 10 {K};

Legend:
Removed from v.2630  
changed lines
  Added in v.2631

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22