function parGetVecs(dirname)
minc = zeros(2,1008);
maxc = zeros(2,1008);
parfor i=1:2
if i==1
[minc(i,:),maxc(i,:) ] = getVecsM(strcat(dirname,'_a'));
else
[minc(i,:),maxc(i,:) ] = getVecsM(strcat(dirname,'_b'));
end
end
minc=min(minc)
maxc=max(maxc)
parfor i=1:2
if i==1
getVecs(strcat(dirname,'_a'),minc,maxc);
else
getVecs(strcat(dirname,'_b'),minc,maxc);
end
end
end