From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 629/CH6/EX6.14/ex6_14.txt      |  2 ++
 629/CH6/EX6.14/example6_14.sce | 17 +++++++++++++++++
 2 files changed, 19 insertions(+)
 create mode 100644 629/CH6/EX6.14/ex6_14.txt
 create mode 100644 629/CH6/EX6.14/example6_14.sce

(limited to '629/CH6/EX6.14')

diff --git a/629/CH6/EX6.14/ex6_14.txt b/629/CH6/EX6.14/ex6_14.txt
new file mode 100644
index 000000000..8977ab4ce
--- /dev/null
+++ b/629/CH6/EX6.14/ex6_14.txt
@@ -0,0 +1,2 @@
+ 
+ The power produced by the turbine = 343 kW.
\ No newline at end of file
diff --git a/629/CH6/EX6.14/example6_14.sce b/629/CH6/EX6.14/example6_14.sce
new file mode 100644
index 000000000..8d7746258
--- /dev/null
+++ b/629/CH6/EX6.14/example6_14.sce
@@ -0,0 +1,17 @@
+clear
+clc
+//Example 6.14 POWER DELIVERED BY A FRANCIS TURBINE
+D=1; //[m]
+l=0.04; //[m]
+Q=0.5; //discharge[m^3/s]
+rho=1000; //[kg/m^3]
+m=rho*Q //mass flow rate[kg/s]
+//Radial velocity
+Vr=Q/(%pi*D*l) //[m/s]
+theta=70; //degrees
+//Tangential velocity
+Vt=Vr*tand(theta) //[m/s]
+T=m*(D/2)*Vt //Torque[N.m]
+w=1200*2*%pi/60 //angular speed (rad/s)
+P=T*w/10^3 //Power[kW]
+printf("\n The power produced by the turbine = %.f kW.\n",P)
\ No newline at end of file
-- 
cgit