summaryrefslogtreecommitdiff
path: root/764/CH6/EX6.7.b
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /764/CH6/EX6.7.b
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 '764/CH6/EX6.7.b')
-rwxr-xr-x764/CH6/EX6.7.b/result6_7.txt56
-rwxr-xr-x764/CH6/EX6.7.b/solution6_7.sce32
2 files changed, 88 insertions, 0 deletions
diff --git a/764/CH6/EX6.7.b/result6_7.txt b/764/CH6/EX6.7.b/result6_7.txt
new file mode 100755
index 000000000..b92ae125b
--- /dev/null
+++ b/764/CH6/EX6.7.b/result6_7.txt
@@ -0,0 +1,56 @@
+-->//(Power Screws) Example 6.7
+
+-->//Speed of the tool holder v (m/min)
+
+-->v = 5
+ v =
+
+ 5.
+
+-->//Number of starts of the screw n
+
+-->n = 1
+ n =
+
+ 1.
+
+-->//Nominal diameter of the screw d (mm)
+
+-->d = 48
+ d =
+
+ 48.
+
+-->//Pitch of the screw p (mm)
+
+-->p = 8
+ p =
+
+ 8.
+
+-->//Force exerted by operating nut W (N)
+
+-->W = 500
+ W =
+
+ 500.
+
+-->//Mean radius of the friction collar rm (mm)
+
+-->rm = 40
+ rm =
+
+ 40.
+
+-->//Coefficient of friction at thread and collar surfaces mu
+
+-->mu = 0.15
+ mu =
+
+ 0.15
+
+
+The power required to drive the screw(kW) = 0.347319 kW
+
+Efficiency of the mechanism(eta) = 11.996655 percent
+ \ No newline at end of file
diff --git a/764/CH6/EX6.7.b/solution6_7.sce b/764/CH6/EX6.7.b/solution6_7.sce
new file mode 100755
index 000000000..ecc077336
--- /dev/null
+++ b/764/CH6/EX6.7.b/solution6_7.sce
@@ -0,0 +1,32 @@
+
+//Obtain path of solution file
+path = get_absolute_file_path('solution6_7.sce')
+//Obtain path of data file
+datapath = path + filesep() + 'data6_7.sci'
+//Clear all
+clc
+//Execute the data file
+exec(datapath)
+//Calculate lead of the screw l (mm)
+l = n * p
+//Calculate the mean diameter of the screw dm (mm)
+dm = d - (0.5 * p)
+//Calculate the lead angle alpha (degree)
+alpha = atand(l/(%pi * dm))
+//Calculate the angle of repose fi (degree)
+fi = atand(mu)
+//Calculate the torque required Mt (N-mm)
+Mt = (W * dm * tand(fi + alpha))/2
+//Calculate the torque applied to overcome the friction at collar surface Mtc (N-mm)
+Mtc = (mu * W * rm)
+//Calculate the total external torque required MTotal (N-mm)
+MTotal = Mt + Mtc
+//Calculate the rpm of the screw N
+N = (v * 1000)/p
+//Calculate the power required to drive the screw kW
+kW = (2 * %pi * N * MTotal)/(60 * (10^6))
+//Calculate the efficiency of the mechanism eta (%)
+eta = ((W * l)/(2 * %pi * MTotal))*100
+//Print results
+printf('\nThe power required to drive the screw(kW) = %f kW\n',kW)
+printf('\nEfficiency of the mechanism(eta) = %f percent\n',eta)