function plota_malhas_hier2(malha,...
    min_nivel,passov,max_nivel,pasta,plota,estagio,rotulo)

lin = 0;
col = 0;
ncols = 3;
for iv = min_nivel:passov:max_nivel
    if col >= ncols
        col = 0;
        lin = lin + 1;
    end
    malha_iv = malha(iv);
    plota_malha_de_nivel_hier2(malha_iv,lin,col);
    col = col + 1;
end

nlins = lin +1;
min_nivel
malha.CD

CD = malha(min_nivel).CD;
LD = malha(min_nivel).LD;
title(sprintf('malhas %s %s',...
    rotulo,estagio),'FontSize',20);
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/malhas_%s.eps',pasta,rotulo));
end






