diff options
Diffstat (limited to '3773/CH7/EX7.3')
| -rw-r--r-- | 3773/CH7/EX7.3/Ex7_3.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/3773/CH7/EX7.3/Ex7_3.sce b/3773/CH7/EX7.3/Ex7_3.sce new file mode 100644 index 000000000..760550a2e --- /dev/null +++ b/3773/CH7/EX7.3/Ex7_3.sce @@ -0,0 +1,21 @@ +//Chapter 7: Loop, Slot and Horn Antennas +//Example 7-11.1 +clc; + +//Variable Initialization +c =%pi //Circumference (m) +f1 = 1 //Frequency (MHz) +f2 = 10 //Frequency (MHz) +d = 10e-3 //Diameter of copper wire (m) + +//Calculation +RL_Rr1 = 3430/((c**3)*(f1**3.5)*d) +RL_Rr2 = 3430/((c**3)*(f2**3.5)*d) //Ratio of Loss resistance and radiation resistance (unitless) +k1 = 1/(1+RL_Rr1) //Radiation efficiency (unitless) +k_db1 = 10*log10(k1) //Radiation efficiency (in dB) +k2 = 1/(1+RL_Rr2) //Radiation efficiency (unitless) +k_db2 = 10*log10(k2) //Radiation efficiency (in dB) + +//Result +mprintf("The radiation efficiency for 1 MHz is %.1ef or %.1f dB",k1, k_db1) +mprintf("\nThe radiation efficiency for 10 MHz is %.2f or %.1f dB",k2, k_db2) |