summaryrefslogtreecommitdiff
path: root/1379/CH13/EX13.1.3/example13_3.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1379/CH13/EX13.1.3/example13_3.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1379/CH13/EX13.1.3/example13_3.sce')
-rwxr-xr-x1379/CH13/EX13.1.3/example13_3.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/1379/CH13/EX13.1.3/example13_3.sce b/1379/CH13/EX13.1.3/example13_3.sce
new file mode 100755
index 000000000..e35d5903f
--- /dev/null
+++ b/1379/CH13/EX13.1.3/example13_3.sce
@@ -0,0 +1,16 @@
+
+
+//exapple 13.3
+clc; funcprot(0);
+// Initialization of Variable
+rhos=1425;//density of organic pigment
+rho=998;//density of water
+pi=3.1428;
+omega=360*2*pi/60;
+mu=1.25/1000;
+t=360;
+r=0.165+0.01;
+ro=0.165;
+//calculation
+d=sqrt(18*mu*log(r/ro)/t/(rhos-rho)/omega^2);
+printf('the minimum diameter in organic pigment in m: %3.1e\n', d);