summaryrefslogtreecommitdiff
path: root/3710/CH5/EX5.1/Ex5_1.sce
blob: 60bc96751a9507699d13e621f0c9899ebf66dc5c (plain)
1
2
3
4
5
6
7
8
9
10
11
//Example 5.1, Page Number 173
//The Function fpround(dependency) is used to round a floating point number x to n decimal places
clc;
T=2000 // In Kelvin
v=5*(10**14) //Frequency In Hertz
h=6.6*(10**-34) //Plancks Constant
k=1.38*(10**-23) //Boltzman Constant

R=exp((h*v)/(k*T))-1 
R=fpround(R,2)
mprintf("The Ratio of rates of spontaneous & stimulated emission is %0.2e",R);