Télécharger crlchp.eso

Retour à la liste

Numérotation des lignes :

  1. C CRLCHP SOURCE MAUGIS 07/10/26 21:15:19 5812
  2. C CONVERTIT UN CHPOINT EN LISTCHPO LE CONTENANT
  3. C
  4. SUBROUTINE CRLCHP (IVAL)
  5. IMPLICIT INTEGER(I-N)
  6. -INC SMLCHPO
  7.  
  8. N1=1
  9. SEGINI, MLCHPO
  10. ICHPOI(1)=IVAL
  11. IVAL=MLCHPO
  12. RETURN
  13. END
  14.  
  15.  
  16.  
  17.  
  18.  

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