1 files changed, 16 insertions, 0 deletions
diff --git a/2921/CH17/EX17.5/Ex17_5.sce b/2921/CH17/EX17.5/Ex17_5.sce
new file mode 100755
index 000000000..36f6e790c
--- /dev/null
+++ b/2921/CH17/EX17.5/Ex17_5.sce
@@ -0,0 +1,16 @@
+clc;
+clear;
+mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-17.5 Page No.388\n');
+
+//Deflection
+D=0.75;
+E=30*10^6;
+L=15;
+F=96;
+I=%pi*D^4/64;
+
+delta=F*L^4/(48*E*I);
+delta=floor(100*delta)*10^-2;
+Nc=188/sqrt(delta);
+
+mprintf('\n Critical speed = %f rpm.',Nc);