% rysowanie wykresu funkcji (wbudowanej w system) sinus
fplot(@sin, [-13, 2])
grid on

% rysowanie wykresu funkcji zadanej w pliku mojaf.m
fplot(@mojaf, [-13, 2])
grid on

% uruchomienie napisanej przez nas na zajeciach iteracji Newtona
rozw = newton(@sin, @cos, 1.5, 1e-6)

% zwiekszenie precyzji wyswietlanych przez system wynikow
% (dzialania sa zawsze prowadzone w tej samej, podwojnej precyzji)
format long e

% uruchomienie napisanej przez nas na zajeciach iteracji Newtona dla funkcji
% zadanej w pliku mojaf.m, o pochodnej zadanej w pliku mojaf.m
rozw = newton(@mojaf, @mojadf, 1.5, 1e-6)

% rozwiazanie 
%	mojaf(x) = 0 
% z wykorzystaniem wbudowanej funkcji MATLABa/Octave
rozw = fzero(@mojaf, 1.5, 1e-6)

% wiecej testow bylo na zajeciach...
