1 files changed, 17 insertions, 0 deletions
diff --git a/539/CH5/EX5.3/Example_5_3.sce b/539/CH5/EX5.3/Example_5_3.sce
new file mode 100755
index 000000000..51fc97cb6
--- /dev/null
+++ b/539/CH5/EX5.3/Example_5_3.sce
@@ -0,0 +1,17 @@
+//Nonsteady-State Diffusion Time Computation II
+
+clear;
+clc;
+
+printf("\tExample 5.3\n");
+
+D500=4.8*10^-14;     //Diffusion coefficient at 500 C
+
+D600=5.3*10^-13;     //Diffusion coefficient at 600 C
+t600=10;             //Time in hours to diffuse
+
+t500=D600*t600/D500;
+
+printf("\nTime to diffuse at 500 C is %.1f h\n",t500);
+
+//End
+\ No newline at end of file