//example 2
// Chapter 46
theta_p= atand(1.5)
disp(theta_p,"theta_p in degrees")
sin_theta_r= sind(theta_p)/1.5
theta_r=asind(sin_theta_r)
disp(theta_r,"angle of refraction fron snells law in degrees=")