* fichier : evol_manu.dgibi

*******************************************
* Section : Langage Base
*******************************************

************************************************************************
*                             PRESENTATION                             *
************************************************************************
* Ce cas-test permet de tester 
*  1- le bon fonctionnement des differentes combinaisons de l'operateur
*     'EVOL' avec l'option 'MANU'
*  2- le bon fonctionnement de l'operateur 'LIST' de ces combisaisons
*  3- le bon fonctionnement de l'operateur 'DESS' de ces combisaisons
*               
* Creation : 09/03/2016
* Createur : C. BERTHINIER
*
* Modifications :
* IDENTIFI JJ/MM/AAAA : ...
*
************************************************************************

 OPTI TRAC 'PSC';

* Fabrication des differentes listes : LISTMOTS, LISTREEL, LISTENTI
LMO1 = MOTS 'row ' ' =  ' 'Curv' 'absc' ;
LMO2 = MOTS 'row ' ' =  ' 'Curv' 'ordi' ;

LRE1 = PROG 1. 2. 3.  4. ;
LRE2 = PROG 1. 4. 9. 16. ;

LEN1 = LECT 5  6  7  8 ;
LEN2 = LECT 9 10 11 12 ;

* Fabrication des 9 combinaisons d'EVOLUTIO possibles
EV11 = 'EVOL' 'MANU' LMO1 LMO2;
EV12 = 'EVOL' 'MANU' LMO1 LRE1;
EV13 = 'EVOL' 'MANU' LMO1 LEN1;

EV21 = 'EVOL' 'MANU' LRE1 LMO2;
EV22 = 'EVOL' 'MANU' LRE1 LRE2;
EV23 = 'EVOL' 'MANU' LRE1 LEN1;


EV31 = 'EVOL' 'MANU' LEN1 LMO2;
EV32 = 'EVOL' 'MANU' LEN1 LRE2;
EV33 = 'EVOL' 'MANU' LEN1 LEN2;

EVTOT = EV11 ET EV12 ET EV13 ET 
        EV21 ET EV22 ET EV23 ET 
        EV31 ET EV32 ET EV33   ;

LIST EVTOT;
DESS EVTOT;
FIN;