summaryrefslogtreecommitdiff
path: root/1535/CH11/EX11.3/Ch11Ex3.sci
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1535/CH11/EX11.3/Ch11Ex3.sci
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1535/CH11/EX11.3/Ch11Ex3.sci')
-rwxr-xr-x1535/CH11/EX11.3/Ch11Ex3.sci10
1 files changed, 10 insertions, 0 deletions
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