summaryrefslogtreecommitdiff
path: root/3542/CH2/EX2.3/ExB_3.sce
blob: a86c003dad3041f2873d15731794981be675949f (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
// Example no B.3
// To determine average output thermal noise power
// Page no. 614

clc;
clear all;

// Given data
T0=300;                                                                   // Ambient room temperature in K
Fsys=8;                                                                   // Noise figure of the system
Tant=290;                                                                 // Effective temperature of antenna in K
K=1.38*10^-23;                                                            // Boltzmann's constant in J/K
B=30000;                                                                  // Effective bandwidth in Hz

Te=(Fsys-1)*T0;                                                           // Effective noise temperature in K
Ttotal=Tant+Te;                                                           // Overall system noise temperature in K

// To determine average output thermal noise power
Pn=(1+(Ttotal/T0))*K*T0*B;                                                // Average output thermal noise power in W
Pn=10*log10(Pn/(10^-3));                                                  // Average output thermal noise power in dBm

// Displaying the result in command window
printf('\n Average output thermal noise power = %0.1f dBm',Pn);