1 91000 format('.. aretes de',i10,' a',i10)
2 92000 format('.. triangles de',i10,' a',i10)
3 93000 format('.. tetraedres de',i10,' a',i10)
4 94000 format('.. quadrangles de',i10,' a',i10)
5 95000 format('.. pyramides de',i10,' a',i10)
6 96000 format('.. hexaedres de',i10,' a',i10)
7 97000 format('.. pentaedres de',i10,' a',i10)
8 98000 format('.. noeuds de',i10,' a',i10)
9 91001 format('.. arete',i2,' :',i10,', etat =',i10)
10 91002 format('.. arete',i2,' :',i10,', de',i10,' a',i10,', etat =',i10)