clear
h=@(x)(tan(x)).^2.*exp(x);
vastusS=quadv(h,-2,2) %vastus Simpsoni valemiga
%vektorid
x=-2:1e-4:2;
y=h(x);
vastusT=trapz(x,y)