blob: 38b3ccdecfaee9440073d2f734213272785fe73e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
//Example 6.6, Page Number 266
//Focused Power Density
clc;
P=10*(10**-3) //Power of the He-Ne Laser in W
F=1 //F Number
l=633*(10**-9) //Wavelength of the laser in m
//From equation 6.10a
rs=(2/%pi)*l*F //rs is the radius of the focused spot in m
P1=(P*%pi)/((2*l)**2) //P1 is the Power per unit area in Watt per meter square
mprintf("The Radius of the Focused Spot is %.2e m\n",rs)
mprintf("The Power Per unit Area is:%.2e Watt per meter square",P1)
|
