summaryrefslogtreecommitdiff
path: root/3014/CH3/EX3.8/Ex3_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '3014/CH3/EX3.8/Ex3_8.sce')
-rwxr-xr-x3014/CH3/EX3.8/Ex3_8.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/3014/CH3/EX3.8/Ex3_8.sce b/3014/CH3/EX3.8/Ex3_8.sce
new file mode 100755
index 000000000..16e967980
--- /dev/null
+++ b/3014/CH3/EX3.8/Ex3_8.sce
@@ -0,0 +1,13 @@
+ clc
+//given that
+lambda = 1.2 // wavelength in angstrom
+theta_deg = 9 // angle fraction in degree
+theta_min = 30 // Angle fraction in minute
+printf("Example 3.8\n")
+theta = theta_deg+theta_min/60 // Total angel
+for n = 1:4
+ d = lambda/(n*2*sin(theta*%pi/180)) // Inter layer spacing
+ printf(" If order is %d then spacing is %f angstrom.\n",n,d)
+end
+
+