Télécharger trac_anno.dgibi

Retour à la liste

Numérotation des lignes :

  1. OPTI 'DIME' 2 'ELEM' 'QUA4' ;
  2.  
  3. MSH = (0. 0.) DROI 5 (2. 0.) TRAN 5 (0. 2.) ;
  4. TAB1 = TABL ;
  5. * REPE K (NBEL MSH) ;
  6. * ELK = ELEM MSH &K ;
  7. * TAB1.(BARY ELK) = CHAI 'ELEMENT #' &K ;
  8. * FIN K ;
  9.  
  10. TAB1 . (-0.2 -0.2) = 'JE SUIS AU DEBUT' ;
  11. ARROW1 = COUL 'ROUG' ((-0.2 -0.2) DROI 1 (BARY (ELEM 1 MSH))) ;
  12.  
  13. TAB1 . (2.2 2.2) = 'JE SUIS A LA FIN' ;
  14. ARROW2 = COUL 'VERT' ((2.2 2.2) DROI 1 (BARY (ELEM 25 MSH))) ;
  15.  
  16.  
  17. MAILTOT = MSH ET ARROW1 ET ARROW2 ;
  18. *
  19. OPTI 'TRAC' 'PSC' ;
  20. TRAC MAILTOT 'ANNO' TAB1 ;
  21.  
  22. * OPTI 'TRAC' 'X' ;
  23. * TRAC MAILTOT 'ANNO' TAB1 'NCLK' ;
  24. *
  25. * OPTI 'TRAC' 'OPEN' ;
  26. * TRAC MAILTOT 'ANNO' TAB1 'NCLK' ;
  27.  
  28. FIN ;
  29.  
  30.  
  31.  
  32.  
  33.  
  34.  
  35.  
  36.  
  37.  

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