Changeset 206


Ignore:
Timestamp:
Mar 14, 2007, 11:15:22 PM (15 years ago)
Author:
Argimiro Resende Secchi
Message:

Enhance valve model.

Location:
branches/newlanguage
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/newlanguage/eml/pressure_changers/valve.mso

    r205 r206  
    4141       
    4242        PARAMETERS
    43         Valve_Type as Switcher (Valid = ["valve_linear", "valve_parabolic", "valve_equal", "valve_quick", "valve_hyperbolic"], Default = "valve_linear");
     43        valve_type as Switcher (Valid = ["linear", "parabolic", "equal", "quick", "hyperbolic"], Default = "linear");
    4444outer PP                as Plugin       (Brief = "External Physical Properties", Type = "PP");
    4545outer NComp     as Integer      (Brief = "Number of chemical components", Lower = 1);
     
    9292        vm = PP.LiquidVolume(Inlet.T,Inlet.P,Inlet.z);
    9393       
    94         switch Valve_Type
    95         case "valve_linear":
     94        switch valve_type
     95        case "linear":
    9696
    97                        
    9897                "Opening Equation"
    9998                fc = x;
    10099
    101         case "valve_parabolic":
    102        
    103        
     100        case "parabolic":
     101
    104102                "Opening Equation"
    105103                fc = x^2;
    106104
     105        case "equal":
    107106
    108         case "valve_equal":
    109 
    110                        
    111107                "Opening Equation"
    112108                fc = x^2/(2-x^4)^(1/2);
    113109
    114 
    115         case "valve_quick":
     110        case "quick":
    116111       
    117                        
    118112                "Opening Equation"
    119113                fc = 10*x/sqrt(1+99*x^2);
    120114
     115        case "hyperbolic":
    121116
    122         case "valve_hyperbolic":
    123 
    124                        
    125117                "Opening Equation"
    126118                fc = 0.1*x/sqrt(1-0.99*x^2);
  • branches/newlanguage/sample/pressure_changers/sample_valve.mso

    r205 r206  
    1414*
    1515*--------------------------------------------------------------------
    16 * Sample file for model valve (simplified) and valve_linear
     16* Sample file for models valve_simplified and valve
    1717*--------------------------------------------------------------------
    1818*
     
    2020*
    2121*----------------------------------------------------------------------
    22 * Author: Paula B. Staudt, Estefane Horn
     22* Author: Paula B. Staudt, Estefane Horn, Núbia do Carmo Ferreira
    2323* $Id$
    2424*--------------------------------------------------------------------*#
     
    115115        PP.Derivatives = 0;
    116116        NComp = PP.NumberOfComponents;
    117        
     117        V1.valve_type = "linear"; #"parabolic", "equal", "quick", "hyperbolic"
     118
    118119        SPECIFY
    119120        S1.Outlet.P = 2169.78                   * 'kPa';
Note: See TracChangeset for help on using the changeset viewer.