summaryrefslogtreecommitdiff
path: root/2288/CH1/EX1.21.5/ex1_21_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '2288/CH1/EX1.21.5/ex1_21_5.sce')
-rwxr-xr-x2288/CH1/EX1.21.5/ex1_21_5.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/2288/CH1/EX1.21.5/ex1_21_5.sce b/2288/CH1/EX1.21.5/ex1_21_5.sce
new file mode 100755
index 000000000..b4714afc5
--- /dev/null
+++ b/2288/CH1/EX1.21.5/ex1_21_5.sce
@@ -0,0 +1,15 @@
+// Exa 1.21.5
+clc;
+clear;
+close;
+// Given data
+a = 2.814;// in Å
+h = 1;
+k = 0;
+l = 0;
+d = a/(sqrt( ((h)^2) + ((k)^2) + ((l)^2) ));// in Å
+n = 2;
+lembda = 0.710;// in Å
+//Formula 2*d*sin(theta) = n*lembda;
+theta = asind(n*lembda/(2*d) );// in degree
+disp(theta,"The glacing angle in degree is");