summaryrefslogtreecommitdiff
path: root/3537/CH6/EX6.2/Ex6_2.sce
diff options
context:
space:
mode:
Diffstat (limited to '3537/CH6/EX6.2/Ex6_2.sce')
-rw-r--r--3537/CH6/EX6.2/Ex6_2.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3537/CH6/EX6.2/Ex6_2.sce b/3537/CH6/EX6.2/Ex6_2.sce
new file mode 100644
index 000000000..497f7b1ab
--- /dev/null
+++ b/3537/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,17 @@
+//Example 6_2
+clc();
+clear;
+//To find how many photons emitted and power density
+v=3*10^8
+lamda=632.8*10^-9
+fre=v/lamda
+outpow=2.3*10^-3
+n=1
+h=6.626*10^-34
+N=(outpow*n)/(h*fre)
+printf("Number of photons emitted is")
+disp(N)
+printf("photons/second\n")
+spotarea=1*10^-6
+density=outpow/spotarea
+printf("Power density is %d kW/met^2",density)