* -INC SMNUAGE * * OBJET DE TYPE 'NUAGE' * SEGMENT MNUAGE CHARACTER*8 NUANOM(NVAR) CHARACTER*8 NUATYP(NVAR) INTEGER NUAPOI(NVAR) ENDSEGMENT SEGMENT NUAVIN INTEGER NUAINT(NBCOUP) ENDSEGMENT SEGMENT NUAVFL REAL*8 NUAFLO(NBCOUP) ENDSEGMENT SEGMENT NUAVMO CHARACTER*8 NUAMOT(NBCOUP) ENDSEGMENT SEGMENT NUAVLO LOGICAL NUALOG(NBCOUP) ENDSEGMENT POINTEUR MNUAG1.MNUAGE,MNUAG2.MNUAGE,MNUAG3.MNUAGE POINTEUR NUAVI1.NUAVIN,NUAVI2.NUAVIN,NUAVI3.NUAVIN POINTEUR NUAVF1.NUAVFL,NUAVF2.NUAVFL,NUAVF3.NUAVFL POINTEUR NUAVL1.NUAVLO,NUAVL2.NUAVLO,NUAVL3.NUAVLO POINTEUR NUAVM1.NUAVMO,NUAVM2.NUAVMO,NUAVM3.NUAVMO * * NVAR : NOMBRE DE VARIABLES * NBCOUP : NOMBRE DE POINTS * NUANOM : TABLEAU DES NOMS DES VARIABLES * NUATYP : TABLEAU DES TYPES DES VARIABLES * NUAPOI : TABLEAU DE POINTEUR VERS NUAVIN OU NUAVFL OU NUAVMO * NUAVAR : TABLEAU DE POINTEURS SUR LES VARIABLES * NUAFLO : TABLEAU DES VALEURS SI FLOTTANT * NUAMOT : TABLEAU DES VALEURS SI MOT *