1 files changed, 12 insertions, 0 deletions
diff --git a/51/CH12/EX12.5/12_5.sce b/51/CH12/EX12.5/12_5.sce
new file mode 100755
index 000000000..4ac8425a2
--- /dev/null
+++ b/51/CH12/EX12.5/12_5.sce
@@ -0,0 +1,12 @@
+clc;
+clear;
+exec("C:\Program Files\scilab-5.3.0\bin\TCP\12_5data.sci");
+CQ=0.0625;
+Q1=CQ*(N1/60)*(2*%pi)*(D1/12)^3;//(ft^3)/sec
+disp("gpm",Q1*7.48*60,"or","(ft^3)/sec",Q1,"The discharge=")
+CH=0.19;
+ha=CH*((N1*2*%pi/60)^2)*((D1/12)^2)/32.2;//ft
+disp("ft",ha,"The actual  headrise=")
+CP=0.014;
+Wshaft=(CP*(1.94)*((N1*2*%pi/60)^3)*((D1/12)^5))/550;//hp
+disp("hp",Wshaft,"The shaft horsepower=")