Home

Introduction

Contents

Scripts

FeedBack

Date 08/09/2010
Script S1_2_7.m
Download Script S1_2_7.m
%==============================================
%A refracting plate
%==============================================
%
%============================================
%the distance d as a function of the angle
%of incidence and of refraction
%(see formula (1.47))
%============================================
%the refractive index n of the plate
n=1.56;
%of thickness s
s=9;
%angles of incidence between 0 and pi/2
alfa=linspace(eps,pi/2,30);
%and in degree
alfa_g=alfa*180/pi;
%the corresponding angles of refraction
%in radians
beta=asin(sin(alfa)/n);
%and in degree
beta_g=beta*180/pi;
%the value of d is determined
num=sin(alfa-beta);
den=cos(beta);
d=s*(num./den);
%plot of d as a function of the angle of incidence
%and of angle of refraction
plot(alfa_g,d,'bd-',beta_g,d,'ro-'),grid on
title('d function of angles of incidence(blue line) and of refraction(red line)')
%==========================================================================
%
%
%
Top