Sources Esope | Cast3M

pelpo
C PELPO     SOURCE    PV        16/03/24    21:15:13     8854
C
C ===>  SOUS-PROGRAMME  PELPO   PLUS UTILISE    &lt;===
C ===>  SUBROUTINE              NO LONGER USED  &lt;===
C
      SUBROUTINE PELPO(icc,ichp,iretou)
 
      IMPLICIT INTEGER(I-N)
      IMPLICIT REAL*8(A-H,O-Z)
 
      RETURN
      END