Konformikuvauksia

>	with(plots):

>	#?conformal

>	conformal(z,z=-2..2+2*I);conformal(z^2,z=-2..2+2*I);

>	restart: with(plots):

Warning, the name changecoords has been redefined

>

z:=x+I*y:

>	setoptions3d(orientation=[-114,36],axes=box):

>	#ztaso:=plot3d(-1,x=-1..1,y=-1..1,color=argument(z),grid=[21,21]):

>	#absz2pinta:=plot3d(abs(z^2),x=-1..1,y=-1..1,color=argument(z^2),grid=[21,21]):

>	#argz2pinta:=plot3d(argument(z^2),x=-1..1,y=-1..1,color=abs(z^2),grid=[21,21]):

>	#display3d(ztaso,absz2pinta,axes=box);display3d(ztaso,argz2pinta,axes=box,orientation=[-114,36]);

>	#display3d(ztaso);

>	conformal(z,z=-5-0.9*Pi*I..2+0.9*Pi*I);conformal(exp(z),z=-5-0.9*Pi*I..2+0.9*Pi*I,scaling=constrained);

>

>	ztaso:=plot3d(0,x=-1..1,y=-1..1,color=argument(z),grid=[21,21]): x:='x':y:='y':z:=x+I*y:

>	expz:=plot3d(abs(exp(z)),x=-5..2,y=-2*Pi..2*Pi,color=argument(exp(z)),grid=[21,21]):

>

>	display3d(ztaso);display3d(expz,axes=BOXED,style=PATCH,labels=["Re(z)","Im(z)","|exp(z)| "]);

>