summaryrefslogtreecommitdiff
path: root/3250/CH2/EX2.5
diff options
context:
space:
mode:
Diffstat (limited to '3250/CH2/EX2.5')
-rwxr-xr-x3250/CH2/EX2.5/Ex2_5.sce28
-rwxr-xr-x3250/CH2/EX2.5/Ex2_5.txt8
2 files changed, 36 insertions, 0 deletions
diff --git a/3250/CH2/EX2.5/Ex2_5.sce b/3250/CH2/EX2.5/Ex2_5.sce
new file mode 100755
index 000000000..7081419b9
--- /dev/null
+++ b/3250/CH2/EX2.5/Ex2_5.sce
@@ -0,0 +1,28 @@
+clc
+// Given that
+thetaF= 1540 // Temperature of mould face in degree centigrade
+Theta0 = 28 // Initial temperature of mould in Degree centigrade
+L= 272e3 // Latent heat of liquid metal in J/Kg
+Dm = 7850 // Density of liquid metal in Kg/m^3
+c = 1.17e+3 //Specific heat of sand in J/Kg-K
+k = 0.8655 // Conductivity of sand in W/m-K
+D= 1600 // Density of sand in Kg/m^3
+h = 0.1 // Height in m
+b = 10 // Thickness of slab in cm
+r =h/2// V/A in meter
+// Sample Problem 5 on page no. 66
+printf("\n # PROBLEM 2.5 # \n")
+lambda = (thetaF - Theta0)*(D*c)/(Dm*L)
+Beta1 = 2*lambda/sqrt(%pi)
+Alpha = k /(D*c)
+ts1 = r^2 /((Beta1^2)*Alpha)//In sec
+ts1_=ts1/3600 // In hour
+Beta= poly(0,"Beta");
+p=Beta^2 - lambda*(2/sqrt(%pi))*Beta -lambda/3
+Beta2 = roots(p)
+printf(" The value of Beta2 is %f, ",Beta2)
+printf("\n We only take the positive value of Beta2 , \n Hence Beta2=1.75")
+r1 = r/3
+ts2 = (r1^2)/((1.75^2)*Alpha) // in sec
+ts2_=ts2/3600//in Hour
+printf("\n\n Solidification time for slab-shaped casting = %f hr,\n Solidification time for sphere = %f hr", ts1_,ts2_)
diff --git a/3250/CH2/EX2.5/Ex2_5.txt b/3250/CH2/EX2.5/Ex2_5.txt
new file mode 100755
index 000000000..fa46acfd9
--- /dev/null
+++ b/3250/CH2/EX2.5/Ex2_5.txt
@@ -0,0 +1,8 @@
+
+ # PROBLEM 2.5 #
+ The value of Beta2 is 1.748516, The value of Beta2 is -0.252713,
+ We only take the positive value of Beta2 ,
+ Hence Beta2=1.75
+
+ Solidification time for slab-shaped casting = 0.671318 hr,
+ Solidification time for sphere = 0.054495 hr \ No newline at end of file