/[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 1823 - (show annotations) (download) (as text)
Wed Aug 20 11:05:05 2008 UTC (15 years, 9 months ago) by jpye
File MIME type: text/x-ascend
File size: 519 byte(s)
Testing of ammonia p(rho,T) relation.
1 (* test of the fluid properties routines currently implemented in asc_mbwr.c *)
2
3 REQUIRE "atoms.a4l";
4 IMPORT "johnpye/fprops/helmholtz";
5
6 MODEL mbwrconf;
7 component IS_A symbol_constant;
8 component :== 'ammonia';
9 END mbwrconf;
10
11 MODEL fprops_test;
12
13 p IS_A pressure;
14 T IS_A temperature;
15 rho IS_A mass_density;
16
17 propsdata IS_A mbwrconf;
18
19 props: helmholtz_p(
20 T, rho : INPUT;
21 p : OUTPUT;
22 propsdata : DATA
23 );
24
25 METHODS
26 METHOD on_load;
27 FIX rho, T;
28 rho := 1 {kg/m^3};
29 T := 400 {K};
30 END on_load;
31 END fprops_test;

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