Corte em polígonos (central)

> restart:with(plots):with(plottools):

Warning, the name changecoords has been redefined

O nome do comando é cutout(....) .

Permite cortar a parte central dos polígonos utilizados na construção de superfícies, criando um efeito muito interessante. Pode ser utilizado diretamente sobre sólidos ou sobre gráficos.

Para cada polígono numa estrutura poligonal (ou superfície), esta rotina contrai os mesmos e os subtrai dos originais. A sintaxe deste comando pede um número que informa a proporção entre os polígonos originais e os que serão subtraidos.

Os exemplos apresentados a seguir são análogos aos da seção anterior, apenas usamos cutout no lugar de cutin .

> display(cutout(hexahedron(),1/2));

> display(cutout(hexahedron(),4/5));

> display(cutout(dodecahedron(),1/3),scaling=constrained,axes=boxed);

> display(cutout(icosahedron(),3/4),scaling=constrained);

> display( cutout( sphere(), 1/2 ),scaling=constrained );

Para colocar este efeito em superfícies devemos alterar sua estrutura para a estrutura de polígonos com o comando convert(superfície,POLYGONS) . A palavra polygons deve estar grafada em letras maiúsculas. Nos exemplos abaixo diminuimos o reticulado padrão da estrutura plot3d que é de [15,15] para números menores devido à velocidade do processador, mas podendo dispor de tempo, o leitor pode compilar o comando com o grid padrão.

Vejamos alguns exemplos:

O primeiro é com o parabolóide elíptico e o segundo com o parabolóide hiperbólico.

> p := convert(plot3d(x^2+y^2,x=-1..1,y=-1..1,grid=[8,8]), POLYGONS):
display( cutout(p, 2/3) ,axes=frame);

> g1:=convert(plot3d(x^2-y^2,x=-1..1,y=-1..1,grid=[10,10]),POLYGONS):
display(cutout(g1,2/3),axes=boxed);

>