1 files changed, 18 insertions, 0 deletions
diff --git a/2732/CH6/EX6.12/Ex6_12.sce b/2732/CH6/EX6.12/Ex6_12.sce
new file mode 100755
index 000000000..556baf399
--- /dev/null
+++ b/2732/CH6/EX6.12/Ex6_12.sce
@@ -0,0 +1,18 @@
+clc
+// initialization of variables
+clear
+hp=300 //h.p.
+N1=30 //rpm
+N2=30000 //rpm
+fs=600 //kg/cm^2
+// calculations
+T1=4500*hp*100/(2*%pi*N1)
+T2=T1/1000
+D1=16*T1/(%pi*fs)
+D1=D1^(1/3)
+D2=16*T2/(%pi*fs)
+D2=D2^(1/3)
+// results
+printf('Diameters required are %.1f, %.1f cm',D1,D2)
+
+// wrong calculations in the text