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

---
 858/CH4/EX4.18/example_18.sce | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100755 858/CH4/EX4.18/example_18.sce

(limited to '858/CH4/EX4.18')

diff --git a/858/CH4/EX4.18/example_18.sce b/858/CH4/EX4.18/example_18.sce
new file mode 100755
index 000000000..5f7d40a9f
--- /dev/null
+++ b/858/CH4/EX4.18/example_18.sce
@@ -0,0 +1,20 @@
+clc
+clear 
+printf("example 4.18 page number 154\n\n")
+
+//to find pressure drop per unit length
+
+b=0.050    //in m
+a=0.025    //in m
+d_eq=b-a  //in m
+density=1000  //in kg/m3
+u=3    //in m/s
+viscosity = 0.001
+
+Re=d_eq*u*density/viscosity;
+
+e=40*10^6   //in m
+f=0.0062;
+P_perunit_length=2*f*density*u^2/d_eq;   //in Pa/m
+
+printf("pressure per unit length = %f Pa/m",P_perunit_length)
-- 
cgit