Télécharger TMTRAV.INC

Retour à la liste

Numérotation des lignes :

  1. * -INC TMTRAV
  2. *
  3. *SEGMENT DE TRAVAIL POUR CREER UN CHAMP PAR POINT
  4. *
  5. SEGMENT MTRAV
  6. CHARACTER*4 INCO(NNIN)
  7. REAL*8 BB(NNIN,NNNOE)
  8. INTEGER IBIN(NNIN,NNNOE),IGEO(NNNOE),NHAR(NNIN)
  9. ENDSEGMENT
  10. *
  11. * ******** INCO(NNIN) CONTIENT LE NOMS DES NNIN INCONNUES DIFFERENTES.
  12. *
  13. * ******** BB(I,J) EST LA VALEUR DE LA IEME INCONNUE DU CHAMP POUR
  14. * ******** LE JEME NOEUD DU TABLEAU IGEO.
  15. *
  16. * ******** IBIN(I,J)=1 OU 0. 1 INDIQUE QUE LA I EME INCONNUE DU CHAMP
  17. * ******** EXISTE POUR LE J EME NOEUD DU TABLEAU IGEO.
  18. *
  19. * ******** IGEO(I) EST LE NUMERO A METTRE DANS UN OBJET MELEME POUR
  20. * ******** REFERENCER LE IEME NOEUD
  21. *
  22. * ******** NHAR(I) EST LE NUMERO D'HARMONIQUE SI CALCUL AXI OU
  23. * ******** SIGNIFIE CONTRAINTE PLANE,DEFORMATION PLANE OU DEF PLAN GEN
  24. *
  25.  

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