1 files changed, 16 insertions, 0 deletions
diff --git a/51/DEPENDENCIES/8_9.sce b/51/DEPENDENCIES/8_9.sce
new file mode 100755
index 000000000..0f2a89a85
--- /dev/null
+++ b/51/DEPENDENCIES/8_9.sce
@@ -0,0 +1,16 @@
+clc;
+clear;
+exec("C:\Program Files\scilab-5.3.0\bin\TCP\8_9data.sci");
+//energy equation=> hp=hL=f*(l/D)*((V^2)/(2*g))
+f=0.0125;
+hp=f*(l*5280/D)*((V^2)/(2*32.2));//ft
+Pa=sw*Q*hp/550;//hp
+disp("hp",Pa,"The horsepower required to drive the system=")
+dia=2:0.01:6;
+count=1;
+for i=2:0.01:6
+    power(count)=sw*Q*(f*(l*5280/i)*(((Q/(%pi*(i^2)/4))^2)/(2*32.2)))/550;
+    count=count+1;
+end
+plot2d(dia,power,rect=[0,0,6,4000000])
+xtitle("Pa vs D","D, ft","Pa, hp")
+\ No newline at end of file