summaryrefslogtreecommitdiff
path: root/629/CH13/EX13.4/example13_4.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /629/CH13/EX13.4/example13_4.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '629/CH13/EX13.4/example13_4.sce')
-rw-r--r--629/CH13/EX13.4/example13_4.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/629/CH13/EX13.4/example13_4.sce b/629/CH13/EX13.4/example13_4.sce
new file mode 100644
index 000000000..61ee6759b
--- /dev/null
+++ b/629/CH13/EX13.4/example13_4.sce
@@ -0,0 +1,16 @@
+clear
+clc
+//Example 13.4 MANOMETER DEFLECTION FOR AN ORIFICE METER
+d=8/12; //[ft]
+Ao=%pi*d^2/4 //area [ft^2]
+v=1.22*10^-5; //[ft^2/s]
+Q=2; //flow rate [ft^3/s]
+g=32.2; //[ft/s^2]
+Re=4*Q/(%pi*d*v) //Reynolds number
+//interpolate for d/D=8/12 from fig. 13.14
+K=0.68
+del_h=Q^2/(2*g*K^2*Ao^2) //change in piezometric head [ft]
+//del_h=del_l(g_w-g_air)/g_w
+//g_w>>g_a
+del_l=del_h //manometer deflection [ft]
+printf("\nThe deflection on the manometer = %.1f ft.\n",del_l) \ No newline at end of file