summaryrefslogtreecommitdiff
path: root/1627/CH9/EX9.3/Ex9_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '1627/CH9/EX9.3/Ex9_3.sce')
-rw-r--r--1627/CH9/EX9.3/Ex9_3.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/1627/CH9/EX9.3/Ex9_3.sce b/1627/CH9/EX9.3/Ex9_3.sce
new file mode 100644
index 000000000..ddac97471
--- /dev/null
+++ b/1627/CH9/EX9.3/Ex9_3.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+c=0.005//cm
+v=2*10^-1/2//N.s/m^2
+l=7.5//cm
+mu=2*10^-2//N.s/m^2
+d=5*10^-2//m
+N=1500*(1/60)//rev/s
+L=7.5*10^-2//m
+//CALCULATIONS
+F=(2*(mu)*(%pi)^2*(d)^2*N*L)/(c*10^-2)//N
+HP=(F*(%pi)*d*N)/746//hp
+//RESULTS
+printf('The friction horsepower loss is=% f hp',HP)