!set exolist  =!char 1 to -2 of courbgrad,gradient,gradient2,pente,
!set titlelist=!char 1 to -2 of Courbes paramtres et gradient,Gradient I,Gradient II,Pente et gradient,
!set exototal =!itemcnt $exolist

