8 files changed, 103 insertions, 0 deletions
diff --git a/3257/CH6/EX6.1/Ex6_1.sce b/3257/CH6/EX6.1/Ex6_1.sce
new file mode 100755
index 000000000..70d4e7201
--- /dev/null
+++ b/3257/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,19 @@
+// Calculation of upsetting force
+clc
+d1 = 200 // diameter in mm
+h1 = 125 // height in mm
+h2 = 50 // height in mm
+K = 760 // in MPa
+n = 0.19 
+mu = 0.2 // coefficient of friction
+printf("\n Example 6.1")
+epsilon1 = log(h1/h2)
+Yf = K*epsilon1^n
+v = %pi/4*d1^2*h1
+r2 = sqrt(v/(%pi*h2))
+
+P_av= Yf*(1+(2*mu*r2/(3*h2)))
+F = P_av*1e6*%pi*(r2*1e-3)^2
+printf("\n Required upsetting force is %.2e N",F)
+// Answer in book is 8.32e7N
+
diff --git a/3257/CH6/EX6.1/Ex6_1.txt b/3257/CH6/EX6.1/Ex6_1.txt
new file mode 100755
index 000000000..66bb030ad
--- /dev/null
+++ b/3257/CH6/EX6.1/Ex6_1.txt
@@ -0,0 +1,3 @@
+ 
+ Example 6.1
+ Required upsetting force is 8.35e+07 N 
+\ No newline at end of file
diff --git a/3257/CH6/EX6.4/Ex6_4.sce b/3257/CH6/EX6.4/Ex6_4.sce
new file mode 100755
index 000000000..b762cc03d
--- /dev/null
+++ b/3257/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,21 @@
+// Power required for rolling
+clc
+t1 = 20 // initial thickness in mm
+t2 = 12 // final thickness in mm
+R = 300 // roll radius
+N = 100 // rpm of roll
+w = 250 // width in mm
+K = 895 // in MPa
+n = 0.49 // from table
+mu = 0.1 // frictional coefficient
+printf("\n Example 6.4")
+L = sqrt((R*1e-3)*(t1-t2)*1e-3)
+epsilon = log(t1/t2)
+Y_bar = K*epsilon^n/(1+n)
+Y_bar_1 = Y_bar*(1+(mu*L/((t1+t2)*1e-3)))
+F = L*w*Y_bar_1*1e3
+p = 2*%pi*F*L*N/60000
+
+printf("\n Power required for rolling is %d kW.",p)
+// Answer in book is 3111kW
+
diff --git a/3257/CH6/EX6.4/Ex6_4.txt b/3257/CH6/EX6.4/Ex6_4.txt
new file mode 100755
index 000000000..c0a8db52f
--- /dev/null
+++ b/3257/CH6/EX6.4/Ex6_4.txt
@@ -0,0 +1,3 @@
+ 
+ Example 6.4
+ Power required for rolling is 3131 kW. 
+\ No newline at end of file
diff --git a/3257/CH6/EX6.6/Ex6_6.sce b/3257/CH6/EX6.6/Ex6_6.sce
new file mode 100755
index 000000000..340fae020
--- /dev/null
+++ b/3257/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,21 @@
+// Force in hot extrusion
+clc
+D = 150 // initial diameter in mm
+H = 300 // height in mm
+v = 330 // velocity in m/sec
+d = 75 // final diameter in mm
+mu = 0.1 // frictional coefficient
+C = 240 // in MPa
+m = 0.06 // constant
+a = 0.8 // from table
+b = 1.5 // from table
+printf("\n Example 6.6")
+R = D^2/d^2 // its calculated value in book is 2, while in actual its 4 
+epsilon = 6*(H*1e-3)*log(R)/(D*1e-3)
+sigma = C*epsilon^m
+Y_bar = sigma // assumption
+p = Y_bar*(a+b*log(R))
+F = p*1e6*%pi*(D*1e-3)^2/4
+printf("\n Force required for rolling is %.1e N.",F)
+// Answer in book is 8.8e6 N. It is because of wrong calculation of value of R
+
diff --git a/3257/CH6/EX6.6/Ex6_6.txt b/3257/CH6/EX6.6/Ex6_6.txt
new file mode 100755
index 000000000..b8b546b7c
--- /dev/null
+++ b/3257/CH6/EX6.6/Ex6_6.txt
@@ -0,0 +1,3 @@
+ 
+ Example 6.6
+ Force required for rolling is 1.5e+07 N. 
+\ No newline at end of file
diff --git a/3257/CH6/EX6.7/Ex6_7.sce b/3257/CH6/EX6.7/Ex6_7.sce
new file mode 100755
index 000000000..e2584e30d
--- /dev/null
+++ b/3257/CH6/EX6.7/Ex6_7.sce
@@ -0,0 +1,26 @@
+// Power required for rolling
+clc
+t1 = 6 // initial thickness in mm
+t2 = 3 // final thickness in mm
+v = 0.6 // velocity in m/s
+x = 0.35 // fractional difference between values
+K = 895 // in MPa
+n = 0.49 // from table
+
+printf("\n Example 6.7")
+
+epsilon = log(t1/t2)
+Y_bar = K*epsilon^n/(1+n)
+Af = %pi/4*(t2*1e-3)^2
+F = Y_bar*Af*epsilon
+power = F*v // power
+printf("\n Part A:")
+printf("\n Power required for operation is %d W.",power*1e6)
+p_act = (1+x)*power
+Yf = K*epsilon^n
+sigma_d = F*(1+x)/Af
+p = Yf - sigma_d
+
+printf("\n\n Part B:")
+printf("\n Die pressure at exit of die is %d MPa.",p)
+
diff --git a/3257/CH6/EX6.7/Ex6_7.txt b/3257/CH6/EX6.7/Ex6_7.txt
new file mode 100755
index 000000000..056080e81
--- /dev/null
+++ b/3257/CH6/EX6.7/Ex6_7.txt
@@ -0,0 +1,7 @@
+ 
+ Example 6.7
+ Part A:
+ Power required for operation is 1475 W.
+
+ Part B:
+ Die pressure at exit of die is 278 MPa. 
+\ No newline at end of file