summaryrefslogtreecommitdiff
path: root/2087/CH14/EX14.28/example14_28.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2087/CH14/EX14.28/example14_28.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2087/CH14/EX14.28/example14_28.sce')
-rwxr-xr-x2087/CH14/EX14.28/example14_28.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/2087/CH14/EX14.28/example14_28.sce b/2087/CH14/EX14.28/example14_28.sce
new file mode 100755
index 000000000..6d7f467f1
--- /dev/null
+++ b/2087/CH14/EX14.28/example14_28.sce
@@ -0,0 +1,22 @@
+
+
+//example 14.28
+//design a regime channel using Laecy's theory
+clc;funcprot(0);
+//given
+Q=35; //discharge
+f=0.9; //silt factor
+s=1/2; //side slope
+
+V=(Q*f/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));
+D=round(D*100)/100;
+mprintf("Bed slope=%f.",S);
+mprintf("\nWidth of channel section=%i m.",B);
+mprintf("\nDepth of channel section=%f m.",D);