2 c maxtab = nombre maximum de tableaux elementaires geres
3 c dans chaque categorie
4 c maxtrs = nombre maximum de trous.
6 c le nombre de trous ne peut pas depasser le nombre de tableaux + 1.
7 c l'initialiser a maxtab + 2 assure, dans les sous-programmes de
8 c desallocation, que l'on peut toujours calculer
9 c ntrou (r,i,d,s ou c) + 1
11 integer maxtab , maxtrs
12 parameter (maxtab=1000,maxtrs=maxtab+2)