Télécharger argu.notice

Retour à la liste thématique

Afficher cette notice en

Numérotation des lignes :
   1 : $$$$ ARGU     NOTICE  JC220346  12/09/05    21:15:02     7494           
   2 :                                              DATE     12/09/05
   3 : 
   4 :   Operateur ARGUMENT                       Voir aussi : DEBP FINP
   5 :     ------------------                                    QUIT  RESP  
   6 :                                                           DEBM  FINM  
   7 :     ARGUMENT  OBJET1?TYP1  OBJET2?TYP2  .....;
   8 : 
   9 : 
  10 : 
  11 :     Objet :
  12 :     _______
  13 : 
  14 :     L'operateur ARGUMENT permet de lire des arguments OBJETi, de type
  15 :     TYPi, depuis l'interieur d'une procedure.
  16 : 
  17 :     Pour des raisons de performances, il est preferable de recuperer
  18 :     les arguments directement dans DEBPROC quand c'est possible.
  19 : 
  20 : 
  21 :     Commentaire :
  22 :     _____________
  23 : 
  24 :     L'ensemble ?TYPi est facultatif. S'il est omis, ARGU essaie de
  25 :     recuperer un objet de n'importe quel type.
  26 : 
  27 :     Le caractere ? vaut :
  28 : 
  29 :     - soit *  si la lecture est imperative
  30 :     - soit /  sinon
  31 : 
  32 :     Les types d'objet possibles sont:
  33 : 
  34 :         'MAILLAGE'     'AFFECTE '    'DEFORME '
  35 :         'CHPOINT '     'CHAMELEM'    'LISTREEL'
  36 :         'RIGIDITE'     'BLOQSTRU'    'LISTENTI'
  37 :         'ELEMSTRU'     'SOLUTION'    'CHARGEME'
  38 :         'STRUCTUR'     'TABLE   '    'MODELE  '
  39 :         'MAFFEC  '     'MSOSTU  '    'EVOLUTIO'
  40 :         'IMATRI  '     'MJONCT  '    'SUPERELE'
  41 :         'ATTACHE '     'MMATRI  '    'LOGIQUE '
  42 :         'FLOTTANT'     'ENTIER  '    'MOT     '
  43 :         'TEXTE   '     'LISTMOTS'    'VECTEUR '
  44 :         'VECTDOUB'     'POINT   '    'CONFIGUR'
  45 :         'LISTCHPO'     'BASEMODA'    'PROCEDUR'
  46 :         'BLOC    '     'MMODEL  '    'MCHAML  '
  47 :         'MINTE   '     'NUAGE   '    'MATRIK  '
  48 : 
  49 : 
  50 :     Exemple :
  51 :     _________
  52 : 
  53 :     Procedure faisant l'addition de n entiers avec n plus grand ou
  54 :     egal a 2.
  55 : 
  56 : 
  57 :              DEBP ADDI ;
  58 :              ARGU  I*ENTIER  J*ENTIER  ;
  59 :              K = I + J ;
  60 :              REPETER NFOI;
  61 :              ARGU L/ENTIER;
  62 :              SI ( EXISTE L) ;
  63 :              K = K + L ;
  64 :              SINON;
  65 :              QUITTER NFOI;
  66 :              FINSI;
  67 :              FIN NFOI;
  68 :              FINPROC K;
  69 :              X = ADDI 2 5  4;
  70 : 

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