function demo_ge_poly(ldbFile,plot)%% Demo ge_poly 

%load([pwd,filesep,'data',filesep,'conus.mat']);

[pathstr, name, ext, versn] = fileparts(ldbFile);
ldb = readldb(ldbFile);
[x,y,log]=convertCoordinates(ldb.x,ldb.y,'CS1.code',28992,'CS2.code',4326);

world_coasts = ge_poly(x,y,...
                       'polyColor','9933ffff',...
                        'altitude',150000,...
                    'altitudeMode','relativeToGround',...
                         'extrude',0,...
                      'tessellate',false);
                  
kmlFileName = 'demo_ge_poly.kml';
kmlTargetDir = [''];%..',filesep,'kml',filesep];
ge_output([kmlTargetDir,kmlFileName],world_coasts,...
                              'name',kmlFileName);




