Télécharger SMMED.INC

Retour à la liste

Numérotation des lignes :

  1. * -INC SMMED
  2. *
  3. * INCLUDE CONTENANT DES SEGMENTS UTILES AU FORMAT MED 4
  4. *
  5.  
  6. C---- Donnees pour CHPOINT et MCHAML
  7. SEGMENT IFOCHA
  8. INTEGER NBENTI
  9. CHARACTER*(MED_NAME_SIZE) NOCHAP(nbmspo)
  10. INTEGER PNUMDT(nbmspo)
  11. INTEGER LICHAP(nbmspo)
  12. INTEGER LIMAIL(nbmspo)
  13. INTEGER ISUPOR(nbmspo,2)
  14. REAL*8 XTEMPS(nbmspo)
  15.  
  16. C MED_NAME_SIZE : voir CCMED.INC
  17. C NBENTI : nombre de champs a sortir reellement
  18. C nbmspo : dimensionnement du SEGMENT (superieur ou egal a NBENTI)
  19. C NOCHAP : nom du champ a produire
  20. C PNUMDT : numero de pas de temps (numdt)
  21. C LICHAP : liste de pointeurs MSOUPO ou MCHAML
  22. C LIMAIL : liste de pointeurs MELEME
  23. C ISUPOR : type de support (0,1) : Non-Defini (CHPOINT)
  24. C (1,1) : NOEUDS
  25. C (2,1) : GRAVITE
  26. C (N,1) : Non-prevu encore
  27. C (.,2) : Pointeur sur un MINTE (SEGMENT d'INTEGRATION)
  28. C XTEMPS : Valeur du temps pour ce pas de temps
  29. ENDSEGMENT
  30. POINTEUR LISCHP.IFOCHA,LISCHA.IFOCHA
  31.  

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