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 /905/CH7/EX7.9/7_9.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 '905/CH7/EX7.9/7_9.sce')
| -rwxr-xr-x | 905/CH7/EX7.9/7_9.sce | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/905/CH7/EX7.9/7_9.sce b/905/CH7/EX7.9/7_9.sce new file mode 100755 index 000000000..21d7601f8 --- /dev/null +++ b/905/CH7/EX7.9/7_9.sce @@ -0,0 +1,26 @@ +clear;
+clc;
+
+// Illustration 7.9
+// Page: 460
+
+printf('Illustration 7.9 - Page: 460\n\n');
+
+// solution
+//*****Data*****//
+// From example 7.8
+Di = 0.288; // [m]
+sigma = 0.025; // [N/m]
+ohm = 152*1.2/60; // [rps]
+ds = 868; // [kg/cubic m]
+phiD = 0.385;
+
+// Therefore from equation 7.49
+We = Di^3*ohm^2*ds/sigma; // [Weber number]
+
+// From equation 7.50
+dvs = Di*0.052*(We)^-0.6*exp(4*phiD); // [m]
+disp(dvs);
+// Substituting in equation 7.48
+a = 6*phiD/dvs; // [square m/cubic m]
+printf("The Sauter mean drop diameter and the interfacial area is %e m and %f square m/cubic m respectively.\n\n",dvs,a);
\ No newline at end of file |