summaryrefslogtreecommitdiff
path: root/3773/CH8/EX8.4/Ex8_4.sce
blob: ea4a96700cdf6336f9977054a0b5d365ff0039d6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Chapter 8: Helical Antennas
//Example 8-16.1
clc;

//Variable Initialization
gain = 24.0   //Gain (dB)
alpha = 12.7    //Pitch angle (degrees)
c_lambda = 1.05 //Circumference (lambda)
s_lambda = 0.236    //Spacing between turns (lambda)

//Calculation
D = 10**(gain/10)   //Directivity (unitless)
L = D/(12*(c_lambda**2))    //Helix length (lambda)
n = L/s_lambda              //Number of turns (unitless)
D = D/4             //Directivity for four 20-turn helixes(unitless)
Ae = D/(4*%pi)       //Effective aperture of each helix (lambda^2)

//Result
mprintf("The Axial length is %.0f lambda",L)
mprintf("\nThe number of turns for the axial length is %d",n)
mprintf("\nThe effective aperture for 20 turns is %.0f lambda square",Ae)