% take the merged time series matrix generated by winter9091 and 
% create netcdf files
%
winter9091

vnames=['east '
        'north'];

for i=1:m
     group=eval(cdf_groups(i,:));
     cdf_name=group(1,:);
     ind=min(find(cdf_groups==' '));
     cdf_name(ind:ind+3)='.cdf';
     v=[real(w(:,i)) imag(w(:,i))];
     create(cdf,v,vnames,ll(i,2),ll(i,1),jd);
end
