summaryrefslogtreecommitdiff
path: root/2243/CH5/EX5.6/Ex5_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '2243/CH5/EX5.6/Ex5_6.sce')
-rwxr-xr-x2243/CH5/EX5.6/Ex5_6.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/2243/CH5/EX5.6/Ex5_6.sce b/2243/CH5/EX5.6/Ex5_6.sce
new file mode 100755
index 000000000..f665d5ae5
--- /dev/null
+++ b/2243/CH5/EX5.6/Ex5_6.sce
@@ -0,0 +1,15 @@
+clc();
+clear;
+//Given :
+mu_o = 1.544; //Refractive index for ordinary ray
+mu_e = 1.553;//Refractive index for extraordinary ray
+lambda = 5890;//Wavelength in A
+//(a)Plane polarised light :
+//lambda is converted from A to cm , 1 A = 1.0*10^-8 cm
+t1 = (lambda*10^-8)/(2*(mu_e-mu_o));//Minimum thickness in cm
+//(b)Circularly polarised light :
+t2 = (lambda*10^-8)/(4*(mu_e-mu_o));// Minimum thickness in cm
+printf("Minimum thickness :\n\n");
+printf("(a)Plane polarised light : %.2f x 10^-3 cm \n\n",t1*10^3);
+printf("(b)Circularly polarised light : %.2f x 10^-3 cm ",t2*10^3);
+