diff options
Diffstat (limited to '1457/CH15/EX15.3.a/15_3.sce')
| -rwxr-xr-x | 1457/CH15/EX15.3.a/15_3.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/1457/CH15/EX15.3.a/15_3.sce b/1457/CH15/EX15.3.a/15_3.sce new file mode 100755 index 000000000..275e081f5 --- /dev/null +++ b/1457/CH15/EX15.3.a/15_3.sce @@ -0,0 +1,18 @@ +clc
+//Initialization of variables
+cv=0.98
+g=32.2
+h=1320 //ft
+A=0.196 //ft^2
+eta=0.85
+ne=400
+phi=0.45
+//calculations
+V=cv*sqrt(2*g*h)
+Q=A*V
+bhp=eta*62.4*Q*h/550
+ns=ne*sqrt(bhp) /h^(5/4)
+u=phi*sqrt(2*g*h)
+D=u*60/%pi/ne
+//results
+printf("Pitch diameter = %.2f ft",D)
|