$$$$ ARGU NOTICE OF166741 25/09/02 21:15:02 12347 DATE 25/09/02 Directive ARGUMENT Voir aussi : DEBP FINP ------------------ RESP QUIT DEBM FINM ARGUMENT OBJET1?TYP1 ... OBJETi?TYPi ... ; Objet : _______ La directive 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 places 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 : 'ENTIER ' 'MOT ' 'FLOTTANT' 'LOGIQUE ' 'LISTENTI' 'LISTMOTS' 'LISTREEL' 'LISTOBJE' 'LISTCHPO' 'EVOLUTIO' 'NUAGE ' 'TABLE ' 'MAILLAGE' 'POINT ' 'CONFIGUR' 'DEFORME ' 'TEXTE ' 'PROCEDUR' 'RIGIDITE' 'SUPERELE' 'CHPOINT ' 'MMODEL ' 'MCHAML ' 'CHARGEME' 'VECTEUR ' 'MATRIK ' 'SOLUTION' 'BASEMODA' 'ATTACHE ' 'BLOQSTRU' 'ELEMSTRU' 'STRUCTUR' 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