function [xx,yy,yd]=srvy1locs

x=dir('oaci_1.1/survey.1/*.cdn');
n=length(x)

xx=[];
yy=[];
yd=[];
for k=1:n
    disp(x(k).name);
    d=read_cdn(['oaci_1.1/survey.1/',x(k).name]);

    [xxx,yyy]=ll2xy(d.lat,-d.lon);
    xx=[xx;xxx];
    yy=[yy;yyy];
    yd=[yd;d.yd];
end

fp=fopen('survey.1.loc.dat','w');
d=[xx,yy,yd];
fprintf(fp,['%f %f %f\n'],d')
fclose(fp);
