diff options
Diffstat (limited to '1325/CH12/EX12.11/12_11.sce')
| -rw-r--r-- | 1325/CH12/EX12.11/12_11.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1325/CH12/EX12.11/12_11.sce b/1325/CH12/EX12.11/12_11.sce new file mode 100644 index 000000000..f427e81a6 --- /dev/null +++ b/1325/CH12/EX12.11/12_11.sce @@ -0,0 +1,15 @@ +//To estimate the percentage variation from the mean speed
+clc
+//given
+N=100//rpm
+ke=1.93//As per given figure
+l=15//1 inch of fig = 15 ton ft
+x=40//degrees; 1 inch = 40 degree
+I=150//ton ft^2
+w=%pi*N/30//angular speed
+E=l*x*%pi/180//energy
+Ef=E*ke//fluctuation energy
+Ks=Ef*g/(w^2*I)//from equation 12.14
+p=Ks*100/2//dummy variables
+q=p*2//dummy variables
+printf("The total fluctuation of speed is %.2f percent and the variation in speed is %.2f percent on either side of the mean speed",q,p)
|