From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1535/CH11/EX11.1/Ch11Ex1.sci | 15 +++++++++++++++
 1535/CH11/EX11.2/Ch11Ex2.sci | 12 ++++++++++++
 1535/CH11/EX11.3/Ch11Ex3.sci | 10 ++++++++++
 1535/CH11/EX11.4/Ch11Ex4.sci | 14 ++++++++++++++
 1535/CH11/EX11.5/Ch11Ex5.sci | 14 ++++++++++++++
 1535/CH11/EX11.6/Ch11Ex6.sci | 12 ++++++++++++
 6 files changed, 77 insertions(+)
 create mode 100755 1535/CH11/EX11.1/Ch11Ex1.sci
 create mode 100755 1535/CH11/EX11.2/Ch11Ex2.sci
 create mode 100755 1535/CH11/EX11.3/Ch11Ex3.sci
 create mode 100755 1535/CH11/EX11.4/Ch11Ex4.sci
 create mode 100755 1535/CH11/EX11.5/Ch11Ex5.sci
 create mode 100755 1535/CH11/EX11.6/Ch11Ex6.sci

(limited to '1535/CH11')

diff --git a/1535/CH11/EX11.1/Ch11Ex1.sci b/1535/CH11/EX11.1/Ch11Ex1.sci
new file mode 100755
index 000000000..34574b87e
--- /dev/null
+++ b/1535/CH11/EX11.1/Ch11Ex1.sci
@@ -0,0 +1,15 @@
+// Scilab Code Ex11.1: Page-249 (2010)
+h = 6.626e-034;    // Planck's constant, Js
+c = 3e+08;    // Speed of light in free space, m/s
+k = 1.38e-023;    // Boltzmann constant, J/K
+T = 300;    // Temperature at absolute scale, K
+lambda = 5500e-010;    // Wavelength of visible light, m
+rate_ratio = exp(h*c/(lambda*k*T))-1;    // Ratio of spontaneous emission to stimulated emission
+printf("\nThe ratio of spontaneous emission to stimulated emission for visible region = %1.0e", rate_ratio);
+lambda = 1e-02;    // Wavelength of microwave, m
+rate_ratio = exp(h*c/(lambda*k*T))-1;    // Ratio of spontaneous emission to stimulated emission
+printf("\nThe ratio of spontaneous emission to stimulated emission for microwave region = %6.4f", rate_ratio);
+
+// Result
+// The ratio of spontaneous emission to stimulated emission for visible region = 8e+037
+// The ratio of spontaneous emission to stimulated emission for microwave region = 0.0048
\ No newline at end of file
diff --git a/1535/CH11/EX11.2/Ch11Ex2.sci b/1535/CH11/EX11.2/Ch11Ex2.sci
new file mode 100755
index 000000000..cec5f5f5a
--- /dev/null
+++ b/1535/CH11/EX11.2/Ch11Ex2.sci
@@ -0,0 +1,12 @@
+// Scilab Code Ex11.2: Page-250 (2010)
+e = 1.6e-019;   // Energy equivalent of 1 eV, J/eV
+h = 6.626e-034;    // Planck's constant, Js
+c = 3e+08;    // Speed of light in free space, m/s
+lambda = 690e-009;    // Wavelength of laser light, m
+E_lower = 30.5;    // Energy of lower state, eV
+E = h*c/(lambda*e);    // Energy of the laser light, eV
+E_ex = E_lower + E;    // Energy of excited state of laser system, eV
+printf("\nThe energy of excited state of laser system = %4.1f eV", E_ex);
+
+// Result
+// The energy of excited state of laser system = 32.3 eV
diff --git a/1535/CH11/EX11.3/Ch11Ex3.sci b/1535/CH11/EX11.3/Ch11Ex3.sci
new file mode 100755
index 000000000..5618fdadb
--- /dev/null
+++ b/1535/CH11/EX11.3/Ch11Ex3.sci
@@ -0,0 +1,10 @@
+// Scilab Code Ex11.3: Page-250 (2010)
+h = 6.626e-034;    // Planck's constant, Js
+k = 1.38e-023;    // Boltzmann constant, J/K
+// Stimulated Emission = Spontaneous Emission <=> exp(h*f/(k*T))-1 = 1 i.e.
+// f/T = log(2)*k/h = A
+A =  log(2)*k/h;    // Frequency per unit temperature, Hz/K
+printf("\nThe stimulated emission equals spontaneous emission iff f/T = %4.2e Hz/K", A);
+
+// Result
+// The stimulated emission equals spontaneous emission iff f/T = 1.44e+010 Hz/K 
\ No newline at end of file
diff --git a/1535/CH11/EX11.4/Ch11Ex4.sci b/1535/CH11/EX11.4/Ch11Ex4.sci
new file mode 100755
index 000000000..a8a76c654
--- /dev/null
+++ b/1535/CH11/EX11.4/Ch11Ex4.sci
@@ -0,0 +1,14 @@
+// Scilab Code Ex11.4: Page-250 (2010)
+lambda = 500e-009;    // Wavelength of laser light, m
+f = 15e-02;    // Focal length of the lens, m
+d = 2e-02;    // Diameter of the aperture of source, m
+a = d/2;    // Radius of the aperture of source, m
+P = 5e-003;    // Power of the laser, W
+A = %pi*lambda^2*f^2/a^2;    // Area of the spot at the focal plane, metre square
+I = P/A;    // Intensity at the focus, W per metre square    
+printf("\nThe area of the spot at the focal plane = %4.2e metre square", A);
+printf("\nThe intensity at the focus = %4.2e watt per metre square", I);
+
+// Result
+// The area of the spot at the focal plane = 1.77e-010 metre square
+// The intensity at the focus = 2.83e+007 watt per metre square 
\ No newline at end of file
diff --git a/1535/CH11/EX11.5/Ch11Ex5.sci b/1535/CH11/EX11.5/Ch11Ex5.sci
new file mode 100755
index 000000000..290632dfa
--- /dev/null
+++ b/1535/CH11/EX11.5/Ch11Ex5.sci
@@ -0,0 +1,14 @@
+// Scilab Code Ex11.5: Page-251 (2010)
+h = 6.626e-034;    // Planck's constant, Js
+c = 3e+08;    // Speed of light in free space, m/s
+lambda = 1064e-009;    // Wavelength of laser light, m
+P = 0.8;    // Average power output per laser pulse, W
+dt = 25e-003;    // Pulse width of laser, s
+E = P*dt;    // Energy released per pulse, J
+N = E/(h*c/lambda);    // Number of photons in a pulse
+printf("\nThe energy released per pulse = %2.0e J", E);
+printf("\nThe number of photons in a pulse = %4.2e", N);
+
+// Result
+// The energy released per pulse = 2e-002 J
+// The number of photons in a pulse = 1.07e+017 
\ No newline at end of file
diff --git a/1535/CH11/EX11.6/Ch11Ex6.sci b/1535/CH11/EX11.6/Ch11Ex6.sci
new file mode 100755
index 000000000..2ecd57e6d
--- /dev/null
+++ b/1535/CH11/EX11.6/Ch11Ex6.sci
@@ -0,0 +1,12 @@
+// Scilab Code Ex11.6:Page-251 (2010)
+lambda = 693e-009;    // Wavelength of laser beam, m
+D = 3e-003;    // Diameter of laser beam, m
+d_theta = 1.22*lambda/D;    // Angular spread of laser beam, rad
+d = 300e+003;    // Height of a satellite above the surface of earth, m
+a = d_theta*d;    // Diameter of the beam on the satellite, m
+printf("\nThe height of a satellite above the surface of earth = %4.2e rad", d_theta);
+printf("\nThe diameter of the beam on the satellite = %4.1f m", a);
+
+// Result
+// The height of a satellite above the surface of earth = 2.82e-004 rad
+// The diameter of the beam on the satellite = 84.5 m 
\ No newline at end of file
-- 
cgit