Télécharger gint2.eso

Retour à la liste

Numérotation des lignes :

  1. C GINT2 SOURCE CHAT 05/01/13 00:18:22 5004
  2. SUBROUTINE GINT2
  3. IMPLICIT INTEGER(I-N)
  4. -INC CCOPTIO
  5. * -INC CCGIB
  6. C Quand IERR ou unit change
  7. C mise @ jour var gibiane
  8. IERR1=IERR
  9. IOLEC1=IOLEC
  10. IOIMP1=IOIMP
  11. IIMPI1=IIMPI
  12. IECHO1=IECHO
  13. RETURN
  14. END
  15.  
  16.  

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