diff options
Diffstat (limited to '2789/CH6/EX6.8/Ex6_8.sce')
-rwxr-xr-x | 2789/CH6/EX6.8/Ex6_8.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/2789/CH6/EX6.8/Ex6_8.sce b/2789/CH6/EX6.8/Ex6_8.sce new file mode 100755 index 000000000..bf9b2c90e --- /dev/null +++ b/2789/CH6/EX6.8/Ex6_8.sce @@ -0,0 +1,21 @@ +clear;
+clc;
+
+//page no. 194
+
+gam = 0.0765;// lb/cuft
+V1 = 293;//fps
+hp = 1500;
+h = 10;//ft
+V4 = 338;//fps
+
+V = 0.5*(V1+V4);
+Q = hp*550/((V4-V1)*V*gam/32.2);
+d1 = sqrt(Q/(V1*0.25*%pi));
+d4 = sqrt(Q/(V4*0.25*%pi));
+F = Q*(gam/32.2)*(V4-V1);
+eta = V1/V;
+
+printf('V4 = %d fps,\n V = %.1f fps,\n d1 = %.1f ft,\n d4 = %.2f ft,\n F = %d lb,\n efficiency = %.1f percentage',V4,V,d1,d4,F,eta*100);
+
+//there are small errors in the answer given in textbook
|