% tehtävä 1,
% piirretään joitain käppyröitä phi:n avulla
function y = teht1()

a = 5;
b = 17;

xs = linspace(a,b);
xsnorm = phinv(xs, a, b); % xsnorm=linspace(0,1)

hold on

% legendrejä sinisellä
for i = 2:6
    L = lege01(i,0);
    plot(xs, polyval(L,xsnorm), 'b');
end

% bernstein punaisella
for i = 1:5
    B = bernstein(4,i,0);
    plot(xs, polyval(B, xsnorm), 'r');
end


y = 0;