clear
close all
clc

Amp = 5e6;
a = linspace(-pi,pi,61)';
X = rad2deg(a);
Y = zeros(size(a));
Z = abs(sin(a*2)*Amp);

x=[];
y=[];
z=[];

for f=1:2:length(X)-1
    x=[x;X(f:f+1);NaN];
    y=[y;Y(f:f+1);NaN];
    z=[z;Z(f:f+1);NaN];
end

kmlStr = ge_plot3(X,Y,Z,'forceAsLine',true,'extrude',1);


p=mfilename('fullpath');
[ppath,pname,pext,pvrsn]=fileparts(p);
ge_output(['..',filesep,'kml',filesep,pname,'.kml'],kmlStr,'name',pname);