% WIND
cdf1='44013tau-a.cdf';
u1='east_str';
v1='north_str';
% CURRENTS
files=[3391 3392 3411 3412 3481 3482 3591 3581];
u2='east';
v2='north';
%
n=length(files);
r=zeros(n,1);
theta=zeros(n,1);
for i=1:n,
cdf2=[int2str(files(i)) '-a1h.cdf'];
[r(i),theta(i)]=bcomcor(cdf1,u1,v1,cdf2,u2,v2);
end
tab=[files' r theta]
