Télécharger extrevoletiq.dgibi

Retour à la liste

Numérotation des lignes :

  1. * fichier : extrevoletiq.dgibi
  2. ************************************************************************
  3. ************************************************************************
  4. *----------------------------------------------------------------------*
  5. * Test elementaire : EV2 = 'EXTR' EV1 'COUR' MOT1 ; *
  6. * MOT1 = Nom etiquette d'une des listes d'abscisses ou d'ordonnees. *
  7. *----------------------------------------------------------------------*
  8. * *
  9. 'OPTI' 'ECHO' 0 ;
  10. LX1 = 'PROG' 0. 1. ;
  11. LY1 = 'PROG' 0. 2. ;
  12. EV1 = 'EVOL' 'MANU' 'X' LX1 'Y' LY1 ;
  13. EV2 = 'EVOL' 'MANU' 'X' LX1 'Z' (2. * LY1) ;
  14. EV3 = 'EVOL' 'MANU' 'X' LX1 'W' (2. * LY1) ;
  15. EV0 = EV1 ET EV2 ET EV3 ;
  16. * *
  17. EVX = 'EXTR' EV0 'COUR' 'Y' ;
  18. LXX = 'EXTR' EVX 'ABSC' ;
  19. LYX = 'EXTR' EVX 'ORDO' ;
  20. 'SI' (('NEG' LX1 LXX) 'OU' ('NEG' LY1 LYX));
  21. 'ERRE' 5 ;
  22. 'FINS' ;
  23. 'FIN' ;
  24.  
  25.  
  26.  
  27.  
  28.  

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