diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1052/CH15/EX15.6/156.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '1052/CH15/EX15.6/156.sce')
| -rwxr-xr-x | 1052/CH15/EX15.6/156.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/1052/CH15/EX15.6/156.sce b/1052/CH15/EX15.6/156.sce new file mode 100755 index 000000000..4e242676d --- /dev/null +++ b/1052/CH15/EX15.6/156.sce @@ -0,0 +1,23 @@ +clc;
+//Example 15.6
+//page no 173
+printf("Example 15.6 page no 173\n\n");
+//methane is flowing through a horizontal steel pipe
+m_dot=10//mass flow rate, lb/s
+D=1//diameter of pipe,ft
+G=m_dot/((%pi/4)*D^2)//mass velocity flux
+P=89.7//inlet pressure
+T=530//temprature,k
+MW=16//mol. weight
+R=10.73//gas constant
+//applying eq 15.7
+rho=P*MW/(R*T)//density
+f=0.008//friction factor
+L=15840//length of pipe,ft
+g_c=32.2//gravitational constant
+P_drop=(2*f*L*(G^2))/(g_c*rho*D)//pressure drop
+P1=89.7//inlet pressure,psia
+P2=P1-(P_drop/144)
+P2=54.7//corrected value
+P_drop=P1-P2//updated value of P_drop
+printf("\n pressure drop P_drop=%f psia",P_drop);
|