diff options
Diffstat (limited to '2975/CH28/EX28.3w/Ex28_3w.sce')
| -rw-r--r-- | 2975/CH28/EX28.3w/Ex28_3w.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/2975/CH28/EX28.3w/Ex28_3w.sce b/2975/CH28/EX28.3w/Ex28_3w.sce new file mode 100644 index 000000000..d11610e26 --- /dev/null +++ b/2975/CH28/EX28.3w/Ex28_3w.sce @@ -0,0 +1,20 @@ +//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 28_3w
+
+clc;clear;
+//Given Data
+
+rate_heat_gen_box=13; //The rate of heat generation in the box (Unit: Watt)
+theta1=100; //Temperature at one end (Unit: degree centigrade)
+theta2=4; //Temperature at second end (Unit: degree centigrade)
+thermal_conductivity=2; //Thermal conductivity of material (Unit: W/m- degree centigrade)
+len=8*10^-2; //Length of the material (Unit: m)
+area=12*10^-4; //Area of the cross section (Unit: m^2)
+
+//Calculation
+
+theta=((theta1+theta2)/2)+(rate_heat_gen_box*len/(2*thermal_conductivity*area)); //Calculation of the equlibrium temperature of the inner surface of the box (Unit: degree centigrade)
+
+disp(theta,"The equlibrium temperature of the inner surface of the box is (Unit: degree centigrade)");
+
|