Télécharger modpla.eso

Retour à la liste

Numérotation des lignes :

  1. C MODPLA SOURCE AF221230 16/11/22 21:39:16 9185
  2. SUBROUTINE MODPLA(MOMODL,NMOD)
  3. *----------------------------------------------------------------------
  4. * - CAS DE LA FORMULATION 'MECANIQUE' + 'PLASTIQUE'
  5. * DEFINITION DES NOMS DES MATERIAUX
  6. *----------------------------------------------------------------------
  7. IMPLICIT INTEGER(I-N)
  8. -INC CCOPTIO
  9. *
  10. CHARACTER*16 MOMODL(*)
  11. *
  12. * Noms des materiaux
  13. c cccccc
  14. NMOD=77
  15. c cccccc
  16. *
  17. MOMODL( 1)='ISOTROPE'
  18. MOMODL( 2)='PARFAIT'
  19. MOMODL( 3)='CINEMATIQUE'
  20. MOMODL( 4)='DRUCKER_PRAGER'
  21. MOMODL( 5)='DRUCKER_PARFAIT'
  22. MOMODL( 6)='BETON'
  23. MOMODL( 7)='CHABOCHE1'
  24. MOMODL( 8)='CHABOCHE2'
  25. MOMODL( 9)='TUYAU_FISSURE'
  26. MOMODL(10)='ENDOMMAGEABLE'
  27. MOMODL(11)='GAUVAIN'
  28. MOMODL(12)='LINESPRING'
  29. MOMODL(13)='UBIQUITOUS'
  30. MOMODL(14)='GLOBAL'
  31. MOMODL(15)='CAM_CLAY'
  32. MOMODL(16)='COULOMB'
  33. MOMODL(17)='JOINT_DILATANT'
  34. MOMODL(18)='BETON_AXI'
  35. MOMODL(19)='GURSON'
  36. MOMODL(20)='BETON_UNI'
  37. MOMODL(21)='ACIER_UNI'
  38. MOMODL(22)='SECTION'
  39. MOMODL(23)='OTTOSEN'
  40. MOMODL(24)='MAZARS'
  41. MOMODL(25)='AMADEI'
  42. MOMODL(26)='HUJEUX'
  43. MOMODL(27)='STEINBERG'
  44. MOMODL(28)='ZERILLI'
  45. MOMODL(29)='PRESTON'
  46. MOMODL(30)='BETOCYCL'
  47. MOMODL(31)='ROTATING_CRACK'
  48. MOMODL(32)='JOINT_SOFT'
  49. MOMODL(33)='BILIN_MOMY'
  50. MOMODL(34)='BILIN_EFFZ'
  51. MOMODL(35)='TAKEMO_MOMY'
  52. MOMODL(36)='TAKEMO_EFFZ'
  53. MOMODL(37)='BETON_INSA'
  54. MOMODL(38)='ECROUIS_INSA'
  55. MOMODL(39)='PARFAIT_INSA'
  56. MOMODL(40)='ALONSO'
  57. MOMODL(41)='PAKZAD'
  58. MOMODL(42)='INFILL_UNI'
  59. MOMODL(43)='CISAIL_NL'
  60. MOMODL(44)='FRAGILE_UNI'
  61. MOMODL(45)='BETON_BAEL'
  62. MOMODL(46)='PARFAIT_UNI'
  63. MOMODL(47)='STRUT_UNI'
  64. MOMODL(48)='HINTE'
  65. MOMODL(49)='ANCRAGE_ELIGEHAUSEN'
  66. MOMODL(50)='CINEMATIQUE_ANCRAGE'
  67. MOMODL(51)='ACIER_ANCRAGE'
  68. MOMODL(52)='BETON_URGC'
  69. MOMODL(53)='UNILATERAL'
  70. MOMODL(54)='MRS_LADE'
  71. MOMODL(55)='J2'
  72. MOMODL(56)='RH_COULOMB'
  73. MOMODL(57)='VMT_FEFP'
  74. MOMODL(58)='RHMC_FEFP'
  75. MOMODL(59)='POWDER_FEFP'
  76. MOMODL(60)='POWDERCAP_FEFP'
  77. MOMODL(61)='JOINT_COAT'
  78. MOMODL(62)='CONCRETE_UNI'
  79. MOMODL(63)='MUR_SHEAR'
  80. MOMODL(64)='INCO'
  81. MOMODL(65)='DRUCKER_PRAGER_2'
  82. MOMODL(66)='NA '
  83. MOMODL(67)='INTIMP'
  84. MOMODL(68)='INTJOI'
  85. MOMODL(69)='BILIN_EFFX'
  86. MOMODL(70)='ISS_GRANGE'
  87. MOMODL(71)='RUP_THER'
  88. C +BR
  89. MOMODL(72)='RICBET_UNI'
  90. MOMODL(73)='BA1D'
  91. MOMODL(74)='LIAISON_ACBE'
  92. MOMODL(75)='DP_SOL'
  93. C -BR
  94. C +RP
  95. MOMODL(76)='OUGLOVA'
  96. MOMODL(77)='IWPR3D_SOL'
  97. C -RP
  98. RETURN
  99. END
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  

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