summaryrefslogtreecommitdiff
path: root/3753/CH4/EX4.2/Ex4_2.sce
blob: b145e6ccccac98f9fd6d80809f8280b4cf356e8b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Example 4.2, Page number 4.32

clc;clear;close

// variable declaration
C=3*10**8                    // The speed of light
Lamda=6943                   // Wavelength
T=300                        // Temperature in Kelvin
h=6.626*10**-34              // Planck constant 
k=1.38*10**-23               // Boltzmann's constant

// Calculations

V=(C)/(Lamda*10**-10)       // Frequency
R=exp(h*V/(k*T))       // Relative population

// Result
printf("Frequency (V) = %0.2e Hz",V)
printf("\nRelative Population = %.3e",R)