function plota_centros_hier2(base,p,A,malha,NP,parametros,...
    min_nivel,passov,max_nivel,inib,tamb,pasta,plota,estagio)

lin = 0;
col = 0;
ncols = 3;
for iv = min_nivel:passov:max_nivel
    if col >= ncols
        col = 0;
        lin = lin + 1;
    end
    j1 = inib(iv);
    j2 = j1 + tamb(iv) -1;
    base_iv.uniforme = false;
    base_iv.elementos = base.elementos(j1:j2);
    A_iv = A(:,j1:j2);
    malha_iv = malha(iv);
    plota_centros_de_nivel_hier2(base_iv,p,A_iv,malha_iv,NP,...
        parametros,lin,col,false);
    col = col + 1;
end

nlins = lin +1;

CD = malha(min_nivel).CD;
LD = malha(min_nivel).LD;
%title(sprintf('centros dos elementos %s',...
%    estagio),'FontSize',20);
axis off %para nao aparecer escala nos eixos
axis equal
pmin = CD - 0.5*LD;
pmax = pmin + (LD*1.1 .* [ncols, nlins]);
xlim([pmin(1), pmax(1)]);
ylim([pmin(2), pmax(2)]);
hold off
if plota.salva_eps
    saveas(gcf,sprintf('%s/centros.eps',pasta));
end






