summaryrefslogtreecommitdiff
path: root/2708/CH1/EX1.21/ex_1_21.sce
blob: b7d5084b6602f07315f9f4e35cc35ffcbd87c517 (plain)
1
2
3
4
5
6
7
8
9
10
11
//Example 1.21 // radius of lens
clc;
clear;
//given data :
w=5890D-10;//wavelength used in m
d=.01;//diameter of dark ring in m
r=%pi/6;//angle that light passes in radian
n=3;// order of ring
u=1;// refractive index of medium  between lens  and plate
R=u*(d^2)*cos(r)/(4*n*w);// radius of lens in m
disp(R,"radius of lens in m")