diff options
Diffstat (limited to '3875/CH11/EX11.6/11_6.sce')
| -rw-r--r-- | 3875/CH11/EX11.6/11_6.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3875/CH11/EX11.6/11_6.sce b/3875/CH11/EX11.6/11_6.sce new file mode 100644 index 000000000..74aed69a9 --- /dev/null +++ b/3875/CH11/EX11.6/11_6.sce @@ -0,0 +1,17 @@ +clc;
+clear;
+unit_cell_edge_x=(2) //intercept of x
+unit_cell_edge_y=(-3) //intercept of y
+unit_cell_edge_z=(6) //intercept of z
+
+//calculations
+Reciprocal_x=1/unit_cell_edge_x //reciprocal value of miller index x
+Reciprocal_y=1/unit_cell_edge_y //reciprocal value of miller index y
+Reciprocal_z=1/unit_cell_edge_z //reciprocal value of miller index z
+Reciprocal_xyz=int32([unit_cell_edge_x,unit_cell_edge_y,unit_cell_edge_z]) //creating integer vector for LCM calculation
+LCM=double(lcm(Reciprocal_xyz)) //LCM of unit cell edges
+coordinate_A=(Reciprocal_x)*LCM
+coordinate_B=Reciprocal_y*LCM
+coordinate_C=Reciprocal_z*LCM
+
+mprintf("The required miller indices of the plane are (%d,%d,%d).",coordinate_A,coordinate_B,coordinate_C)
|