Télécharger puchel.eso

Retour à la liste

puchel
C PUCHEL    SOURCE    CB215821  20/11/04    21:20:43     10766          
      SUBROUTINE PUCHEL(IPCHE1,IPU,IPCHPU,IRET)
*_______________________________________________________________________
*CB215821 : Plus valide ==> Utiliser OPOBJE (OPCHE1 a la place)
*_______________________________________________________________________
*
      IMPLICIT INTEGER(I-N)
      IMPLICIT REAL*8(A-H,O-Z)
 
-INC PPARAM
-INC CCOPTIO
 
      CALL ERREUR(5)
 
      RETURN
      END
 
 

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