Ignore:
Timestamp:
Mar 4, 2007, 1:56:54 AM (17 years ago)
Author:
Argimiro Resende Secchi
Message:

Fix some new language syntax.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/newlanguage/sample/miscellaneous/sample_calc_object.mso

    r83 r176  
    2828Model CalcBasic
    2929        PARAMETERS
    30 ext NoComps as Integer;
     30outer NoComps as Integer;
    3131        VARIABLES
    3232        T    as temperature;
    … …  
    3434        z(NoComps) as fraction;
    3535       
    36         r1 as Real(Unit="K*K");
    37         r2 as Real(Unit="atm*K");
     36        r1 as Real(Unit='K*K');
     37        r2 as Real(Unit='atm*K');
    3838        r3 as Real;
    3939end
    … …  
    4545Model Calc as CalcBasic
    4646        PARAMETERS
    47 ext     obj as CalcObject;
     47outer obj as Plugin;
    4848
    4949        EQUATIONS
    … …  
    7676FlowSheet CalcTest
    7777        PARAMETERS
    78         obj     as CalcObject(File = "calcsample");
     78        obj     as Plugin(File = "calcsample");
    7979        NoComps as Integer(Default = 5);
    8080       
    … …  
    8484       
    8585        SPECIFY
    86         #calc1.T = 100 * "K";
    87         #calc1.P = 100 * "Pa";
     86        #calc1.T = 100 * 'K';
     87        #calc1.P = 100 * 'Pa';
    8888        calc1.z(1:NoComps-1) = 1/NoComps;
    89         calc1.r1 = 20000 * "K*K";
    90         calc1.r2 = 10000 * "Pa*K";
     89        calc1.r1 = 20000 * 'K*K';
     90        calc1.r2 = 10000 * 'Pa*K';
    9191        calc1.r3 = 1;
    9292       
    93         #calc2.T = 100 * "K";
    94         #calc2.P = 100 * "Pa";
     93        #calc2.T = 100 * 'K';
     94        #calc2.P = 100 * 'Pa';
    9595        calc2.z(1:NoComps-1) = 1/NoComps;
    96         calc2.r1 = 20000 * "K*K";
    97         calc2.r2 = 10000 * "Pa*K";
     96        calc2.r1 = 20000 * 'K*K';
     97        calc2.r2 = 10000 * 'Pa*K';
    9898        calc2.r3 = 1;
    9999
    100100        OPTIONS
    101         relativeAccuracy = 1e-6;
     101        RelativeAccuracy = 1e-6;
    102102        #mode = "steady";
    103103end
    … …  
    116116       
    117117        SPECIFY
    118         #calc2.T = 100 * "K";
    119         #calc2.P = 100 * "Pa";
     118        #calc2.T = 100 * 'K';
     119        #calc2.P = 100 * 'Pa';
    120120        calc2.z(1:NoComps-1) = 1/NoComps;
    121         calc2.r1 = 20000 * "K*K";
    122         calc2.r2 = 10000 * "Pa*K";
     121        calc2.r1 = 20000 * 'K*K';
     122        calc2.r2 = 10000 * 'Pa*K';
    123123        calc2.r3 = 1;
    124124       
    125125        OPTIONS
    126         relativeAccuracy = 1e-6;
    127         mode = "steady";
     126        RelativeAccuracy = 1e-6;
     127        Dynamic = false;
    128128end
    129 
Note: See TracChangeset for help on using the changeset viewer.