summaryrefslogtreecommitdiff
path: root/3537/CH6
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3537/CH6
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 '3537/CH6')
-rw-r--r--3537/CH6/EX6.1/Ex6_1.sce12
-rw-r--r--3537/CH6/EX6.1/Ex6_1.txt1
-rw-r--r--3537/CH6/EX6.2/Ex6_2.sce17
-rw-r--r--3537/CH6/EX6.2/Ex6_2.txt4
-rw-r--r--3537/CH6/EX6.3/Ex6_3.sce9
-rw-r--r--3537/CH6/EX6.3/Ex6_3.txt1
-rw-r--r--3537/CH6/EX6.4/Ex6_4.sce7
-rw-r--r--3537/CH6/EX6.4/Ex6_4.txt1
-rw-r--r--3537/CH6/EX6.5/Ex6_5.sce12
-rw-r--r--3537/CH6/EX6.5/Ex6_5.txt2
-rw-r--r--3537/CH6/EX6.6/Ex6_6.sce13
-rw-r--r--3537/CH6/EX6.6/Ex6_6.txt2
12 files changed, 81 insertions, 0 deletions
diff --git a/3537/CH6/EX6.1/Ex6_1.sce b/3537/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..ae0d79777
--- /dev/null
+++ b/3537/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,12 @@
+//Example 6_1
+clc();
+clear;
+//To calculate the relative population
+h=6.626*10^-34
+v=4.32*10^14
+kb=1.38*10^-23
+t=300
+k=(h*v)/(kb*t)
+n1_n2=%e^k
+printf("Relative population N1/N2=")
+disp(n1_n2)
diff --git a/3537/CH6/EX6.1/Ex6_1.txt b/3537/CH6/EX6.1/Ex6_1.txt
new file mode 100644
index 000000000..62352cf38
--- /dev/null
+++ b/3537/CH6/EX6.1/Ex6_1.txt
@@ -0,0 +1 @@
+Relative population N1/N2= 1.065D+30 \ No newline at end of file
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)
diff --git a/3537/CH6/EX6.2/Ex6_2.txt b/3537/CH6/EX6.2/Ex6_2.txt
new file mode 100644
index 000000000..d87358bb6
--- /dev/null
+++ b/3537/CH6/EX6.2/Ex6_2.txt
@@ -0,0 +1,4 @@
+Number of photons emitted is
+ 7.322D+15 photons/second
+
+Power density is 2300 kW/met^2 \ No newline at end of file
diff --git a/3537/CH6/EX6.3/Ex6_3.sce b/3537/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..8652782c8
--- /dev/null
+++ b/3537/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,9 @@
+//Example 6_3
+clc();
+clear;
+//To calculate the wavelength of emission from GaAs
+Eg=1.44*1.6*10^-19
+h=6.626*10^-34
+c=3*10^8
+lamda=(h*c)/Eg
+printf("Wavelength = %.10f",lamda)
diff --git a/3537/CH6/EX6.3/Ex6_3.txt b/3537/CH6/EX6.3/Ex6_3.txt
new file mode 100644
index 000000000..66fb40f22
--- /dev/null
+++ b/3537/CH6/EX6.3/Ex6_3.txt
@@ -0,0 +1 @@
+Wavelength = 0.0000008628 \ No newline at end of file
diff --git a/3537/CH6/EX6.4/Ex6_4.sce b/3537/CH6/EX6.4/Ex6_4.sce
new file mode 100644
index 000000000..940061a00
--- /dev/null
+++ b/3537/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,7 @@
+//Example 6_4
+clc();
+clear;
+//To find the band gap
+lamda=1.55 //units in eV
+eg=1.24/lamda //units in eV
+printf("Band gap is Eg=%.1feV",eg)
diff --git a/3537/CH6/EX6.4/Ex6_4.txt b/3537/CH6/EX6.4/Ex6_4.txt
new file mode 100644
index 000000000..c30a1e9a0
--- /dev/null
+++ b/3537/CH6/EX6.4/Ex6_4.txt
@@ -0,0 +1 @@
+ Band gap is Eg=0.8eV \ No newline at end of file
diff --git a/3537/CH6/EX6.5/Ex6_5.sce b/3537/CH6/EX6.5/Ex6_5.sce
new file mode 100644
index 000000000..b2519550b
--- /dev/null
+++ b/3537/CH6/EX6.5/Ex6_5.sce
@@ -0,0 +1,12 @@
+//Example 6_5
+clc();
+clear;
+//To find the relative population of the states in Ruby laser
+h=6.626*10^-34
+v=3*10^8 //units in met/sec
+kb=1.381*10^-23 //units in J/L
+t=300 //units in K
+n_no=exp((h*v)/(kb*t))
+printf("The relative population of two states is N/N0=")
+disp(n_no)
+//In textb book answer is printed wrong as 8*10^31 correct answer is 1.000048
diff --git a/3537/CH6/EX6.5/Ex6_5.txt b/3537/CH6/EX6.5/Ex6_5.txt
new file mode 100644
index 000000000..401851643
--- /dev/null
+++ b/3537/CH6/EX6.5/Ex6_5.txt
@@ -0,0 +1,2 @@
+The relative population of two states is N/N0= 1.000048
+ \ No newline at end of file
diff --git a/3537/CH6/EX6.6/Ex6_6.sce b/3537/CH6/EX6.6/Ex6_6.sce
new file mode 100644
index 000000000..c3c620053
--- /dev/null
+++ b/3537/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,13 @@
+//Example 6_6
+clc();
+clear;
+//To calculate the ratio of stimulated emission rate to spontaneous emission
+c=3*10^8 //units in met/sec
+lamda=0.5*10^-9
+v=(c/lamda)*10^-3 //units in hz
+h=6.626*10^-34 //units in J S
+kb=1.381*10^-23 //units in J/K
+t=1000
+b21_a21=1/(exp((h*v)/(kb*t))-1)
+printf("The ratio of Simulated emission to spontaneous emission B21/A21=")
+disp(b21_a21)
diff --git a/3537/CH6/EX6.6/Ex6_6.txt b/3537/CH6/EX6.6/Ex6_6.txt
new file mode 100644
index 000000000..1ff006de4
--- /dev/null
+++ b/3537/CH6/EX6.6/Ex6_6.txt
@@ -0,0 +1,2 @@
+The ratio of Simulated emission to spontaneous emission B21/A21= 3.145D-13
+ \ No newline at end of file