! ! $Header$ ! ! ! gestion des impressions de sorties et de débogage ! lunout: unité du fichier dans lequel se font les sorties ! (par defaut 6, la sortie standard) ! prt_level: niveau d'impression souhaité (0 = minimum) ! INTEGER lunout, prt_level COMMON /comprint/ lunout, prt_level