summaryrefslogtreecommitdiff
path: root/2309/CH2/EX2.a.6/A_Ex2_6.sce
blob: 21cd9551aca90c29f0c8eba54515572df459ee54 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
// Chapter 2 addl_Example 6
//==============================================================================
clc;
clear;

//input data
h           = 6.625*10^-34;         // planck's constant
c           = 3*10^8;               // vel. of light in m/s
lamda       = 5000*10^-10;          // wavelength for optical region in m
T           = 300                   // Temperature in Kelvin
Kb          = 1.38*10^-23           // Boltzmann constant

// Calculations
// let R    = Rsp/Rst 
R           = exp((h*c)/(lamda*Kb*T)) - 1;     // ratio of spontaneous to stimulated emission
if R<1 then
    mprintf('Since the spontaneous emission is lesser than stimulated emission \n hence LASER action is possible at thermal equilibrium' )
else
    
    mprintf('Since the spontaneous emission is more predominant than stimulated emission \n hence LASER action is not possible at optical frequencies under thermal equilibrium' )
end

//==============================================================================