1 files changed, 14 insertions, 0 deletions
diff --git a/3526/CH7/EX7.11/EX7_11.sce b/3526/CH7/EX7.11/EX7_11.sce
new file mode 100644
index 000000000..421c80341
--- /dev/null
+++ b/3526/CH7/EX7.11/EX7_11.sce
@@ -0,0 +1,14 @@
+clc;funcprot(0);//EXAMPLE 7.11
+//page 199
+// Initialisation of Variables
+N=5.256*10^5;......//No. of cycles that the shaft will  experience in one year
+F=12500;.........//applied load  on shaft in lb
+L=96;...........//Length of Kliin produced from tool steel in in.
+sigma1=72000;...........//the applied stress on Shaft
+f=2;............//Factor of saftey of shaft
+sigma2=sigma1/f;......//the maximum allowed stress level
+//CALCULATIONS
+d1=(16*F*L/(sigma1*%pi))^(1/3);..........//The Diameter of Shaft in in.
+d2=(16*F*L/(sigma2*%pi))^(1/3);.......//The minimum diameter required to prevent failure
+disp(d1,"The Diameter of Shaft in in.:")
+disp(d2,"The minimum diameter required to prevent failure in in.:")