% ----------------------------------
% int_novec.m
% integration using quadrature
%       non-vectorized version 
% ----------------------------------
clear all;close all;
format long;
tic
int=quad(@(x)(exp(-x.^2).*sin(x)),0,2*pi,1e-10);
toc
diff=int-0.42443638350202229589; 
disp(['diff to exact ',num2str(diff)])