blob: 49a810dc8c88fd05aa7e32429d8fec3469202993 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//developed in windows 8 operating system 64bit
//platform Scilab 5.4.1
//example 28_1w
clc;clear;
//Given Data
latent_heat_ice=3.36*10^5; //Latent heat of fusion of ice (Unit: J/kg)
mass=4.8*10^-3; //Mass of ice melt (Unit: kg)
t=3600; //Time in which ice melt (Unit: second)
area=3600*10^-4; //Area of the slab (Unit: m^2)
thickness=10*10^-2; //Thickness of the slab (Unit: m)
theta2=0; //Temperature of the ice (Unit : degree centigrade)
theta1=100; //Temperature of the steam (Unit: degree centigrade)
//calculation
q=mass*latent_heat_ice; //Calculation of the heat transferred through the slab to the ice in one hour (Unit : Joule)
k=q*thickness/(area*t*(theta1-theta2)); //Calculation of thermal conductivity of the stone (Unit : W/m-degree centigrade )
disp(k,"The thermal conductivity of the stone is (Unit: W/m-degree centigrade)");
|
