Example #1
0
        public Form1()
        {
            //Starting up frontpage
            InitializeComponent();

            //Starting LOGPH diagram
            Plot_LogPH LOGPH = new Plot_LogPH(MyChart, FluidList.Ammonia);


            //Setting up class's
            Compressor Comp  = new Compressor(FluidList.Ammonia);
            Condenser  Cond  = new Condenser(FluidList.Ammonia);
            ExpValve   Valve = new ExpValve(FluidList.Ammonia);
            Evaporator Evap  = new Evaporator(FluidList.Ammonia);


            //Connecting the units
            Cond.Inlet  = Comp.Outlet;
            Valve.Inlet = Cond.Outlet;
            Evap.Inlet  = Valve.Outlet;
            Comp.Inlet  = Evap.Outlet;

            //Settings for the compressor
            Comp.DischargePressure = Pressure.FromBars(60);
            Comp.EtaI = 0.80;
            Comp.EtaV = 0.80;

            //Settings for the Valve
            Valve.EvapPressure = Pressure.FromBars(10);

            //Settings for the Valve
            Evap.SuperHeat = Temperature.FromKelvins(10);


            for (int i = 0; i < 10; i++)
            {
                Comp.DoCalculation();
                Cond.DoCalculation();
                Valve.DoCalculation();
                Evap.DoCalculation();
            }

            //Drawing the dome
            LOGPH.PlotLogPH();

            LOGPH.Plot(Comp.Inlet, Comp.Outlet);
            LOGPH.Plot(Cond.Inlet, Cond.Outlet);
            LOGPH.Plot(Valve.Inlet, Valve.Outlet);
            LOGPH.Plot(Evap.Inlet, Evap.Outlet);
        }
