let ecrire_sortie monoutchanel machaine = 
        output monoutchanel machaine 0 (String.length machaine);
        flush monoutchanel