1 files changed, 15 insertions, 0 deletions
diff --git a/629/CH15/EX15.1/example15_1.sce b/629/CH15/EX15.1/example15_1.sce
new file mode 100644
index 000000000..6e82e1160
--- /dev/null
+++ b/629/CH15/EX15.1/example15_1.sce
@@ -0,0 +1,15 @@
+clear
+clc
+//Example 15.1 CONDITIONS FOR LAMINAR OPEN-CHANNEL FLOW
+V=0.1; //velocity [ft/s]
+B=10; //width[ft]
+y=6; //depth[ft]
+Rh=B*y/(B+2*y) //[ft]
+v=1.22*10^-5; //[ft^2]
+Re=V*Rh/v //Reynolds number
+//Re>500, flow is turbulent
+//Depth, ymax for Re=500
+Re1=500;
+Rh1=Re1*v/V //[ft]
+ymax=B*Rh1/(B-2*Rh1) //[ft]
+printf("\nThe maximum depth assured of having laminar flow = %.3f ft.\n",ymax)
+\ No newline at end of file