summaryrefslogtreecommitdiff
path: root/2411/CH3/EX3.d.313/Ex3d_13.sce
diff options
context:
space:
mode:
Diffstat (limited to '2411/CH3/EX3.d.313/Ex3d_13.sce')
-rwxr-xr-x2411/CH3/EX3.d.313/Ex3d_13.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/2411/CH3/EX3.d.313/Ex3d_13.sce b/2411/CH3/EX3.d.313/Ex3d_13.sce
new file mode 100755
index 000000000..67d333bb5
--- /dev/null
+++ b/2411/CH3/EX3.d.313/Ex3d_13.sce
@@ -0,0 +1,12 @@
+// Scilab Code Ex3d.13: Page-210 (2008)
+clc; clear;
+lambda = 5000e-008; // Wavelength of light, cm
+theta = 90; // Angle of diffraction for the maximum resolving power, degree
+N = 40000; // Number of lines on grating
+a_plus_b = 12.5e-005; // Grating element, cm
+n = 2; // Order of diffraction
+n_max = N*a_plus_b*sind(theta)/lambda; // Maximum resolving power
+printf("\nThe maximum resolving power = %d", n_max);
+
+// Result
+// The maximum resolving power = 100000 \ No newline at end of file