/[ascend]/trunk/models/kchittur/eos-vanderwaals.a4c
ViewVC logotype

Diff of /trunk/models/kchittur/eos-vanderwaals.a4c

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

revision 1727 by kchittur, Thu Jun 7 15:51:25 2007 UTC revision 1728 by kchittur, Wed Jan 16 01:01:07 2008 UTC
# Line 3  IMPORT "johnpye/extpy/extpy"; Line 3  IMPORT "johnpye/extpy/extpy";
3  IMPORT "kchittur/zplot";  IMPORT "kchittur/zplot";
4    
5  (* vanderwaals EOS as usually written *)  (* vanderwaals EOS as usually written *)
6    (* methods written to create a PV plot at different T's *)  
7    
8  ATOM vdwa REFINES solver_var  ATOM vdwa REFINES solver_var
9  DIMENSION M*L^5/Q^2/T^2  DIMENSION M*L^5/Q^2/T^2
# Line 54  END vanderwaals; Line 55  END vanderwaals;
55  MODEL testvanderwaals;  MODEL testvanderwaals;
56    
57  c1 IS_A symbol_constant;  c1 IS_A symbol_constant;
58  c1 :== 'ethylene';  c1 :== 'helium_4';
59  cd IS_A components_data([c1],c1);  cd IS_A components_data([c1],c1);
60  Tr, Pr IS_A factor;  Tr, Pr IS_A factor;
61  P IS_A pressure;  P IS_A pressure;
# Line 94  METHODS Line 95  METHODS
95      EXTERNAL zplot(SELF);      EXTERNAL zplot(SELF);
96      END fancyplot;      END fancyplot;
97    
98        METHOD pvtplot;
99        EXTERNAL pvplot(SELF);
100        END pvtplot;
101    
102  END testvanderwaals;  END testvanderwaals;
103    

Legend:
Removed from v.1727  
changed lines
  Added in v.1728

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