Télécharger debp.notice

Retour à la liste

Afficher cette notice en

Numérotation des lignes :
$$$$ DEBP     NOTICE  CHAT      11/09/12    21:15:45     7124           
                                             DATE     11/09/12

    Operateur DEBPROC                        Voir aussi : FINP ARGU
    -----------------                                     RESP  QUIT  
    DEBPROC   PROC1 (OBJ1?TYP1  OBJ2?TYP2  .... ) ;


    Objet :
    -------

    L'operateur DEBPROC cree un objet de type PROCEDUR qui contient une
suite d'instructions elementaires, dont la premiere est DEBPROC et la
derniere est FINPROC.

    Commentaire :
    -------------

    La procedure peut avoir une liste d'arguments types (OBJ1,OBJ2,...).
? peut prendre deux valeurs :

            *  qui rend la donnee de l'argument obligatoire au
               moment de l'appel de la procedure,

            /  qui la rend facultative.

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  '
  
    Il faut bien noter qu'en presence de plusieurs arguments
de Meme type seul l'ordre permet de les differencier.

    Remarques :
    -----------

    Une procedure a acces a tous les objets existants avant son
 appel mais ne peut pas les modifier. Tout objet dont le nom
 commence par ! ne sera pas initialise par un objet de meme nom
 defini en dehors de la procedure.

    Les objets crees lors de l'execution d'une procedure ne sont pas
accessibles a l'exterieur de la procedure.



    Exemple de procedure de calcul de la fonction MODULO :
    ------------------------------------------------------

                  DEBPROC  MODULO   I*ENTIER  J*ENTIER ;
                  MODERR='$$$$$';
                  SI (J EGA 0) :
                  MESSAGE  ' ON NE PEUT FAIRE I MODULO ZERO ';
                  RESPRO MODERR;
                  QUITTER MODULO ; FINSI;
                  K*ENTIER = I / J ;
                  MOD = I - ( K * J ) ;
                  FINPROC MOD;

    Exemple d'emploi de la procedure MODULO :
    -----------------------------------------


                  K = 8  MODULO 3 ;
                  SI ( K NEG 2 ) ;
                  MESSAGE ' ERREUR DANS LA RECOPIE DE L EXEMPLE |' ;
                  FINSI;


 

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