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

Contents of /trunk/models/johnpye/fprops/fprops_test.a4c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1810 - (show annotations) (download) (as text)
Tue Jul 29 07:45:48 2008 UTC (12 years, 1 month ago) by jpye
File MIME type: text/x-ascend
File size: 424 byte(s)
Added new code for calculating properties according to modified BWR correlation, also some initial
work on Helmholtz free energy correlation.
1 (* test of the fluid properties routines currently implemented in asc_mbwr.c *)
2
3 REQUIRE "atoms.a4l";
4 IMPORT "johnpye/fprops/mbwr";
5
6 MODEL mbwrconf;
7 component IS_A symbol_constant;
8 component :== 'R123';
9 END mbwrconf;
10
11 MODEL fprops_test;
12
13 p IS_A pressure;
14 T IS_A temperature;
15 rhob IS_A molar_density;
16
17 propsdata IS_A mbwrconf;
18
19 props: mbwr_p(
20 T, rhob : INPUT;
21 p : OUTPUT;
22 propsdata : DATA
23 );
24
25 END fprops_test;

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