Télécharger page.eso

Retour à la liste

Numérotation des lignes :

  1. C PAGE SOURCE CHAT 05/01/13 02:08:43 5004
  2. SUBROUTINE PAGE
  3. IMPLICIT INTEGER(I-N)
  4. -INC CCOPTIO
  5. WRITE (IOIMP,1)
  6. 1 FORMAT (10(130(1H*)/)////)
  7. CALL GIBI
  8. WRITE(IOIMP,2)
  9. 2 FORMAT(////)
  10. WRITE(IOIMP,1)
  11. RETURN
  12. END
  13.  
  14.  

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