% Main B: discontinuità derivata, derivata analitica
g = @(x) abs( cos(x) ) ;
f = @d_abs_cos ;

x_ab = trova_discontinuita( f , [0 2*pi] ) ;
n_discontinuita = size( x_ab , 2 ) ;
x_discontinuita = zeros(1, n_discontinuita) ;
for i = 1 : n_discontinuita
  ab    = x_ab(:,i) ;
  f_ab  = f( ab ) ;
  f_mid = sum( f_ab ) / 2 ;
  g = @(x) f(x) - f_mid ;
  tol_x = 1e-6 ;
  x_discontinuita(i) = metodo_bisezione(g, ab, tol_x) ;
end