%Joonis alglähendite leidmiseks
ezplot('x-0.8*x^2+1.5*y',[-3,3,-1,4])
hold on
grid on
h=ezplot('x-1+y-sin(x-y)',[-3,3,-1,4])
set(h,'color','r')
title('Joonis alglähendite leidmiseks')
legend('x-0.8*x^2+1.5*y=0', 'x-1+y-sin(x-y)=0')
%Jooniselt näeme, et joontel on 4 lõikepunkti. Nende koordinaadid sobivadki
%alglähenditeks. Valime ligikaudu (-2;3.5) ja (-1;1.2) ja (-0.7;0.75) ning
%(1.5;0.3).

%Defineerime vektorfunktsiooni võrrandisüsteemi vasakutest pooltest, kus
%x=z(1) ja y=z(2)
G=@(z)[z(1)-0.8*z(1)^2+1.5*z(2),z(1)-1+z(2)-sin(z(1)-z(2))];
lahend1=fsolve(G,[-2,3.5])
%kontroll1=G(lahend1)
lahend2=fsolve(G,[-1,1.2])
lahend3=fsolve(G,[-0.7,0.75])
lahend4=fsolve(G,[1.5,3])