1 files changed, 13 insertions, 0 deletions
diff --git a/1367/CH21/EX21.1/21_1.sce b/1367/CH21/EX21.1/21_1.sce
new file mode 100755
index 000000000..1959a6d14
--- /dev/null
+++ b/1367/CH21/EX21.1/21_1.sce
@@ -0,0 +1,13 @@
+//Find Concentration Gradient and diffusivity
+//Ex:21.1
+clc;
+clear;
+close;
+c_cu=2*10^13;//concentration of copper in /m^3
+c_al=4*10^6;//concn of copper on other side of Al in /m^3
+t=3*10^-3;//thickness in m
+z=(c_cu-c_al)/t;//z=dm/dx,concentration graient
+disp(z,"Concentration Gradient (in /m^4) = ");
+jx=10^21;//outward flux of copperv atoms in /sq m/sec
+d=-jx/z;//diffusivity in sq m/sec
+disp(d,"Diffusivity (in sq m/sec) = ");
+\ No newline at end of file