1 files changed, 21 insertions, 0 deletions
diff --git a/629/CH10/EX10.1/example10_1.sce b/629/CH10/EX10.1/example10_1.sce
new file mode 100644
index 000000000..1ad20a100
--- /dev/null
+++ b/629/CH10/EX10.1/example10_1.sce
@@ -0,0 +1,21 @@
+clear
+clc
+//Example 10.1 CLASSIFYING FLOW IN CONDUITS
+D=0.005; //[m]
+//For Air
+Va=12; //velocity[m/s]
+va=1.79*10^-5; //viscosity[m^2/s]
+//Reynolds number
+Re_a=Va*D/va
+printf("\n(a)Since Re= %.f > 3000, the flow is turbulent.\n",Re_a)
+//Entrance length
+Le_a=50*D //[m]
+printf("\nThe entrance length for air = %.2f m.\n",Le_a)
+
+//For Water
+m=0.008; //mass flow rate[kg/s]
+mu=1.14*10^-3; //[N.s/m^2]
+Re_w=4*m/(%pi*D*mu)
+printf("\n(b)Since, Re= %.f < 2000, the flow is laminar.\n",Re_w)
+Le_w=0.05*Re_w*D //[m]
+printf("\nThe entrance length for water = %.3f m.\n",Le_w)
+\ No newline at end of file