let sin_vc = sin ( facteur_pulsation *. 412. /. 60. )