1 files changed, 11 insertions, 0 deletions
diff --git a/24/CH37/EX37.2/Example37_2.sce b/24/CH37/EX37.2/Example37_2.sce
new file mode 100755
index 000000000..952aa3218
--- /dev/null
+++ b/24/CH37/EX37.2/Example37_2.sce
@@ -0,0 +1,11 @@
+//Sample Problem 37-2
+printf("**Sample Problem 37-2**\n")
+I = [];
+for m = 1:3
+   theta = (m+.5)*%pi
+      I = [I, (sin(theta)/theta)^2]
+end
+printf("The intensities of secondary maximas relative to intensity of CBF is-\n")
+printf("\tI1/Im = %.4f\n", I(1))
+printf("\tI2/Im = %.4f\n", I(2))
+printf("\tI3/Im = %.4f", I(3))
+\ No newline at end of file