function parGetVecs(dirname)
    minc = zeros(2,174);
    maxc = zeros(2,174);
    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