function [SigValue] = sig_valueA(signif,cormatrx)
%finds the smallest of the correlations in a vector of correalation coeffs.
%that is significant at the 0.05 level.
list=ones(length(signif(1,:)),1);
k=1;
for i=1:length(signif(1,:))
    if signif(1,i)<=0.05
            list(k,1) = list(k,1) - 1 + abs(cormatrx(1,i));
            k=k+1;
    end
end
SigValue = min(list(:,1));
end