summaryrefslogtreecommitdiff
path: root/3773/CH4/EX4.4/Ex4_4.sce
blob: e38f69daad2f5fd3561dfcba975007ed954caebd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Chapter 4: Radiation
//Example 4-5.1
clc;

//Variable Initialization
dl = 1e-2       //Length of radiating element (m)
I_eff = 0.5     //Effective current (A)
f = 3e9         //Frequency (Hz)
c = 3e8         //Velocity of light (m/s)

//Calculation
w = 2*%pi*f     //Angular Frequency (rad/s)
P = 20*(w**2)*(I_eff**2)*(dl**2)/(c**2)     //Radiated power (W)

//Result
mprintf("The radiated power is %.2f W", P)

//The answer obtained is varying compared with the textbook answer because of a calculation error