


% bilda en kvadrat
x=0:.01:1;
y=i*x;
k=[x y+1 fliplr(x)+i fliplr(y)];
clear y
% nu en enhetscirkel
z=exp(2*pi*i*x);
% och en kvartscirkel
q=[x exp(pi*i*x/2) i*fliplr(x)];
q=2*q;
clear x
