1 files changed, 19 insertions, 0 deletions
diff --git a/2309/CH5/EX5.a.17/A_Ex5_17.sce b/2309/CH5/EX5.a.17/A_Ex5_17.sce
new file mode 100755
index 000000000..d9c917736
--- /dev/null
+++ b/2309/CH5/EX5.a.17/A_Ex5_17.sce
@@ -0,0 +1,19 @@
+// Chapter 5 Additional Example 17
+//==============================================================================
+clc;
+clear;
+
+//input data
+
+d       = 1.3*10^-10    // interplanar distance
+n       = 1;            // given first order
+theta   = 23;           // Bragg reflection angle in degrees
+
+// Calculations
+theta1   = theta*%pi/180;   // degree to radian conversion
+// d     = (n*lamda)/(2*sinθ);    by Braggs law               ------------- 1
+lamda    = (2*d*sin(theta1)/n)
+
+// Output
+mprintf('Wavelength of X-ray = %3.4f Å',lamda*10^10);
+//==============================================================================