summaryrefslogtreecommitdiff
path: root/3774/CH8/EX8.12/Ex8_12.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3774/CH8/EX8.12/Ex8_12.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3774/CH8/EX8.12/Ex8_12.sce')
-rw-r--r--3774/CH8/EX8.12/Ex8_12.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/3774/CH8/EX8.12/Ex8_12.sce b/3774/CH8/EX8.12/Ex8_12.sce
new file mode 100644
index 000000000..b2532a0da
--- /dev/null
+++ b/3774/CH8/EX8.12/Ex8_12.sce
@@ -0,0 +1,26 @@
+// exa 8.12 Pg 236
+clc;clear;close;
+
+// Given Data
+d=6;//mm
+Do=75;// mm
+tau=350;// N/mm.sq.
+G=84;// kN/mm.sq.
+
+printf('\n (i) neglecting the effect of curvature')
+dm=Do-d;// mm
+C=dm/d;// spring index
+Ks=1+0.5/C;// shear stress factor
+//tau=Ks*(8*Fmax*C)/(%pi*d**2)
+Fmax=tau/(Ks*(8*C)/(%pi*d**2));// N
+printf('\n Axial load = %.1f N',Fmax)
+delBYi=8*Fmax*C**3/(G*10**3*d);// mm/turn
+printf('\n deflection per active turn = %.3f mm/turn',delBYi)
+printf('\n\n (ii) considering the effect of curvature')
+Kw=(4*C-1)/(4*C-4)+0.615/C;// Wahl's correction factor
+//tau=Kw*(8*Fmax*C)/(G*d)
+Fmax=tau/(Kw*8*C/(%pi*d**2));
+printf('\n Axial load = %.1f N',Fmax)
+delBYn=8*Fmax*C**3/(G*10**3*d);// mm/turn
+printf('\n deflection per active turn = %.3f mm/turn',delBYn)
+// Note - answer in the textbook is wrong for last part.