diff options
Diffstat (limited to '3710/CH6/EX6.4/Ex6_4.sce')
| -rw-r--r-- | 3710/CH6/EX6.4/Ex6_4.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3710/CH6/EX6.4/Ex6_4.sce b/3710/CH6/EX6.4/Ex6_4.sce new file mode 100644 index 000000000..85d177b99 --- /dev/null +++ b/3710/CH6/EX6.4/Ex6_4.sce @@ -0,0 +1,14 @@ +//Example 6.4, Page Number 260
+//Beam collimation
+clc;
+
+//Considering a He-Ne Laser
+d=3*(10**-3) //Diameter in meter
+l=633*(10**-9) //Wavelength of the laser in meter
+
+theta=l/d //theta is the divergence of the beam
+mprintf("The Divergence of the Beam is %.1e rad\n",theta)
+
+//After Collimation
+theta=theta/30 //Reduced by a factor of 30
+mprintf(" After Collimation,The angle of divergence is reduced to %.0e rad",theta)
|