1 files changed, 13 insertions, 0 deletions
diff --git a/2411/CH3/EX3.b.106/Ex3b_6.sce b/2411/CH3/EX3.b.106/Ex3b_6.sce
new file mode 100755
index 000000000..d346d3bd9
--- /dev/null
+++ b/2411/CH3/EX3.b.106/Ex3b_6.sce
@@ -0,0 +1,13 @@
+// Scilab Code Ex3b.6: Page-165 (2008)
+clc; clear;
+theta = [30 45 60 90];    // Angles between principal sections of polariser and analyser, degree
+for i = 1:1:4
+    P_red = (1-cosd(theta(i))^2)*100;    // Percentage reduction in intensity of incident light
+    printf("\nFor theta = %d degree, percentage reduction = %1.0f percent", theta(i), P_red);
+end
+
+// Result
+// For theta = 30 degree, percentage reduction = 25 percent
+// For theta = 45 degree, percentage reduction = 50 percent
+// For theta = 60 degree, percentage reduction = 75 percent
+// For theta = 90 degree, percentage reduction = 100 percent