1 files changed, 14 insertions, 0 deletions
diff --git a/2411/CH3/EX3.b.104/Ex3b_4.sce b/2411/CH3/EX3.b.104/Ex3b_4.sce
new file mode 100755
index 000000000..9e9f2d94b
--- /dev/null
+++ b/2411/CH3/EX3.b.104/Ex3b_4.sce
@@ -0,0 +1,14 @@
+// Scilab Code Ex3b.4: Page-164 (2008)
+clc; clear;
+i = 60;    // Angle of incidence, degree
+i_p = i;    // Angle of polarization, degree
+mu = tand(i_p);    // Refractive index of the medium
+r = 90 - i;    // Angle of refraction, degree
+printf("\nThe refractive index of transparent medium = %5.3f", mu);
+printf("\nThe angle of refraction, r = %d degree", r);
+printf("\nThe reflected and transmitted components are at right angles to each other.");
+
+// Result
+// The refractive index of transparent medium = 1.732
+// The angle of refraction, r = 30 degree
+// The reflected and transmitted components are at right angles to each other.
+\ No newline at end of file