let demande_rappel_boutons = function (selection:select ref) ->
 selection := Rappel_boutons ;
 prerr_endline ( ( pourcent_cpu () ) ^ "rappel de reglages" )