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 /539/CH5/EX5.2/Example_5_2.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 '539/CH5/EX5.2/Example_5_2.sce')
-rwxr-xr-x | 539/CH5/EX5.2/Example_5_2.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/539/CH5/EX5.2/Example_5_2.sce b/539/CH5/EX5.2/Example_5_2.sce new file mode 100755 index 000000000..62114cc04 --- /dev/null +++ b/539/CH5/EX5.2/Example_5_2.sce @@ -0,0 +1,23 @@ +//Nonsteady-State Diffusion Time Computation I
+
+clear;
+clc;
+
+printf("\tExample 5.2\n");
+
+Co=0.25; //Initial Conc. in wt%
+Cs=1.2; //Surface conc. in wt%
+Cx=0.8; //Conc. at any x in wt%
+
+x=5*10^-4; //Position in m
+D=1.6*10^-11; //Diffusion coeff in m^2/s
+
+C=1-((Cx-Co)/(Cs-Co));
+z=erfinv(C);
+
+//But C=erf(x/2sqrt(Dt))
+t=x^2/(4*D*z^2);
+
+printf("\nTime required is %d s or %.1f h\n",t,t/3600);
+
+//End
\ No newline at end of file |