summaryrefslogtreecommitdiff
path: root/2216/CH9/EX9.4
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2216/CH9/EX9.4
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 '2216/CH9/EX9.4')
-rwxr-xr-x2216/CH9/EX9.4/ex_9_4.sce29
1 files changed, 29 insertions, 0 deletions
diff --git a/2216/CH9/EX9.4/ex_9_4.sce b/2216/CH9/EX9.4/ex_9_4.sce
new file mode 100755
index 000000000..5b4f232e8
--- /dev/null
+++ b/2216/CH9/EX9.4/ex_9_4.sce
@@ -0,0 +1,29 @@
+//Example 9.4:phase difference,additional phase difference and Vpi
+clc;
+clear;
+close;
+format('v',7)
+disp("part (a)")
+h=550;//nm
+l=3;//cm
+no=1.51;//
+ne=1.47;//
+dfi=((2*%pi*l*10^-2*(no-ne))/(h*10^-9));//
+disp(dfi,"phase differnce is")
+//phase difference is in the form of pi in the textbook
+disp("part (b)")
+no=1.51;//
+r63=26.4*10^-12;//m/V
+V=200;//
+d=0.25;//cm
+dfi=((%pi*r63*no^3*(V)*(l*10^-2))/(h*10^-9*d*10^-2));//
+disp(dfi,"additional phase differnce is")
+//additional phase difference is in the form of pi in the textbook
+disp("part (c)")
+r63=26.4*10^-12;//m/V
+format('v',5)
+V=200;//
+d=0.25;//cm
+dfi=((%pi*r63*no^3*(V)*(l*10^-2))/(h*10^-9*d*10^-2));//
+vpi=((h*10^-9)/(no^3*r63))*(d/l);//V
+disp(vpi,"Vpi in V is")