blob: 9a1e9ef14a1bff411b40277dd86eac0ff7632300 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
//Chapter 1 : Wave Optics
clear;
//Variable declaration
Dm=0.50 //diameter of ring 1
lamda=5900*10**-8 //wavelenght
m=10
//Calculation
R=(Dm**2)/(4*lamda*m)/10**2*10**2
//Result
mprintf("Radius of curvature= %.2f cms",R)
|
