let coeff_excursion_vibrato = ( float frequence_d_echantillonnage ) *. 0.00898842822301309206