diff options
Diffstat (limited to '1619/CH1/EX1.7.2/Example1_7_2.sce')
| -rwxr-xr-x | 1619/CH1/EX1.7.2/Example1_7_2.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1619/CH1/EX1.7.2/Example1_7_2.sce b/1619/CH1/EX1.7.2/Example1_7_2.sce new file mode 100755 index 000000000..f310c5dc6 --- /dev/null +++ b/1619/CH1/EX1.7.2/Example1_7_2.sce @@ -0,0 +1,14 @@ +// Example 1.7.2 page 1.14
+// To calculate the critical angel
+
+clc;
+clear;
+
+n1= 1.50; // RI of glass..
+n2 = 1; // RI of air...
+// According to Snell's law...
+// n1*sin(phi1)= n2*sin(phi2);
+
+// From definition of critical angel phi2 = 90 degrees and phi1 will be critical angel
+phiC=asind((n2/n1)*sin(%pi/2));
+printf('The Critical angel is %.2f degrees',phiC);
|