summaryrefslogtreecommitdiff
path: root/3594/CH12/EX12.9/Ex12_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '3594/CH12/EX12.9/Ex12_9.sce')
-rw-r--r--3594/CH12/EX12.9/Ex12_9.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/3594/CH12/EX12.9/Ex12_9.sce b/3594/CH12/EX12.9/Ex12_9.sce
new file mode 100644
index 000000000..f0f501f0c
--- /dev/null
+++ b/3594/CH12/EX12.9/Ex12_9.sce
@@ -0,0 +1,16 @@
+
+clc
+//given
+N=270//rpm
+ihp=35.8
+k=2.25//ft
+g=32.2//ft/s^2
+ke=1.93//from table on p 440
+E=ihp*33000/N
+Ef=ke*E
+w=%pi*N/30
+W=1000//lb
+MOI=2*W*k^2//moment of inertia of both wheel
+ks=Ef*g/(MOI*w^2)//formula for ks
+p=ks/2
+printf("The fluctuation speed is therefore %.4f or %.3f on either side of the mean speed",ks,p)