summaryrefslogtreecommitdiff
path: root/3740/CH3/EX3.5/Ex3_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '3740/CH3/EX3.5/Ex3_5.sce')
-rw-r--r--3740/CH3/EX3.5/Ex3_5.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3740/CH3/EX3.5/Ex3_5.sce b/3740/CH3/EX3.5/Ex3_5.sce
new file mode 100644
index 000000000..3e942f6bf
--- /dev/null
+++ b/3740/CH3/EX3.5/Ex3_5.sce
@@ -0,0 +1,15 @@
+//Optoelectronics - An Introduction, 2nd Edition by J. Wilson and J.F.B. Hawkes
+//Example 3.5
+//OS=Windows XP sp3
+//Scilab version 5.5.2
+clc;
+clear;
+
+//given appropriate refractive indices for ADP :-
+n0w=1.4943;
+new=1.4603;
+n02w=1.5132;
+ne2w=1.4712;
+
+Thetam=asind(sqrt((n0w^(-2)-n02w^(-2))/(ne2w^(-2)-n02w^(-2))));//Phase matching angle for the ADP
+mprintf("Thetam = %d degrees", Thetam);//The answer provided in the textbook is wrong