function [a]=bcorr(cdf1,var1,cdf2,var2);
%function [a]=bcorr(cdf1,var1,cdf2,var2);
% find correlation between two variables in separate cdf files
%
[icyc1,ncyc1,icyc2,ncyc2]=like_cyc(cdf1,cdf2);
v1=mcvgt(cdf1,var1,icyc,ncyc);
v2=mcvgt(cdf2,var2,icyc,ncyc);
a=corrcoef([v1(:) v2(:)]);

