diff options
Diffstat (limited to '3740/CH3/EX3.5/Ex3_5.sce')
-rw-r--r-- | 3740/CH3/EX3.5/Ex3_5.sce | 15 |
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
|