diff options
Diffstat (limited to '1325/CH12/EX12.9/12_9.sce')
| -rw-r--r-- | 1325/CH12/EX12.9/12_9.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/1325/CH12/EX12.9/12_9.sce b/1325/CH12/EX12.9/12_9.sce new file mode 100644 index 000000000..300e9e1cc --- /dev/null +++ b/1325/CH12/EX12.9/12_9.sce @@ -0,0 +1,16 @@ +//To find the fluctuation of speed
+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)
|