XXX=LIRE_MAILLAGE()
XX=LIRE_MAILLAGE()
INCLUDE(UNITE=24)