*
*  -INC SMEVOLL
*
      SEGMENT MEVOLL
       CHARACTER*8  ITYEVO
       CHARACTER*72 IEVTEX='SANS TITRE'
       INTEGER      IEVOLL(N)
      ENDSEGMENT
       POINTEUR MEVOL1.MEVOLL,MEVOL2.MEVOLL
*
      SEGMENT KEVOLL
       INTEGER IPROGX,IPROGY,NUMEVX
       INTEGER LSTYL=1
       INTEGER MMARQ=0
       INTEGER KTAIL=3
       CHARACTER*4  NUMEVY
       CHARACTER*8  TYPX,TYPY
       CHARACTER*12 NOMEVX,NOMEVY
       CHARACTER*72 KEVTEX
      ENDSEGMENT
       POINTEUR KEVOL1.KEVOLL,KEVOL2.KEVOLL
*
*  OBJET DE TYPE 'EVOLUTIO'
*  ITYEVO : SOUS-TYPE  REEL     , COMPLEXE  ( 2 COURBES ) ...
*  IEVTEX : TITRE DE L'ENSEMBLE DES COURBES
*  IEVOLL : POINTEUR SUR LE SEGMENT KEVOLL
*
*  IPROGX : POINTEUR SUR UN SEGMENT DE TYPE TYPX (ABSCISSES)
*  IPROGY : POINTEUR SUR UN SEGMENT DE TYPE TYPY (ORDONNEES)
*  NUMEVX : COULEUR DE LA COURBE
*  NUMEVY : TYPE DE LA COURBE : 'REEL' 'MODU' 'PHAS' 'PREE' 'PIMA' ...
*
*  NOMEVX : NOM AFFECTE AUX ABSCISSES
*  NOMEVY : NOM AFFECTE AUX ORDONNEES
*  KEVTEX : TITRE DE LA COURBE
*
*  LSTYL  : STYLE DE LA COURBE 
*  MMARQ  : MARQUES SUR LA COURBE
*  KTAIL  : TAILLE DES MARQUES
*