diff options
Diffstat (limited to '2243/CH5/EX5.6/Ex5_6.sce')
-rwxr-xr-x | 2243/CH5/EX5.6/Ex5_6.sce | 15 |
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);
+
|