clear
f=@(x)(tan(x))^2*exp(x);
%Simpsoni valem
vastussimpson=quadv(f,-2,2)

%trapetsvalemiga
xvork=-2:0.00001:2; %NB! Sammu pikkus on oluline!
g=@(x)(tan(x)).^2.*exp(x); %NB! Tehted on vektoritega!
y=g(xvork);
vastustrapets=trapz(xvork,y)