summaryrefslogtreecommitdiff
path: root/3776/CH9/EX9.8/Ex9_8.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3776/CH9/EX9.8/Ex9_8.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 '3776/CH9/EX9.8/Ex9_8.sce')
-rw-r--r--3776/CH9/EX9.8/Ex9_8.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/3776/CH9/EX9.8/Ex9_8.sce b/3776/CH9/EX9.8/Ex9_8.sce
new file mode 100644
index 000000000..b986095ec
--- /dev/null
+++ b/3776/CH9/EX9.8/Ex9_8.sce
@@ -0,0 +1,12 @@
+clear
+//given
+hp = 63000 //horse power
+T = hp*20*(10**-3)/63 //k-in the torsion implies due to horse power
+stress_allow_shear = 6 //ksi- The maximum allowable shear stress
+M_ver = 6.72/2 //k-in the vertical component of the moment
+M_hor = 9.10 //k-in the horizantal component of the moment
+//Caliculations
+
+M = (((M_ver**2)+(M_hor**2))**0.5) //K-in The resultant
+d = ((16*(((M**2)+(T**2))**0.5)/(stress_allow_shear*3.14))**0.333) //in** The suggested diameter from derivation
+printf("\n The suggested diameter is %0.2f in",d)