summaryrefslogtreecommitdiff
path: root/3710/CH6/EX6.6/Ex6_6.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3710/CH6/EX6.6/Ex6_6.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3710/CH6/EX6.6/Ex6_6.sce')
-rw-r--r--3710/CH6/EX6.6/Ex6_6.sce15
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)