function w = f1(z)
	w =  z.^2;
endfunction;

function w = f2(z)
	w =  conj(z);
endfunction;

function w = f3(z)
	w =  %i*z;
endfunction;

function vplot(x,y,f)
	z = x' * ones(y)  + ones(x)' * y * %i;
	fx = real(f(z));
	fy = imag(f(z));
	champ(x,y,fx,fy);
endfunction;

scf(0);
clf;
vplot(-5:5, -4:4, f1);
title('$f(z) = z^2$','fontsize',4);

scf(1);
clf;
vplot(-5:5, -4:4, f2);
title('$f(z) = \overline{z}$','fontsize',4);

scf(2);
clf;
vplot(-5:5, -4:4, f3);
title('$f(z) = iz$','fontsize',4);
