summaryrefslogtreecommitdiff
path: root/1026/CH8/EX8.16/Example8_16.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1026/CH8/EX8.16/Example8_16.sce
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 '1026/CH8/EX8.16/Example8_16.sce')
-rwxr-xr-x1026/CH8/EX8.16/Example8_16.sce29
1 files changed, 29 insertions, 0 deletions
diff --git a/1026/CH8/EX8.16/Example8_16.sce b/1026/CH8/EX8.16/Example8_16.sce
new file mode 100755
index 000000000..955ff3493
--- /dev/null
+++ b/1026/CH8/EX8.16/Example8_16.sce
@@ -0,0 +1,29 @@
+//chapter8,Example8_16,pg 209
+
+n=2
+
+grat=1/5000//transmission grating
+
+lam=5893*10^-8
+
+dtheta=(2.5*3.14)/(180*60)//change in angular displacement(in radian)
+
+//(a+b)=grat
+
+//dlam=((a+b)cos(theta)/n)dtheta
+
+cos(theta)=sqrt(1-(((n*lam)/grat)^2))
+
+dlam=(dtheta*grat*cos(theta))/n//difference in wavelength
+
+f=30//focal length
+
+dl=f*dtheta//linear separation
+
+printf("difference between two yellow lines (in cm)\n")
+
+disp(dlam)
+
+printf("\nlinear separation\n")
+
+printf("dl=%.4f cm",dl) \ No newline at end of file