Untitled (2)

>    restart;

>    with(plots):

Warning, the name changecoords has been redefined

>    p1:=plot3d([1,theta+rho,rho],theta=0..Pi/3,rho=0..Pi,coords=spherical,scaling=constrained,color=green,grid=[21,21]):

>    p2:=plot3d([1,theta+rho,rho],theta=Pi/3..2*Pi/3,rho=0..Pi,coords=spherical,scaling=constrained,color=blue,grid=[21,21]):

>    p3:=plot3d([1,theta+rho,rho],theta=2*Pi/3..Pi,rho=0..Pi,coords=spherical,scaling=constrained,color=yellow,grid=[21,21]):

>    p4:=plot3d([1,theta+rho,rho],theta=Pi..4*Pi/3,rho=0..Pi,coords=spherical,scaling=constrained,color=red,grid=[21,21]):

>    p5:=plot3d([1,theta+rho,rho],theta=4*Pi/3..5*Pi/3,rho=0..Pi,coords=spherical,scaling=constrained,color=orange,grid=[21,21]):

>    p6:=plot3d([1,theta+rho,rho],theta=5*Pi/3..2*Pi,rho=0..Pi,coords=spherical,scaling=constrained,color=pink,grid=[21,21]):

>    display(p1,p2,p3,p4,p5,p6);

[Maple Plot]

>   

>