%Joonis alglähendite leidmiseks
ezplot('x-0.8*x^2+1.5*y=0',[-3,2,-1,4])
hold on %jooniseaken aktiivne
h=ezplot('x-1+y-sin(x-y)=0',[-3,2,-1,4])
set(h,'color','r')
grid on %võrgustik
hold off %enam ei joonistata samasse aknasse
legend('x-0.8*x^2+1.5*y=0','x-1+y-sin(x-y)=0')
title('Joonis alglähendite leidmiseks')
%Jooniselt on näha, et joontel on 4 lõikepunkti => võrrandisüsteemil on 4
%lahendit. Valime alglähenditeks lõikepunktide koordinaadid. Meile sobivad
%(-2,3.5) ja (-1,1.2) ja (-0.75,0.75) ja (1.6,0.3).

%Defineerime võrrandisüsteemi vasakutest pooltest vektori, mille
%argumendiks on vektor z, kus z(1)=x ja z(2)=y
F=@(z)[z(1)-0.8*z(1)^2+1.5*z(2),z(1)-1+z(2)-sin(z(1)-z(2))];

%Lahendame süsteemi
lahend1=fsolve(F,[-2,3.5]) %alglähendiks on esimene lõikepunkt
lahend2=fsolve(F,[-1,1.2])
lahend3=fsolve(F,[-0.75,0.75])
lahend4=fsolve(F,[1.6,0.3])

kontroll1=F(lahend1)