diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3821/CH7/EX7.17/Example7_17.sce | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3821/CH7/EX7.17/Example7_17.sce')
| -rw-r--r-- | 3821/CH7/EX7.17/Example7_17.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/3821/CH7/EX7.17/Example7_17.sce b/3821/CH7/EX7.17/Example7_17.sce new file mode 100644 index 000000000..4720ff717 --- /dev/null +++ b/3821/CH7/EX7.17/Example7_17.sce @@ -0,0 +1,27 @@ +///Chapter No 7 Fluid Mechanics
+///Example 7.17 Page No:128
+/// Find bernoulli's equation for discharge
+//input data
+//refer figure 12
+clc;
+clear;
+Q1=0.04; //Water flows at rate in m**2/s
+DA=0.22; //Pipe diameter at section A in m
+DB=0.12; //Pipe diameter at section B in m
+PA=400*10^3; //Intensity of pressure at setion A in kPa
+PB=150*10^3; //Intensity of pressure at setion B in kPa
+pi1=3.14; //Pi constant
+g1=9.81; //Gravity constant
+rho=1000;
+
+///Calculation
+VA=Q1/(pi1/4*(DA)^2); //contuity equation for discharge
+VB=Q1/(pi1/4*(DB)^2); //bernoulli's equation for discharge
+///Z=ZB-ZA
+Z=(PA/(rho*g1))+(VA^2/(2*g1))-(PB/(rho*g1))-(VB^2/(2*g1));
+
+
+///Output
+printf('Contuity equation for discharge= %f m63 \n ',VA);
+printf('Contuity equation for discharge= %f m^3 \n ',VB);
+printf('Bernoullis equation for discharge=%f m \n',Z);
|