Ignore:
Timestamp:
Mar 7, 2007, 5:43:43 PM (16 years ago)
Author:
Rafael de Pelegrini Soares
Message:

Adapted pressure changers models, UOM problems with some equations

Location:
branches/newlanguage/sample/pressure_changers
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • branches/newlanguage/sample/pressure_changers/sample_compressor.mso

    r81 r196  
    2929
    3030        DEVICES
    31         S1 as streamTP;
     31        S1 as source;
    3232        C1 as centrifugal_compressor;
    3333       
    3434        CONNECTIONS
    35         S1 to C1.Inlet;
     35        S1.Outlet to C1.Inlet;
    3636       
    3737        PARAMETERS
    38         PP              as CalcObject   (Brief="External Physical Properties", File="vrpp");
     38        PP              as Plugin       (Brief="External Physical Properties", File="vrpp");
    3939        NComp   as Integer              (Default= 1);
    4040       
     
    4949
    5050        SPECIFY
    51         S1.F = 41.05            * "kmol/h";
    52         S1.P = 1                        * "atm";
    53         S1.T = 298                      * "K" ;
    54         S1.z = [0.79,0.21];
    55         C1.Outlet.P = 3 * "atm";
    56 
     51        S1.Outlet.F = 41.05             * 'kmol/h';
     52        S1.Outlet.P = 1                 * 'atm';
     53        S1.Outlet.T = 298                       * 'K' ;
     54        S1.Outlet.z = [0.79,0.21];
     55       
     56        C1.Outlet.P = 3 * 'atm';
    5757end             
  • branches/newlanguage/sample/pressure_changers/sample_pump.mso

    r81 r196  
    2828       
    2929        DEVICES
    30         S1 as streamTP;
     30        S1 as source;
    3131        P1 as centrifugal_pump;
    3232       
    3333        CONNECTIONS
    34         S1 to P1.Inlet;
     34        S1.Outlet to P1.Inlet;
    3535       
    3636        PARAMETERS
    37         PP              as CalcObject   (Brief="External Physical Properties", File="vrpp");
    38         Mw              as positive     (Brief = "Molar Mass", Unit = "kg/kmol");
     37        PP              as Plugin       (Brief="External Physical Properties", File="vrpp");
     38        Mw              as positive     (Brief = "Molar Mass", Unit = 'kg/kmol');
    3939        NComp   as Integer              (Default= 1);
    4040
     
    4545        NComp = PP.NumberOfComponents;
    4646        PP.Derivatives = 0;
    47         P1.N = 1000                     * "rpm";               
    48         P1.Lev = 0                      * "m";
     47        P1.N = 1000                     * 'rpm';               
     48        P1.Lev = 0                      * 'm';
    4949        P1.Meff = 0.95;
    5050        P1.Eff = 0.72;
    51         P1.Beta = 425e-6        * "1/K";
     51        P1.Beta = 425e-6        * '1/K';
    5252       
    5353        SPECIFY
    54         S1.F = 1000             * "kmol/h";
    55         S1.P = 10                       * "atm";
    56         S1.T = 298                      * "K" ;
    57         S1.z = [1,0];   
    58         P1.Pdiff = 8            * "kPa";
    59         #P1.Outlet.P = 2        * "atm";
    60         #P1.BPower = 1          * "kW";
     54        S1.Outlet.F = 1000              * 'kmol/h';
     55        S1.Outlet.P = 10                        * 'atm';
     56        S1.Outlet.T = 298                       * 'K' ;
     57        S1.Outlet.z = [1,0];   
     58       
     59        P1.Pdiff = 8            * 'kPa';
     60        #P1.Outlet.P = 2        * 'atm';
     61        #P1.BPower = 1          * 'kW';
    6162       
    6263end
     
    6465FlowSheet pump_Test
    6566        PARAMETERS
    66         PP      as CalcObject(Brief="Physical Properties",File="vrpp");
     67        PP      as Plugin(Brief="Physical Properties",File="vrpp");
    6768        NComp   as Integer;
    6869
     
    7576        DEVICES
    7677        p1 as pump;
    77         s1 as stream_therm;
     78        s1 as source;
    7879       
    7980        CONNECTIONS
    80         s1 to p1.Inlet;
     81        s1.Outlet to p1.Inlet;
    8182
    8283        SPECIFY
    83         s1.F = 826 * "kmol/h";
    84         s1.P = 549 * "kPa";
    85         s1.T = 313 * "K";
    86         s1.z = 1/NComp;
    87         s1.v = 0.68;
    88         p1.dP = 90 * "kPa";
     84        s1.Outlet.F = 826 * 'kmol/h';
     85        s1.Outlet.P = 549 * 'kPa';
     86        s1.Outlet.T = 313 * 'K';
     87        s1.Outlet.z = 1/NComp;
     88        #s1.Outlet.v = 0.68;
     89       
     90        p1.dP = 90 * 'kPa';
    8991
    9092        OPTIONS
    91         time = [0:20:1000];
    92         mode = "steady";
     93        Dynamic = false;
    9394end
  • branches/newlanguage/sample/pressure_changers/sample_turbine.mso

    r81 r196  
    2929       
    3030        DEVICES
    31         S1 as streamTP;
     31        S1 as source;
    3232        HT1 as Hidraulic_Turbine;
    3333       
    3434        CONNECTIONS
    35         S1 to HT1.Inlet;
     35        S1.Outlet to HT1.Inlet;
    3636       
    3737        PARAMETERS
    38         PP              as CalcObject   (Brief="External Physical Properties", File="vrpp");
    39         Mw              as positive     (Brief = "Molar Mass", Unit = "kg/kmol");
     38        PP              as Plugin               (Brief="External Physical Properties", File="vrpp");
     39        Mw              as positive     (Brief = "Molar Mass", Unit = 'kg/kmol');
    4040        NComp   as Integer              (Default= 1);
    4141       
     
    4646        PP.Derivatives = 0;
    4747        NComp = PP.NumberOfComponents;
    48         HT1.Beta = 425e-6       * "1/K";
     48        HT1.Beta = 425e-6 / 'K';
    4949        HT1.Meff = 0.95;
    5050        HT1.Eff = 0.72;
    5151       
    5252        SPECIFY
    53         S1.F = 1000                     * "kmol/h";
    54         S1.P = 5                        * "atm" ;
    55         S1.T = 298                      * "K" ;
    56         S1.z = [1];
    57         #HT1.Pdiff = 100        * "kPa";
    58         HT1.Outlet.P = 1        * "atm";
     53        S1.Outlet.F = 1000                      * 'kmol/h';
     54        S1.Outlet.P = 5                         * 'atm' ;
     55        S1.Outlet.T = 298                       * 'K' ;
     56        S1.Outlet.z = [1];
     57        #HT1.Pdiff = 100        * 'kPa';
     58        HT1.Outlet.P = 1        * 'atm';
    5959       
    6060end
  • branches/newlanguage/sample/pressure_changers/sample_valve.mso

    r109 r196  
    2929# with vapour conditions
    3030        PARAMETERS
    31         PP      as CalcObject(Brief="Physical Properties",File="vrpp");
     31        PP      as Plugin(Brief="Physical Properties",File="vrpp");
    3232        NComp   as Integer;
    3333
     
    4040        DEVICES
    4141        v1 as valve;
    42         s1 as stream_therm;
     42        s1 as source;
    4343       
    4444        CONNECTIONS
    45         s1 to v1.Inlet;
     45        s1.Outlet to v1.Inlet;
    4646
    4747        SPECIFY
    48         s1.P = 150 * "kPa";
    49         s1.T = 281.75 * "K";
    50         s1.z = [0.664, 0.336];
    51         s1.v = 0.0;
     48        s1.Outlet.P = 150 * 'kPa';
     49        s1.Outlet.T = 281.75 * 'K';
     50        s1.Outlet.z = [0.664, 0.336];
     51        #s1.Outlet.v = 0.0;
    5252
    5353        v1.x = 0.866;
    54         v1.Outlet.P = 148 * "kPa";
     54        v1.Outlet.P = 148 * 'kPa';
    5555
    5656        SET
    57         v1.k = 20 * "gal/min/psi^0.5";
     57        v1.k = 20 * 'gal/min/psi^0.5';
    5858       
    5959        OPTIONS
    60         relativeAccuracy = 1e-6;
    61         mode = "steady";
     60        RelativeAccuracy = 1e-6;
     61        Dynamic = false;
    6262end
    6363
     
    6565#with liquid conditions
    6666        PARAMETERS
    67         PP      as CalcObject(Brief="Physical Properties",File="vrpp");
     67        PP      as Plugin(Brief="Physical Properties",File="vrpp");
    6868        NComp   as Integer;
    6969
     
    7676        DEVICES
    7777        v1 as valve;
    78         s1 as stream_therm;
     78        s1 as source;
    7979       
    8080        CONNECTIONS
    81         s1 to v1.Inlet;
     81        s1.Outlet to v1.Inlet;
    8282
    8383        SPECIFY
    84         s1.P = 185 * "kPa";
    85         s1.T = 328.12 * "K";
    86         s1.z = [0.001848, 0.9982];
    87         s1.v = 0.0;
     84        s1.Outlet.P = 185 * 'kPa';
     85        s1.Outlet.T = 328.12 * 'K';
     86        s1.Outlet.z = [0.001848, 0.9982];
     87        #s1.Outlet.v = 0.0;
    8888
    8989        v1.x = 0.3363;
    90         v1.Outlet.P = 183 * "kPa";
     90        v1.Outlet.P = 183 * 'kPa';
    9191
    9292        SET
    93         v1.k = 20 * "gal/min/psi^0.5";
     93        v1.k = 20 * 'gal/min/psi^0.5';
    9494       
    9595        OPTIONS
    96         relativeAccuracy = 1e-6;
    97         mode = "steady";
     96        RelativeAccuracy = 1e-6;
     97        Dynamic = false;
    9898end
    9999
     
    101101       
    102102        DEVICES
    103         S1 as streamTP;
     103        S1 as source;
    104104        V1 as valve_linear;
    105105
    106106        CONNECTIONS
    107         S1 to V1.Inlet;
     107        S1.Outlet to V1.Inlet;
    108108       
    109109        PARAMETERS
    110         PP              as CalcObject   (Brief="External Physical Properties", File="vrpp");
     110        PP              as Plugin               (Brief="External Physical Properties", File="vrpp");
    111111        NComp   as Integer              (Default= 1);
    112112       
     
    119119       
    120120        SPECIFY
    121         S1.P = 2169.78                  * "kPa";
    122         S1.T = 394.26                   * "K" ;
    123         S1.z = [1];
    124         V1.Qv = 113.56                  * "m^3/h";
     121        S1.Outlet.P = 2169.78                   * 'kPa';
     122        S1.Outlet.T = 394.26                    * 'K' ;
     123        S1.Outlet.z = [1];
     124       
     125        V1.Qv = 113.56                  * 'm^3/h';
    125126        V1.x = 0.5;
    126         V1.cv = 10                              * "m^3/h/kPa^0.5";
     127        V1.cv = 10                              * 'm^3/h/kPa^0.5';
    127128       
    128129        OPTIONS
    129         relativeAccuracy = 1e-6;
    130         mode = "steady";
     130        RelativeAccuracy = 1e-6;
     131        Dynamic = false;
    131132end
Note: See TracChangeset for help on using the changeset viewer.