blob: 1038e44cacc8cdf938ccb0ed0b4df99cbe50a452 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
clc;funcprot(0);//EXAMPLE 15.1
// Initialisation of Variables
rho=3.2;.............//Specific Gravity of SiC in g/cm^2
Ww=385;.............//Weight of Ceramic when dry in g
Wd=360;.............//Weight of Ceramic after Soaking in water in g
Ws=224;.............//Weight of Ceramic Suspended in water in g
//CALCULATIONS
A=((Ww-Wd)/(Ww-Ws))*100;..........//Apparent Porosity in percent
B=(Wd)/(Ww-Ws);..........//Bulk Density of Ceramic
T=((rho-B)/rho)*100;.......//True Porosity of Ceramic in Percent
C=T-A;..............//Closed pore percent of ceramic
F=C/T;..............//Fraction Closed Pores of Ceramic
disp(A,"Apparent Porosity in percent:")
disp(B,"Bulk Density of Ceramic:")
disp(T,"True Porosity of Ceramic in Percent:")
disp(F,"Fraction Closed Pores of Ceramic:")
|
