summaryrefslogtreecommitdiff
path: root/1268/CH10/EX10.2/10_2.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1268/CH10/EX10.2/10_2.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 '1268/CH10/EX10.2/10_2.sce')
-rw-r--r--1268/CH10/EX10.2/10_2.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/1268/CH10/EX10.2/10_2.sce b/1268/CH10/EX10.2/10_2.sce
new file mode 100644
index 000000000..2fbcea3e6
--- /dev/null
+++ b/1268/CH10/EX10.2/10_2.sce
@@ -0,0 +1,18 @@
+clc;
+disp("Example 10.2")
+G=50 // in kg/m^2/s
+L=1000 // length in m
+d=0.075 // diameter in m
+T=298 // in kelvin
+mew=1e-5 //viscosity
+p2=1.1e5 // pressure of air
+m=16 // molecular mass
+Re=d*G/mew
+f=0.0014+(0.125/(Re^0.32))
+p1=(2*f*L*G*G*8314*T/(d*m)+(p2^2))^0.5
+if((p1/p2)>1) then
+ p1=(2*f*L*G*G*8314*T/(d*m)+(p2^2)+(2*G*G*8314*T*log(p1/p2)/m))^0.5
+end
+disp(p1,"Pressure is ")
+disp(" Pascals")
+