1 files changed, 15 insertions, 0 deletions
diff --git a/3710/CH6/EX6.6/Ex6_6.sce b/3710/CH6/EX6.6/Ex6_6.sce
new file mode 100644
index 000000000..38b3ccdec
--- /dev/null
+++ b/3710/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,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)