Télécharger S4MED.INC

Retour à la liste

Numérotation des lignes :

  1. C-INC S4MED
  2. C INCLUDE CONTENANT DES DECLARATIONS ASSOCIEES AU FORMAT MED
  3. C ENTIERS INTEGER*4 - INTERFACE MED 32B
  4.  
  5. CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
  6. C Identifiant du fichier au format MED
  7. CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
  8. c#MED3 C Attention en MED 3.X MFID est en INTEGER*4
  9. c#MED3 INTEGER*4 MFID
  10. C Attention en MED 4.0.X et 4.1.0 MFID est en INTEGER*8
  11. C ==> Je le lis en REAL*8 pour avoir la bonne taille !
  12. REAL*8 MFID
  13.  
  14. CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
  15. C Autres declarations
  16. CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
  17. C Varaible mcret pour Med_Code_RETour
  18. INTEGER*4 mcret
  19.  
  20. INTEGER*4 major
  21. INTEGER*4 minor
  22. INTEGER*4 mrele
  23.  
  24. INTEGER*4 macces
  25.  
  26. INTEGER*4 msdim
  27. INTEGER*4 mmdim
  28.  
  29. INTEGER*4 mmtype
  30. INTEGER*4 mstype
  31. INTEGER*4 matype
  32. INTEGER*4 mftype
  33. INTEGER*4 metype
  34. INTEGER*4 mgtype
  35. INTEGER*4 mdtype
  36. INTEGER*4 mchgt
  37. INTEGER*4 mtsf
  38. INTEGER*4 mswm
  39. INTEGER*4 mpsize
  40. INTEGER*4 mcs
  41.  
  42. INTEGER*4 lmesh
  43. INTEGER*4 numdt
  44. INTEGER*4 numit
  45. INTEGER*4 nstep
  46. INTEGER*4 mfnum
  47. INTEGER*4 mcmode
  48. INTEGER*4 n4, nval
  49. INTEGER*4 mdval
  50. INTEGER*4 it,it1
  51.  
  52.  

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