1 files changed, 22 insertions, 0 deletions
diff --git a/2021/CH18/EX18.9/EX18_9.sce b/2021/CH18/EX18.9/EX18_9.sce
new file mode 100755
index 000000000..36966cdd1
--- /dev/null
+++ b/2021/CH18/EX18.9/EX18_9.sce
@@ -0,0 +1,22 @@
+//Finding of Work Done ,Vane Angles
+//Given
+D=0.5;
+D1=1;
+Vw1=0;
+Vf=3;
+Vf1=3;
+g=9.81;
+rho=1000;
+N=250;
+//To Find
+u=(%pi*D*N)/60;
+u1=(%pi*D1*N)/60;
+Vw=Vf/tan(%pi/12);
+a=atand(Vf/(Vw-u));
+b=atand(Vf1/u1);
+W=(Vw*u)/g;
+E=(W/10);
+disp("Inlet Vane Angle ="+string(a)+" degrees");
+disp("Outlet Vane Angle ="+string(b)+" degrees");
+disp("Work Done ="+string(W)+" N-m/N");
+disp("Efficiency ="+string(E)+" Percentage");