Télécharger SMCHPOI.INC

Retour à la liste

Numérotation des lignes :

  1. * -INC SMCHPOI
  2. *
  3. * OBJET CHPOINT : REPRESENTE UN CHAMP DISCRETISE PAR POINT
  4. *
  5. SEGMENT MCHPOI
  6. CHARACTER*8 MTYPOI
  7. CHARACTER*72 MOCHDE
  8. INTEGER JATTRI(NAT)
  9. INTEGER IPCHP(NSOUPO),IFOPOI
  10. ENDSEGMENT
  11. POINTEUR MCHPO1.MCHPOI,MCHPO2.MCHPOI,MCHPO3.MCHPOI,MCHPO4.MCHPOI
  12. *
  13. SEGMENT MSOUPO
  14. CHARACTER*4 NOCOMP(NC)
  15. CHARACTER*16 NOCONS(NC)
  16. INTEGER IGEOC,IPOVAL
  17. INTEGER NOHARM(NC)
  18. ENDSEGMENT
  19. POINTEUR MSOUP1.MSOUPO,MSOUP2.MSOUPO,MSOUP3.MSOUPO,
  20. # MSOUP4.MSOUPO,MSOUP5.MSOUPO
  21. *
  22. SEGMENT MPOVAL
  23. REAL*8 VPOCHA(N,NC)
  24. ENDSEGMENT
  25. POINTEUR MPOVA1.MPOVAL,MPOVA2.MPOVAL,MPOVA3.MPOVAL,
  26. # MPOVA4.MPOVAL,MPOVA5.MPOVAL,MPOVA6.MPOVAL
  27. *
  28. * MSOUPO DECRIT UNE PARTITION DE LA GEOMETRIE
  29. *
  30. * MTYPOI : TYPE DU CHPOINT
  31. * MOCHDE : TITRE
  32. * JATTRI : ATTRIBUT DE NATURE
  33. * JATTRI(1) NATURE DIFFUSE OU DISCRETE DU CHAMP
  34. * 0: INDETERMINE 1: DIFFUS 2:DISCRET
  35. * JATTRI(2) LIBRE POUR L'INSTANT
  36. * 0: 1: 2:
  37. * IPCHP : POINTEURS SUR LES SEGMENTS MSOUPO
  38. * IFOPOI : CORRESPOND A L'OPTION IFOUR(VOIR CCOPTIO)
  39. * IGEOC : POINTEUR SUR UN OBJET MELEME
  40. * NOCOMP : NOMS DES COMPOSANTES DU CHAMP
  41. * NOCONS : NOMS DES CONSTITUANTS ASSOCIES
  42. * NOHARM : NUMERO DE L'HARMONIQUE CORRESPONDANT A LA COMPOSANTE
  43. * NOCOMP ,SI IFOPOI=1
  44. * IPOVAL : POINTEUR SUR LE SEGMENT MPOVAL
  45. * VPOCHA(I,J) : VALEUR DU CHAMP IEME POINT,JIEME COMPOSANTE
  46. *
  47. * -END INCLUDE
  48.  

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