clear %vahemälu puhtaks
%joonis alglähendite leidmiseks
ezplot('20*x^2-1+2*x^3-4*y^3',[-2,4,-2,5])
hold on
h=ezplot('2*x^3-3*y^2+5-10*y',[-2,4,-2,5])
set(h,'color','r')
grid on
title('Joonis alglähendite leidmiseks')
xlabel('x')
ylabel('y')

%Joontel on 3 lõikepunkti => süsteemil on 3 reaalset lahendit
%Loeme jooniselt lõikepunktide koordinaadid alglähenditeks
%Meile sobib (-0.2,0.5) ja (0.2,0.5) ja (3.7,4.5)

%defineerime funktsioonidest vektori, kus argumendiks on ka vektor
%z=(z(1),z(2)), kus z(1)=x ja z(2)=y

F=@(z)[20*z(1)^2-1+2*z(1)^3-4*z(2)^3,10*z(2)-5-2*z(1)^3+3*z(2)^2];

lahend1=fsolve(F,[-0.2,0.5])
lahend2=fsolve(F,[0.2,0.5])
lahend3=fsolve(F,[3.7,4.5])
