Télécharger argu.notice

Retour à la liste

Afficher cette notice en

Numérotation des lignes :
$$$$ ARGU     NOTICE  PASCAL    22/06/29    21:15:01     11396          
                                             DATE     22/06/29

    Operateur ARGUMENT                       Voir aussi : DEBP FINP
    ------------------                                    QUIT  RESP  
                                                          DEBM  FINM  
    ARGUMENT  OBJET1?TYP1  OBJET2?TYP2  .....;



    Objet :
    _______

    L'operateur ARGUMENT permet de lire des arguments OBJETi, de type
    TYPi, depuis l'interieur d'une procedure.

    Pour des raisons de performances, il est preferable de recuperer
    les arguments directement dans DEBPROC quand c'est possible.


    Commentaire :
    _____________

    L'ensemble ?TYPi est facultatif. S'il est omis, ARGU essaie de
    recuperer un objet de n'importe quel type. Les objets de type 
    inconnu doivent etre place a la fin de la liste des arguments
    a lire.

    Le caractere ? vaut :

    - soit *  si la lecture est imperative
    - soit /  sinon

    Les types d'objet possibles sont:

        'MAILLAGE'     'AFFECTE '    'DEFORME '
        'CHPOINT '     'CHAMELEM'    'LISTREEL'
        'RIGIDITE'     'BLOQSTRU'    'LISTENTI'
        'ELEMSTRU'     'SOLUTION'    'CHARGEME'
        'STRUCTUR'     'TABLE   '    'MODELE  '
        'MAFFEC  '     'MSOSTU  '    'EVOLUTIO'
        'IMATRI  '     'MJONCT  '    'SUPERELE'
        'ATTACHE '     'MMATRI  '    'LOGIQUE '
        'FLOTTANT'     'ENTIER  '    'MOT     '
        'TEXTE   '     'LISTMOTS'    'VECTEUR '
        'VECTDOUB'     'POINT   '    'CONFIGUR'
        'LISTCHPO'     'BASEMODA'    'PROCEDUR'
        'BLOC    '     'MMODEL  '    'MCHAML  '
        'MINTE   '     'NUAGE   '    'MATRIK  '
        'LISTOBJE'


    Exemple :
    _________

    Procedure faisant l'addition de n entiers avec n plus grand ou
    egal a 2.


             DEBP ADDI ;
             ARGU  I*ENTIER  J*ENTIER  ;
             K = I + J ;
             REPETER NFOI;
             ARGU L/ENTIER;
             SI ( EXISTE L) ;
             K = K + L ;
             SINON;
             QUITTER NFOI;
             FINSI;
             FIN NFOI;
             FINPROC K;
             X = ADDI 2 5  4;

© Cast3M 2003 - Tous droits réservés.
Mentions légales