File:Complex numbers addition.png

function main ()

% set up the plotting window
thickness=2.5; fs=30; d=0.004;
red=[1, 0, 0]; green=[0, 1, 0]; blue=[0, 0, 1];
figure(1); clf; hold on; axis equal; axis off; 
i=sqrt(-1);

z1=0; z2=1+0.2*i; z3=0.4+1.2*i;
plot_seg(z1, z2, red, thickness); 
plot_seg(z2, z3, green, thickness);
plot_seg(z3, z1, blue, thickness);

pt (z1, fs, 5, d, '0'); 
pt (z2, fs, 7, d, 'A');
pt (z3, fs, 3, d, 'B');
pt (z2+z3, fs, 1, d, 'X');

t=z2;
z1=z2+z3; z2=z3; z3=t;
plot_seg(z1, z2, red, thickness);
plot_seg(z2, z3, green, thickness);
plot_seg(z3, z1, blue, thickness);

saveas(gcf, 'Complex_numbers_addition.eps', 'psc2')
% convert from eps to png with shell command 
% convert -antialias -density 400 -scale 20% Complex_numbers_addition.eps Complex_numbers_addition.png

function plot_seg(z1, z2, color, thickness);
  plot( [real(z1), real(z2)], [imag(z1), imag(z2)], 'color', color, 'linewidth', thickness );

function pt (z, fs, pos, d, tx)
 p=cos(pi/4)+sqrt(-1)*sin(pi/4);
 z = z + p^pos * d * fs; 
 shiftx=0.0003;
 shifty=0.002;
 x = real (z); y=imag(z); 
 H=text(x+shiftx*fs, y+shifty*fs, tx); set(H, 'fontsize', fs, 'HorizontalAlignment', 'c', 'VerticalAlignment', 'c')