Tronco de cone

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

Warning, the name changecoords has been redefined

Podemos construir um tronco de cone com vértice [a,b,c] com raio da base r e altura h com o comando cone([a,b,c],r,h) .

Vejamos um primeiro exemplo. Neste o tronco tem vértice na origem, raio3 e altura 5.

> a:=cone([0,0,0],3,5):
display(a,axes=boxed,scaling=constrained,style=patchnogrid,orientation=[35,65]);

>

Não existe a possibilidade de colocar o opcional capped=false . Se fizermos isso o Maple fornecerá uma mensagem de erro.

No próximo exemplo fizemos uma montagem usando os comandos cone e sphere .

> icecream := cone([0,0,-1],0.7,color=gold), sphere([0,0,0.1],0.6,color=brown):
display(icecream, scaling=constrained, orientation=[35,65]);

>

> c1:=cone([0,0,0],1,1,style=patchnogrid):
c2:=cylinder([0,0,1],1,1,style=patchnogrid):
c3:=translate(rotate(c1,0,Pi,0),0,0,3):
display(c1,c2,c3,scaling=constrained,orientation=[45,75],axes=boxed,lightmodel=light2);

>

>