Télécharger fobess.eso

Retour à la liste

Numérotation des lignes :

fobess
  1. C FOBESS SOURCE CB215821 23/10/18 21:15:04 11760
  2. SUBROUTINE FOBESS
  3.  
  4. IMPLICIT INTEGER(I-N)
  5. IMPLICIT REAL*8 (A-H,O-Z)
  6. C
  7. C Ancien OPERATEUR FONC
  8. C CAS 'BESSEL'
  9. C CALCUL DES FONCTIONS DE BESSEL J0 J1 Y0 Y1
  10. C
  11. C E. DE LANGRE
  12. C
  13. C C. BERTHINIER 17/10/23 SOURCE Obsolete (voir operateur BESS)
  14. C
  15.  
  16. -INC PPARAM
  17. -INC CCOPTIO
  18.  
  19. MOTERR='FOBESS'
  20. CALL ERREUR(1039)
  21. RETURN
  22.  
  23. END
  24.  
  25.  

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