!set exolist  =!char 1 to -2 of quad,cest,quad2,cest2,triang,
!set titlelist=!char 1 to -2 of Vocabulaire 1 des quadrilatres,Vocabulaire 1 des segments; droites...,Vocabulaire 2 des quadrilatres.,Vocabulaire 2 des segments; droites...,Vocabulaire des triangles.,
!set exototal =!itemcnt $exolist

