summaryrefslogtreecommitdiff
path: root/3669/CH3/EX3.10/10.sce
diff options
context:
space:
mode:
Diffstat (limited to '3669/CH3/EX3.10/10.sce')
-rw-r--r--3669/CH3/EX3.10/10.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/3669/CH3/EX3.10/10.sce b/3669/CH3/EX3.10/10.sce
new file mode 100644
index 000000000..e8f138d43
--- /dev/null
+++ b/3669/CH3/EX3.10/10.sce
@@ -0,0 +1,16 @@
+
+//Variable declaration
+lamda=1.54; //wavelength(angstrom)
+h=1;
+k=1;
+l=1;
+n=1;
+theta=19.2; //angle(degrees)
+
+//Calculation
+theta=theta*%pi/180; //angle(radian)
+d=n*lamda/(2*sin(theta));
+a=d*sqrt(h**2+k**2+l**2); //cube edge of unit cell(angstrom)
+
+//Result
+printf('cube edge of unit cell is %0.3f angstrom \n',(a)) \ No newline at end of file