Télécharger page.eso
Retour à la liste
page C PAGE SOURCE CHAT 05/01/13 02:08:43 5004 SUBROUTINE PAGE IMPLICIT INTEGER(I-N) -INC PPARAM-INC CCOPTIO WRITE (IOIMP,1) 1 FORMAT (10(130(1H*)/)////) CALL GIBI WRITE(IOIMP,2) 2 FORMAT(////) WRITE(IOIMP,1) RETURN END
C PAGE SOURCE CHAT 05/01/13 02:08:43 5004 SUBROUTINE PAGE IMPLICIT INTEGER(I-N) -INC PPARAM-INC CCOPTIO WRITE (IOIMP,1) 1 FORMAT (10(130(1H*)/)////) CALL GIBI WRITE(IOIMP,2) 2 FORMAT(////) WRITE(IOIMP,1) RETURN END
© Cast3M 2003 - Tous droits réservés. Mentions légales
