/// <summary>壁熱貫流テスト(潜熱蓄熱材)</summary> private static void wallHeatTransferTest3() { //初期温度 const double INIT_TEMP = 35; //壁層を作成 WallLayers wl = new WallLayers(); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.FrexibleBoard), 0.0165)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("ダミー材料", 1, 1), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("ダミー材料", 1, 1), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.ExtrudedPolystyreneFoam_3), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.AirGap), 0.015)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); //壁体を作成 Wall wall = new Wall(wl); wall.TimeStep = 1200; wall.AirTemperature1 = 20; wall.AirTemperature2 = 20; wall.SurfaceArea = 6.48; //潜熱蓄熱材1を作成して設定 LatentHeatStorageMaterial material1; material1 = new LatentHeatStorageMaterial(19, new WallMaterial("パッシブ・スミターマル(凝固)", 0.19, 3.6 * 1400)); material1.AddMaterial(23, new WallMaterial("パッシブ・スミターマル(遷移)", (0.19 + 0.22) / 2d, 15.1 * 1400)); material1.AddMaterial(100, new WallMaterial("パッシブ・スミターマル(融解)", 0.22, 3.6 * 1400)); material1.Initialize(INIT_TEMP); wall.SetLatentHeatStorageMaterial(1, material1); //潜熱蓄熱材2を作成して設定 LatentHeatStorageMaterial material2; material2 = new LatentHeatStorageMaterial(30, new WallMaterial("スミターマル(凝固)", 0.19, 3.6 * 1390)); material2.AddMaterial(32, new WallMaterial("スミターマル(遷移)", (0.19 + 0.22) / 2d, 63.25 * 1400)); material2.AddMaterial(100, new WallMaterial("スミターマル(融解)", 0.22, 3.5 * 1410)); material2.Initialize(INIT_TEMP); wall.SetLatentHeatStorageMaterial(2, material2); //潜熱蓄熱材の間に配管を埋設 Tube tube = new Tube(0.84, 0.346, 4186); wall.AddTube(tube, 1); tube.SetFlowRate(0); tube.FluidTemperature = 40; //壁体温度を初期化 wall.InitializeTemperature(INIT_TEMP); for (int i = 0; i < wall.Layers.LayerNumber; i++) Console.Write("温度" + i + ", "); Console.WriteLine("蓄熱量[kJ]"); for (int i = 0; i < 200; i++) { if (i == 100) { tube.SetFlowRate(0.54); //通水開始 wall.AirTemperature1 = 30; wall.AirTemperature2 = 30; } wall.Update(); double[] tmp = wall.GetTemperatures(); for (int j = 0; j < tmp.Length - 1; j++) Console.Write(((tmp[j] + tmp[j + 1]) / 2d).ToString("F1") + ", "); Console.Write(wall.GetHeatStorage(INIT_TEMP).ToString("F0")); Console.WriteLine(); } Console.Read(); }
/// <summary>壁熱貫流テスト(潜熱蓄熱材)</summary> private static void wallHeatTransferTest4() { WallLayers layers = new WallLayers(); WallLayers.Layer layer; layer = new WallLayers.Layer(new WallMaterial("コンクリート", 1.4, 1934), 0.060); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("潜熱蓄熱材A", 1.4, 1934), 0.030); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("潜熱蓄熱材B", 1.4, 1934), 0.030); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("コンクリート", 1.4, 1934), 0.060); layers.AddLayer(layer); Wall wall = new Wall(layers); LatentHeatStorageMaterial material = new LatentHeatStorageMaterial(11, new WallMaterial("潜熱蓄熱材A1", 1.4, 1934)); material.AddMaterial(12, new WallMaterial("潜熱蓄熱材A2", 1.4, 1934 * 40)); material.AddMaterial(100, new WallMaterial("潜熱蓄熱材A3", 1.4, 1934)); wall.SetLatentHeatStorageMaterial(1, material); material = new LatentHeatStorageMaterial(13, new WallMaterial("潜熱蓄熱材B1", 1.4, 1934)); material.AddMaterial(14, new WallMaterial("潜熱蓄熱材B2", 1.4, 1934 * 40)); material.AddMaterial(100, new WallMaterial("潜熱蓄熱材B3", 1.4, 1934)); wall.SetLatentHeatStorageMaterial(2, material); wall.AirTemperature1 = 20; wall.AirTemperature2 = 10; wall.SurfaceArea = 175; wall.GetSurface(true).ConvectiveRate = 1; wall.GetSurface(false).ConvectiveRate = 1; wall.TimeStep = 3600; StreamWriter sWriter = new StreamWriter("test.csv"); wall.InitializeTemperature(10); Console.WriteLine("壁面温度[C]"); for (int kkk = 0; kkk < 4; kkk++) { if (kkk % 2 == 0) wall.AirTemperature1 = 20; else wall.AirTemperature1 = 10; for (int i = 0; i < 24; i++) { wall.Update(); double[] tmp = wall.GetTemperatures(); for (int j = 0; j < tmp.Length; j++) Console.Write(tmp[j].ToString("F2").PadLeft(5) + " | "); Console.WriteLine(); for (int j = 0; j < tmp.Length; j++) sWriter.Write(tmp[j].ToString("F2").PadLeft(5) + " , "); sWriter.WriteLine(); } } sWriter.Close(); Console.Read(); }
/// <summary>壁熱貫流テスト(冷温水配管埋設)</summary> private static void wallHeatTransferTest2() { WallLayers wl = new WallLayers(); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.FrexibleBoard), 0.0165)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("水", 0.59, 4186), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("水", 0.59, 4186), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.ExtrudedPolystyreneFoam_3), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.AirGap), 0.015)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); Wall wall = new Wall(wl); wall.TimeStep = 300; wall.AirTemperature1 = 20; wall.AirTemperature2 = 10; wall.SurfaceArea = 6.48; //配管を埋設 Tube tube = new Tube(0.84, 0.346, 4186); wall.AddTube(tube, 1); tube.SetFlowRate(0); //最初は流量0 tube.FluidTemperature = 30; wall.InitializeTemperature(20); //壁体温度を初期化 for (int i = 0; i < wall.Layers.LayerNumber; i++) Console.Write("温度" + i + ", "); Console.WriteLine("配管への熱移動量[W], 配管出口温度[C]"); for (int i = 0; i < 100; i++) { if (i == 50) tube.SetFlowRate(0.54); //通水開始 wall.Update(); double[] tmp = wall.GetTemperatures(); for (int j = 0; j < tmp.Length - 1; j++) Console.Write(((tmp[j] + tmp[j + 1]) / 2d).ToString("F1") + ", "); Console.Write(wall.GetHeatTransferToTube(1).ToString("F0") + ", " + tube.GetOutletFluidTemperature().ToString("F1")); Console.WriteLine(); } Console.Read(); }
/// <summary>壁熱貫流テスト</summary> private static void wallHeatTransferTest() { WallLayers layers = new WallLayers(); WallLayers.Layer layer; layer = new WallLayers.Layer(new WallMaterial("合板", 0.19, 716), 0.025); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("コンクリート", 1.4, 1934), 0.120); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("空気層", 1d / 0.086, 0), 0.020); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("ロックウール", 0.042, 84), 0.050); layers.AddLayer(layer); Wall wall = new Wall(layers); wall.TimeStep = 3600; wall.AirTemperature1 = 20; wall.AirTemperature2 = 10; wall.InitializeTemperature(10); //壁体内温度は10℃均一とする wall.SurfaceArea = 1; Console.WriteLine("温度分布の推移"); Console.WriteLine("合板, コンクリート, 空気層, ロックウール"); double[] temps; for (int i = 0; i < 24; i++) { wall.Update(); temps = wall.GetTemperatures(); Console.Write((i + 1).ToString("F0").PadLeft(2) + "時間後 | "); for (int j = 0; j < temps.Length - 1; j++) Console.Write(((temps[j] + temps[j + 1]) / 2d).ToString("F1") + " | "); Console.WriteLine(); } //定常状態まで進める for (int i = 0; i < 1000; i++) wall.Update(); Console.WriteLine(); Console.WriteLine("定常状態の温度分布"); temps = wall.GetTemperatures(); for (int j = 0; j < temps.Length - 1; j++) Console.Write(((temps[j] + temps[j + 1]) / 2d).ToString("F1") + " | "); Console.WriteLine(); Console.WriteLine("定常状態の熱流1: " + wall.GetHeatTransfer(true).ToString("F1")); Console.WriteLine("定常状態の熱流2: " + wall.GetHeatTransfer(false).ToString("F1")); Console.WriteLine("定常状態の熱流3: " + wall.GetStaticHeatTransfer().ToString("F1")); Console.Read(); }
/// <summary>Sample program calculating the unsteady heat conduction of wall with latent heat storage material</summary> private static void wallTest3() { //Initial temperature const double INIT_TEMP = 35; //Create an instance of WallLayers class WallLayers wl = new WallLayers(); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.FrexibleBoard), 0.0165)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("dummy", 1, 1), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("dummy", 1, 1), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.ExtrudedPolystyreneFoam_3), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.AirGap), 0.015)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); //Create an instance of Wall class Wall wall = new Wall(wl); wall.TimeStep = 1200; wall.AirTemperature1 = 20; wall.AirTemperature2 = 20; wall.SurfaceArea = 6.48; //Create an instance of LatentHeatStorageMaterial class LatentHeatStorageMaterial pmc1; pmc1 = new LatentHeatStorageMaterial(19, new WallMaterial("PCM1 (Solid)", 0.19, 3.6 * 1400)); pmc1.AddMaterial(23, new WallMaterial("PCM1 (Two phase)", (0.19 + 0.22) / 2d, 15.1 * 1400)); pmc1.AddMaterial(100, new WallMaterial("PCM1 (Liquid)", 0.22, 3.6 * 1400)); pmc1.Initialize(INIT_TEMP); //Set PCM to second wall layer wall.SetLatentHeatStorageMaterial(1, pmc1); //Create an instance of LatentHeatStorageMaterial class LatentHeatStorageMaterial pcm2; pcm2 = new LatentHeatStorageMaterial(30, new WallMaterial("PCM2 (Solid)", 0.19, 3.6 * 1390)); pcm2.AddMaterial(32, new WallMaterial("PCM2 (Two phase)", (0.19 + 0.22) / 2d, 63.25 * 1400)); pcm2.AddMaterial(100, new WallMaterial("PCM2 (Liquid)", 0.22, 3.5 * 1410)); pcm2.Initialize(INIT_TEMP); //Set PCM to third wall layer wall.SetLatentHeatStorageMaterial(2, pcm2); //Install heating tube between PMCs Tube tube = new Tube(0.84, 0.346, 4186); wall.AddTube(tube, 1); tube.SetFlowRate(0); tube.FluidTemperature = 40; //Initialize wall temperature wall.InitializeTemperature(INIT_TEMP); for (int i = 0; i < wall.Layers.LayerNumber; i++) Console.Write("Temperature" + i + ", "); Console.WriteLine("Heat storage[kJ]"); for (int i = 0; i < 200; i++) { if (i == 100) { tube.SetFlowRate(0.54); //Start heating wall.AirTemperature1 = 30; wall.AirTemperature2 = 30; } wall.Update(); double[] tmp = wall.GetTemperatures(); for (int j = 0; j < tmp.Length - 1; j++) Console.Write(((tmp[j] + tmp[j + 1]) / 2d).ToString("F1") + ", "); Console.Write(wall.GetHeatStorage(INIT_TEMP).ToString("F0")); Console.WriteLine(); } Console.Read(); }
/// <summary>Sample program calculating the unsteady heat conduction of wall with heating tube</summary> private static void wallTest2() { WallLayers wl = new WallLayers(); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.FrexibleBoard), 0.0165)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("Water", 0.59, 4186), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial("Water", 0.59, 4186), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.ExtrudedPolystyreneFoam_3), 0.02)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.AirGap), 0.015)); wl.AddLayer(new WallLayers.Layer(new WallMaterial(WallMaterial.PredefinedMaterials.Plywood), 0.009)); Wall wall = new Wall(wl); wall.TimeStep = 300; wall.AirTemperature1 = 20; wall.AirTemperature2 = 10; wall.SurfaceArea = 6.48; Tube tube = new Tube(0.84, 0.346, 4186); //installing tube to wall wall.AddTube(tube, 1); tube.SetFlowRate(0); //initial flow rate is 0 kg/s tube.FluidTemperature = 30; wall.InitializeTemperature(20); //initialize temperature of the wall for (int i = 0; i < wall.Layers.LayerNumber; i++) Console.Write("temperature" + i + ", "); Console.WriteLine("heat transfer to the tube[W], outlet temperature of fluid[C]"); for (int i = 0; i < 100; i++) { if (i == 50) tube.SetFlowRate(0.54); //start heating wall.Update(); double[] tmp = wall.GetTemperatures(); for (int j = 0; j < tmp.Length - 1; j++) Console.Write(((tmp[j] + tmp[j + 1]) / 2d).ToString("F1") + ", "); Console.Write(wall.GetHeatTransferToTube(1).ToString("F0") + ", " + tube.GetOutletFluidTemperature().ToString("F1")); Console.WriteLine(); } Console.Read(); }
/// <summary>Sample program calculating the unsteady heat conduction of wall</summary> private static void wallTest1() { WallLayers layers = new WallLayers(); WallLayers.Layer layer; layer = new WallLayers.Layer(new WallMaterial("Plywood", 0.19, 716), 0.025); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("Concrete", 1.4, 1934), 0.120); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("Air gap", 1d / 0.086, 0), 0.020); layers.AddLayer(layer); layer = new WallLayers.Layer(new WallMaterial("Rock wool", 0.042, 84), 0.050); layers.AddLayer(layer); Wall wall = new Wall(layers); wall.TimeStep = 3600; wall.AirTemperature1 = 20; wall.AirTemperature2 = 10; wall.InitializeTemperature(10); //Initial temperature is 10 C wall.SurfaceArea = 1; Console.WriteLine("Plywood, Concrete, Air gap, Rock wool"); double[] temps; for (int i = 0; i < 24; i++) { wall.Update(); temps = wall.GetTemperatures(); Console.Write((i + 1).ToString("F0").PadLeft(2) + "Hour | "); for (int j = 0; j < temps.Length - 1; j++) Console.Write(((temps[j] + temps[j + 1]) / 2d).ToString("F1") + " | "); Console.WriteLine(); } //Iterate until wall become steady state for (int i = 0; i < 1000; i++) wall.Update(); Console.WriteLine(); Console.WriteLine("Steady state"); temps = wall.GetTemperatures(); for (int j = 0; j < temps.Length - 1; j++) Console.Write(((temps[j] + temps[j + 1]) / 2d).ToString("F1") + " | "); Console.WriteLine(); Console.WriteLine("Heat transfer at steady state 1: " + wall.GetHeatTransfer(true).ToString("F1")); Console.WriteLine("Heat transfer at steady state 2: " + wall.GetHeatTransfer(false).ToString("F1")); Console.WriteLine("Heat transfer at steady state 3: " + wall.GetStaticHeatTransfer().ToString("F1")); Console.Read(); }