summaryrefslogtreecommitdiff
path: root/2921/CH6/EX6.1/Ex6_1.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2921/CH6/EX6.1/Ex6_1.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2921/CH6/EX6.1/Ex6_1.sce')
-rwxr-xr-x2921/CH6/EX6.1/Ex6_1.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/2921/CH6/EX6.1/Ex6_1.sce b/2921/CH6/EX6.1/Ex6_1.sce
new file mode 100755
index 000000000..8bc582eae
--- /dev/null
+++ b/2921/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,14 @@
+clc;
+clear;
+mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-6.1 Page No.120\n');
+
+As=0.334; //[in^2] Tensile stress area (Table 6.1)
+Sp=85000; //[lb/in^2] Proof strength (Table 6.3)
+D=3/4; //[in] Nominal diameter of thread
+
+Fi=0.85*As*Sp; //[lb] Desired intial preload
+C=0.2; //[] Torque coefficient
+
+T=C*D*Fi; //[in*lb] Torque
+
+mprintf('\n The required torque is %f lb*in.',T);