From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 2087/CH14/EX14.20/example14_20.sce | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100755 2087/CH14/EX14.20/example14_20.sce

(limited to '2087/CH14/EX14.20')

diff --git a/2087/CH14/EX14.20/example14_20.sce b/2087/CH14/EX14.20/example14_20.sce
new file mode 100755
index 000000000..35e840ad2
--- /dev/null
+++ b/2087/CH14/EX14.20/example14_20.sce
@@ -0,0 +1,22 @@
+
+
+//example14.20
+//design a regime channel
+clc;funcprot(0);
+//given
+Q=100;          //discharge
+f=1.1;          //silt factor
+s=1/2;          //side slope
+
+V=(Q*f^2/140)^(1/6);
+A=Q/V;
+P=4.75*Q^0.5;
+D=(P-(P^2-6.944*A)^0.5)/3.472;
+B=P-2.236*D;
+R=5*V^2/(2*f);
+S=f^(5/3)/(3340*Q^(1/6));
+B=round(B*10)/10;
+D=round(D*100)/100;
+mprintf("Width of channel section=%f m.",B);
+mprintf("\nDepth of channel section=%f m.",D);
+mprintf("\nBed slope=%f.",S);
-- 
cgit