blob: 11449f9b5cb58baa773187aded664802c17c02b8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
//Chapter 1 : Wave Optics
clear;
//Variable declaration
lamda=5890*10**-10 //wavelength
myu=1.33 //refractive index of glass
n=1 //first minimum
r=45 //angle in degrees
cos_r=0.707
//Calculations
t=(n*lamda)/(2*myu*cos_r)/10**-7
//Result
mprintf("Thickness of the film t= %.3f*10**-4 mm",t)
|
