summaryrefslogtreecommitdiff
path: root/3828/CH10/EX10.8/Ex10_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '3828/CH10/EX10.8/Ex10_8.sce')
-rw-r--r--3828/CH10/EX10.8/Ex10_8.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3828/CH10/EX10.8/Ex10_8.sce b/3828/CH10/EX10.8/Ex10_8.sce
new file mode 100644
index 000000000..c7623f162
--- /dev/null
+++ b/3828/CH10/EX10.8/Ex10_8.sce
@@ -0,0 +1,17 @@
+//Chapter 10 : Crystallography and Crystal Imperfections
+
+clear;
+
+//Variable declaration
+h=1
+k=1
+l=2
+a=2.5
+b=a
+c=2.6
+
+//Calculations
+d=((h**2/a**2)+(k**2/b**2)+(l**2/c**2))**(-0.5)
+
+//Result
+mprintf("Inter-planar spacing d= %.3f Armstrong",d)