Changeset 554 for branches


Ignore:
Timestamp:
Jul 17, 2008, 2:08:20 PM (14 years ago)
Author:
Rafael de Pelegrini Soares
Message:

Added a new branch for the new gui

Location:
branches/gui
Files:
2 edited
1 copied

Legend:

Unmodified
Added
Removed
  • branches/gui/eml/mixers_splitters/mixer.mso

    r400 r554  
    1414*
    1515*-------------------------------------------------------------------
    16 * Author: Maurício Carvalho Maciel
     16* Author: Rafael de Pelegrini Soares
     17*         Maurício Carvalho Maciel
    1718* $Id$
    1819*--------------------------------------------------------------------*#
     
    2122
    2223Model mixer
     24        ATTRIBUTES
     25        Pallete         = true;
     26        Icon            = "icon/mixer";
     27        Brief           = "Model of a mixer";
     28        Info            =
     29"== Assumptions ==
     30* static
     31* adiabatic
     32
     33== Specify ==
     34* the inlet streams";
     35       
     36        VARIABLES
     37in  Inlet1 as stream (Brief = "Inlet stream 1", PosX=0, PosY=0.25, Symbol="_{in1}");
     38in  Inlet2 as stream (Brief = "Inlet stream 2", PosX=0, PosY=0.75, Symbol="_{in2}");
     39out Outlet as streamPH (Brief = "Outlet stream", PosX=1, PosY=0.5059, Symbol="_{out}");
     40       
     41        EQUATIONS
     42       
     43        "Flow"
     44        Outlet.F = Inlet1.F + Inlet2.F;
     45
     46        "Composition"
     47    Outlet.F*Outlet.z = Inlet1.F*Inlet1.z + Inlet2.F*Inlet2.z;
     48
     49        "Energy Balance"
     50        Outlet.F*Outlet.h = Inlet1.F*Inlet1.h + Inlet2.F*Inlet2.h;
     51
     52        "Pressure"
     53        Outlet.P = min([Inlet1.P, Inlet2.P]);
     54end
     55
     56Model mixer_n
    2357        ATTRIBUTES
    2458        Pallete         = true;
     
    4680        Outlet.F = sum(Inlet.F);
    4781
    48          for i in [1:NComp]
     82        for i in [1:NComp]
    4983       
    5084                "Composition"
  • branches/gui/eml/pressure_changers/turbine.mso

    r372 r554  
    1414*
    1515*----------------------------------------------------------------------
    16 * Authors: Andrey Copat, Estefane S. Horn, Marcos L. Alencastro
     16* Authors: Rafael de Pelegrini Soares
     17*          Andrey Copat, Estefane S. Horn, Marcos L. Alencastro
    1718* $Id$
    1819*--------------------------------------------------------------------*#
     
    2021using "streams";
    2122
    22 Model Hidraulic_Turbine
     23Model HidraulicTurbine
    2324        ATTRIBUTES
    2425        Pallete         = true;
     
    5253        FPower  as power                        (Brief = "Fluid Power");
    5354        BPower  as power                        (Brief = "Brake Power");
    54         EPower  as power                        (Brief = "Eletrical Potency");
    5555        Pratio  as positive                     (Brief = "Pressure Ratio");
    5656        Pdrop   as press_delta          (Brief = "Pressure Drop", DisplayUnit = 'kPa', Symbol ="\Delta P");
     
    9090        BPower = FPower * Eff;
    9191       
    92         "Calculate Eletric Power"
    93         EPower = BPower * Meff;
    94        
    9592        "Calculate Outlet Temperature"
    9693        (Outlet.T - Inlet.T) * rho * Cp = (Outlet.h - Inlet.h) * rho
     
    109106        Head = Outlet.h - Inlet.h;
    110107end
     108
     109
     110Model HidraulicTurbineGenerator as HidraulicTurbine
     111        ATTRIBUTES
     112        Pallete         = true;
     113        Icon            = "icon/HidraulicTurbine";
     114        Brief           = "Model of a Hidraulic Turbine.";
     115        Info            =
     116"== Assumptions ==
     117* Steady State;
     118* Only Liquid;
     119* Adiabatic;
     120* Isentropic.
     121       
     122== Specify ==
     123* the inlet stream;
     124* the Pressure Increase (Pdiff) OR the outlet pressure (Outlet.P);
     125* the Turbine efficiency (Eff);
     126* the Brake efficiency (Meff);
     127* the Volumetric expansivity (Beta).
     128";
     129       
     130        VARIABLES
     131        EPower  as power                        (Brief = "Eletrical Potency");
     132       
     133        EQUATIONS
     134        "Calculate Eletric Power"
     135        EPower = BPower * Meff;
     136end
Note: See TracChangeset for help on using the changeset viewer.