function writeldb(file,text,ldbxy)

fid = fopen(file,'w');

fprintf(fid,'%s \n',text);
fprintf(fid,'  %i %s \n',length(ldbxy.x),'2');

for n=1:length(ldbxy.x)
    fprintf (fid,' %f %f \n',ldbxy.x(n),ldbxy.y(n));
end

end