blob: 6166a24ce79bbc7c6344357a5f672807009e46cc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
clc;
close();
clear();
//page no 535
//prob no. 16.13
n1=1; //refraction index of air
E2=4 //material dielectric constant
theta_i=50 //angle of incidence in degree (misprinted in the solution)
n2=sqrt(E2);
theta_r=asin(n1/n2*sin(theta_i*%pi/180));
mprintf(' The angle of refraction is %.2f \n (using angle of incidence =50)\n',theta_r*180/%pi);
//misprinted angle
|