Example #2
0
        public Form1()
        {
            //Starting up frontpage
            InitializeComponent();

            //Starting LOGPH diagram
            Plot_LogPH LOGPH   = new Plot_LogPH(MyChart, FluidList.Ammonia);
            PlotXY     XYChart = new PlotXY(MyChartXY);



            //Playing around with a normal XY Graph

            XYChart.Plot(Power.FromKilowatts(10), MassFlow.FromKilogramsPerSecond(1));
            XYChart.Plot(Power.FromKilowatts(11), MassFlow.FromKilogramsPerSecond(1.2));
            XYChart.Plot(Power.FromKilowatts(12), MassFlow.FromKilogramsPerSecond(1.6));
            XYChart.Plot(Power.FromKilowatts(13), MassFlow.FromKilogramsPerSecond(1.7));
            XYChart.Plot(Power.FromKilowatts(14), MassFlow.FromKilogramsPerSecond(1.8));
            XYChart.Plot(Power.FromKilowatts(15), MassFlow.FromKilogramsPerSecond(1.9));
            XYChart.Plot(Power.FromKilowatts(17), MassFlow.FromKilogramsPerSecond(2));
            XYChart.Plot(Power.FromKilowatts(21), MassFlow.FromKilogramsPerSecond(2.8));
            XYChart.Plot(Power.FromKilowatts(25), MassFlow.FromKilogramsPerSecond(3));



            LOGPH.PlotLogPH();

            Fluid Vand = new Fluid(FluidList.Water);

            //Compressor calculations
            Fluid CompressorInlet     = new Fluid(FluidList.Ammonia);
            Fluid CompressorOutlet    = new Fluid(FluidList.Ammonia);
            Fluid CompressorOutletH2s = new Fluid(FluidList.Ammonia);

            //Giving the inlet guess on its condition
            CompressorInlet.UpdatePX(Pressure.FromBars(5), 1);
            LOGPH.Plot(CompressorInlet);

            //Calculating the outlet af compressor

            //This is h1
            SpecificEnergy h1 = CompressorInlet.Enthalpy;

            //Updating output refrigerant with the high pressure and the entropy(from input)
            CompressorOutletH2s.UpdatePS(Pressure.FromBars(30), CompressorInlet.Entropy);
            LOGPH.Plot(CompressorOutletH2s);

            //Setting h2s from output-refrigerant
            SpecificEnergy H2s = CompressorOutletH2s.Enthalpy;

            //Compressor calculation
            SpecificEnergy h2 = ((H2s - h1) / 0.80) + h1;

            //Compressor outlet condition
            CompressorOutlet.UpdatePH(CompressorOutletH2s.Pressure, h2);
            LOGPH.Plot(CompressorOutlet);

            //Plot Compressor as lines
            LOGPH.Plot(CompressorInlet, CompressorOutlet);



            //Creating a condensator
            Fluid CondenserInlet  = new Fluid(FluidList.Ammonia);
            Fluid CondenserOutlet = new Fluid(FluidList.Ammonia);

            //The inlet of the condenser is the same as compressor outlet
            CondenserInlet.Copy(CompressorOutlet);


            //Condensator outlet
            CondenserOutlet.UpdatePX(CondenserInlet.Pressure, 0);

            //Plot Condensator as lines
            LOGPH.Plot(CondenserInlet, CondenserOutlet);



            //Creating a Expansion valve
            Fluid ValveInlet  = new Fluid(FluidList.Ammonia);
            Fluid ValveOutlet = new Fluid(FluidList.Ammonia);


            //The inlet of the valve is the same as condens outlet
            ValveInlet.Copy(CondenserOutlet);

            //Expansion valve drops the pressure down but keeps the Enthalpy
            ValveOutlet.UpdatePH(CompressorInlet.Pressure, ValveInlet.Enthalpy);

            //Plot Valve as lines
            LOGPH.Plot(ValveInlet, ValveOutlet);



            //Creating an Evaporator
            Fluid EvaporatorInlet  = new Fluid(FluidList.Ammonia);
            Fluid EvaporatorOutlet = new Fluid(FluidList.Ammonia);

            //The inlet of the valve is the same as condens outlet
            EvaporatorInlet.Copy(ValveOutlet);

            //Creating a superheat of 10°C
            EvaporatorOutlet.UpdatePT(EvaporatorInlet.Pressure, EvaporatorInlet.Tsat + TemperatureDelta.FromKelvins(10));


            //Plot Valve as lines
            LOGPH.Plot(EvaporatorInlet, EvaporatorOutlet);


            //Telling the compressor that it is connected to the evaporator
            CompressorInlet.Copy(EvaporatorOutlet);



            //Calculations


            //Can we find the power input to the compressor?

            //Setting a massflow
            MassFlow MassflowCompressor = MassFlow.FromKilogramsPerSecond(0.45);

            //Power = Massflow * (H2 - H1)
            Power PowerToCompressor = MassflowCompressor * (CompressorOutlet.Enthalpy - CompressorInlet.Enthalpy);

            //Print it to Debug screen without telling it in what unit we want to see it
            Debug.Print(PowerToCompressor.ToString());

            //Giving it a unit to display it in
            Debug.Print(PowerToCompressor.ToUnit(PowerUnit.Kilowatt).ToString());


            ///What if we want to calculation an equation that the unit-system cant handle?

            //!Beware!: Normally you should let the UnitSystem handle the units because it checks the units for you
            // and it puts out an error if you have messed up the units.
            // Sometimes the unitsystem give you an error even though the equation is correct and then you have to
            // do this to bypass the unitsystem and then you have to handle the units yourself!

            //The Stefan - Boltzmann Constant
            double σ = 5.6703 * 10E-8; //(W / m2K4)

            Temperature TempOfBlackBody = Temperature.FromDegreesCelsius(20);
            Area        AreaOfBody      = Area.FromSquareMeters(0.634);

            //q = σ * T^4 * A
            Power RadiationPower = Power.FromWatts(σ * Math.Pow(TempOfBlackBody.Kelvins, 4) * AreaOfBody.SquareMeters);

            //Display result
            Debug.Print(RadiationPower.ToUnit(PowerUnit.Kilowatt).ToString());



            //Example: Putting code in Class to make it easyier to reuse


            //New instance of a compressor
            Compressor Comp1 = new Compressor(FluidList.Ammonia);

            //Settings for the compressor
            Comp1.DischargePressure = Pressure.FromBars(60);
            Comp1.EtaI = 0.80;
            Comp1.EtaV = 0.80;

            //Giving the compressor en inlet condition
            Comp1.Inlet.UpdatePX(Pressure.FromBars(20), 1);

            //Calling the compressor calculations
            Comp1.DoCalculation();

            //Plotting the result
            LOGPH.Plot(Comp1.Inlet, Comp1.Outlet);
        }