model ("zs6bkw") {

real height, length, angle, eps, gauge, segments, a, b, lambda, freq;
element center, left, right ;

height = 10;
length = 13.9;
angle = 100;
eps = 0.1;
gauge = #18;
segments = 21;

b = length*sin(pi*angle/2/180);
a = length*sin(pi*(90 - angle/2)/180);

center = wire(0,-eps, height,
              0, eps, height,
              gauge, 1);
left = wire(0, -b, height - a,
            0,-eps, height,
            gauge, segments);
right = wire(0, b, height - a,
             0,eps,height,
             gauge, segments);

voltageFeed(center, 1.0, 0.0);

azimuthPlotForElevationAngle(25);
elevationPlotForAzimuthAngle(45);

setFrequency(7.02); // 115+689j
//setFrequency(14.035); // 139-561j
//setFrequency(18.08); // 212+720j
//setFrequency(24.9); // 161-480j
//setFrequency(29.0); // 277+683j

averageGround();
}