summaryrefslogtreecommitdiff
path: root/599/CH2/EX2.11.a/example2_11_a.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /599/CH2/EX2.11.a/example2_11_a.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 '599/CH2/EX2.11.a/example2_11_a.sce')
-rwxr-xr-x599/CH2/EX2.11.a/example2_11_a.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/599/CH2/EX2.11.a/example2_11_a.sce b/599/CH2/EX2.11.a/example2_11_a.sce
new file mode 100755
index 000000000..3632fa8f7
--- /dev/null
+++ b/599/CH2/EX2.11.a/example2_11_a.sce
@@ -0,0 +1,17 @@
+
+clear;
+clc;
+printf("\t Example 2_11_a\n");
+ya1=0.2; //initial mole fraction
+ya2=0.1; //final mole fraction
+T=(298); //temperature in kelvin
+pt=1*1.013*10^5; //total pressure in pascal
+z=0.2*10^-2; //gas film thickness in m
+Dab=.215*10^-4; //diffusion coefficient in m^2/s
+R=8314; //universal gas constant
+//part (i)when N2 is non diffusing
+
+Na=Dab*pt*log((1-ya2)/(1-ya1))/(z*R*T); //diffusion flux in kmol/m^2*s
+printf("\n diffusion flux if N2 is non diffusing :%f *10^-5 kmol/m^2*s ",Na/10^-5);
+
+//end \ No newline at end of file