diff options
Diffstat (limited to '3773/CH15/EX15.4/Ex15_4.sce')
| -rw-r--r-- | 3773/CH15/EX15.4/Ex15_4.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3773/CH15/EX15.4/Ex15_4.sce b/3773/CH15/EX15.4/Ex15_4.sce new file mode 100644 index 000000000..e806a6e7a --- /dev/null +++ b/3773/CH15/EX15.4/Ex15_4.sce @@ -0,0 +1,14 @@ +//Chapter 15: Antennas for Special Applications +//Example 15-13.1 +clc; + +//Variable Initialization +fre = 3e9 //Frequency (Hz) +Re_Zc = 14.4e-3 //Real part of intrinsic impedance of copper (ohm) +Zd = 377 //Intrinsic impedance of air (ohm) + +//Calculation +tau = atan(Re_Zc/Zd)*180/%pi //Tilt angle (degrees) + +//Result +mprintf("The tilt angle is %.4f degrees",tau) |