Télécharger crepro.eso

Retour à la liste

Numérotation des lignes :

  1. C CREPRO SOURCE PV 14/11/05 21:15:03 8198
  2. C CONVERTIT UN FLOTTANT EN LISTREEL LE CONTENANT
  3. C
  4. SUBROUTINE CREPRO(XFLOT,MLREEL)
  5. IMPLICIT INTEGER(I-N)
  6. REAL*8 XFLOT
  7. -INC SMLREEL
  8. JG=1
  9. SEGINI, MLREEL
  10. PROG(1)=XFLOT
  11. RETURN
  12. END
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  

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