Télécharger CCHAMP.INC

Retour à la liste

Numérotation des lignes :

  1. * -INC CCHAMP
  2. *
  3. * STOCKE TOUS LES NOMS D ELEMENTS POSSIBLES
  4. CHARACTER*4 NOMTP
  5. COMMON /CHAMP/ NOMTP(500)
  6. COMMON/LCHAMP/ LNOMTP
  7. *
  8. * NOMIN STOCKE LA MANIERE DINTEGRER LA RIGIDITE
  9. CHARACTER*8 NOMIN
  10. COMMON /CHAMP/ NOMIN(5)
  11. COMMON/LCHAMP/ LNOMIN
  12. *
  13. * NOMFR STOCKE TOUTES LES FORMULATIONS POSSIBLES
  14. CHARACTER*8 NOMFR
  15. COMMON /CHAMP/ NOMFR(100)
  16. COMMON/LCHAMP/ LNOMFR
  17. *
  18. * NOMCH STOCKE TOUS LES NOMS DE CHAMPS POSSIBLES
  19. CHARACTER*8 NOMCH
  20. COMMON /CHAMP/ NOMCH(100)
  21. COMMON/LCHAMP/ LNOMCH
  22. *
  23. * NOMAT STOCKE TOUS LES NOMS DE MATERIAU POSSIBLES
  24. CHARACTER*8 NOMAT
  25. COMMON /CHAMP/ NOMAT(100)
  26. COMMON/LCHAMP/ LNOMAT
  27. *
  28. * NOMDD STOCKE TOUS LES NOMS D INCONNUES POSSIBLES
  29. CHARACTER*4 NOMDD
  30. COMMON /CHAMP/ NOMDD(1000)
  31. COMMON/LCHAMP/ LNOMDD
  32. *
  33. * NOMDU STOCKE TOUS LES NOMS DE FORCES POSSIBLES
  34. CHARACTER*4 NOMDU
  35. COMMON /CHAMP/ NOMDU(1000)
  36. COMMON/LCHAMP/ LNOMDU
  37. *
  38. * NOMVI STOCKE TOUS LES NOMS DE VITESSES POSSIBLES
  39. CHARACTER*4 NOMVI
  40. COMMON /CHAMP/ NOMVI(100)
  41. COMMON/LCHAMP/ LNOMVI
  42. *
  43. * NOMAC STOCKE TOUS LES NOMS D ACCELERATION POSSIBLES
  44. CHARACTER*4 NOMAC
  45. COMMON /CHAMP/ NOMAC(100)
  46. COMMON/LCHAMP/ LNOMAC
  47. *
  48. * NOMST STOCKE TOUS LES NOMS DE CONTRAINTES POSSIBLES
  49. CHARACTER*4 NOMST
  50. COMMON /CHAMP/ NOMST(100)
  51. COMMON/LCHAMP/ LNOMST
  52. *
  53. * NOMDF STOCKE TOUS LES NOMS DE DEFORMATIONS POSSIBLES
  54. CHARACTER*4 NOMDF
  55. COMMON /CHAMP/ NOMDF(100)
  56. COMMON/LCHAMP/ LNOMDF
  57. *
  58. * NOMYO STOCKE TOUTES LES COMPOSANTES DES MATERIAUX POSSIBLES
  59. CHARACTER*4 NOMYO
  60. COMMON /CHAMP/ NOMYO(200)
  61. COMMON/LCHAMP/ LNOMYO
  62. *
  63. * NOMCR STOCKE TOUTES LES CARACTERISTIQUES POSSIBLES
  64. CHARACTER*4 NOMCR
  65. COMMON /CHAMP/ NOMCR(100)
  66. COMMON/LCHAMP/ LNOMCR
  67. *
  68. * NOMHO STOCKE TOUS LES NOMS DES COEFF DE LA MATRICE DE HOOKE
  69. CHARACTER*4 NOMHO
  70. COMMON /CHAMP/ NOMHO(100)
  71. COMMON/LCHAMP/ LNOMHO
  72. *
  73. * NOMVRI STOCKE TOUS LES NOMS DES VARIABLES INTERNES
  74. CHARACTER*4 NOMVRI
  75. COMMON /CHAMP/ NOMVRI(100)
  76. COMMON/LCHAMP/ LNOVRI
  77. *
  78. * STOCKE TOUS LES COUPLES U/P POSSIBLES DANS LE CAS NAVIER_STOKES
  79. CHARACTER*4 NNAVI
  80. COMMON /CHAMP/ NNAVI(20)
  81. COMMON/LCHAMP/ LNNAVI
  82. *
  83. * COUPLE D'ELEMENT NAVIER_STOKES COURANT
  84. COMMON /LCHAMP/ILNAVI
  85.  
  86. save /champ/,/lchamp/
  87. *
  88. * -END INCLUDE
  89.  

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