blob: e202a6373f3e47a43b8ca51e47ccf9d5553768a1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
//Example 3.5, Page Number 123
//Phase Matching Angle
clc;
//The following values have been taken from the table on page no 123
no1=1.4943//no for l=1.06
no2=1.5132//no for l=0.53
nc=1.4712//nc for l=0.53
t2=((no1**-2)-(no2**-2))/((nc**-2)-(no2**-2))
theta=asin(t2)
//Converting it into degrees
degrees=theta * (180/%pi) //theta is the phase matching angle
mprintf("The Phase matching angle is %d degrees",degrees);
|
