summaryrefslogtreecommitdiff
path: root/1535/CH5/EX5.5/Ch05Ex5.sci
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1535/CH5/EX5.5/Ch05Ex5.sci
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1535/CH5/EX5.5/Ch05Ex5.sci')
-rwxr-xr-x1535/CH5/EX5.5/Ch05Ex5.sci11
1 files changed, 11 insertions, 0 deletions
diff --git a/1535/CH5/EX5.5/Ch05Ex5.sci b/1535/CH5/EX5.5/Ch05Ex5.sci
new file mode 100755
index 000000000..1090d058b
--- /dev/null
+++ b/1535/CH5/EX5.5/Ch05Ex5.sci
@@ -0,0 +1,11 @@
+// Scilab Code Ex5.5 : Phase retardation for quartz : Page-114 (2010)
+lambda = 500e-09; // Wavelength of incident light, m
+mu_e = 1.5508; // Refractive index of extraordinary ray
+mu_o = 1.5418; // Refractive index of ordinary ray
+t = 0.032e-03; // Thickness of quartz plate, m
+dx = (mu_e - mu_o)*t; // Path difference between E-ray and O-ray, m
+dphi = (2*%pi)/lambda*dx; // Phase retardation for quartz for given wavelength, rad
+printf("\nThe phase retardation for quartz for given wavelength = %5.3f pi rad", dphi/%pi);
+
+// Result
+// The phase retardation for quartz for given wavelength = 1.152 pi rad \ No newline at end of file