summaryrefslogtreecommitdiff
path: root/914/CH13/EX13.10/ex13_10.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /914/CH13/EX13.10/ex13_10.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 '914/CH13/EX13.10/ex13_10.sce')
-rwxr-xr-x914/CH13/EX13.10/ex13_10.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/914/CH13/EX13.10/ex13_10.sce b/914/CH13/EX13.10/ex13_10.sce
new file mode 100755
index 000000000..6c71a88ff
--- /dev/null
+++ b/914/CH13/EX13.10/ex13_10.sce
@@ -0,0 +1,17 @@
+clc;
+warning("off");
+printf("\n\n example13.10 - pg701");
+// given
+d=0.01; //[m] - diameter of cyclindrical porous plug
+D=2*10^-9; //[m^2/sec] - diffusion coefficient
+t=60*60; //[sec]
+r=d/2;
+m=0;
+Ca_inf=0;
+Ca_0=10;
+X=(D*t)/((r)^2);
+// from fig 13.14 the ordinate is
+Y=0.7;
+Ca_c=Ca_inf-Y*(Ca_inf-Ca_0);
+printf("\n\n the concentration of KCL at the centre after 60 min is \n Ca = %f kg/m^3",Ca_c);
+