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 /1394/CH18/EX18.5.2 | |
| 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 '1394/CH18/EX18.5.2')
| -rwxr-xr-x | 1394/CH18/EX18.5.2/Ex18_5_2.sce | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/1394/CH18/EX18.5.2/Ex18_5_2.sce b/1394/CH18/EX18.5.2/Ex18_5_2.sce new file mode 100755 index 000000000..eb94e6a1d --- /dev/null +++ b/1394/CH18/EX18.5.2/Ex18_5_2.sce @@ -0,0 +1,25 @@ + +clc
+// Initialization of variables
+D = 2*10^-5 // cm^2/sec
+l = 32*10^-4 // cm
+c = 6.8*10^-6 // mol/cc
+C10 = 10^-4 // mol/cc
+function[j] = Totalflux(H,K)
+ j = (D*H*C10/l)+((D*H*K*c*C10)/(l*(1+(H*K*C10))))
+endfunction
+//For Lithium Chloride
+H1 = 4.5*10^-4 //Partition coefficient
+K1 = 2.6*10^5 // cc/mol association constant
+j1 = (Totalflux(H1,K1))*10^10 // TOtal flux in x*10^-10 mol/cm^2-sec
+printf("The total flux for Lithium Chloride is %.1f x10^-10 mol/cm^2-sec",j1)
+ //For Sodium Chloride
+H2 = 3.4*10^-4 //Partition coefficient
+K2 = 1.3*10^7 // cc/mol association constant
+j2 = (Totalflux(H2,K2))*10^10 // TOtal flux in x*10^-10 mol/cm^2-sec
+printf("\nThe total flux for Sodium Chloride is %.1f x10^-10 mol/cm^2-sec",j2)
+ //For potassium Chloride
+H3 = 3.8*10^-4 //Partition coefficient
+K3 = 4.7*10^9 // cc/mol association constant
+j3 = (Totalflux(H3,K3))*10^10 // TOtal flux in x*10^-10 mol/cm^2-sec
+printf("\nThe total flux for Potassium Chloride is %.1f x10^-10 mol/cm^2-sec",j3)
|