**________unite : mm, MPa________
*HEADING
Joint GEM
**PREPRINT,ECHO=YES, MODEL=YES, HISTORY=YES, CONTACT=YES
*PARAMETER
**Joint
Bas_joint=14.
Hauteur=7.81+Bas_joint
Dint=29.98
Dext=45.93
Rint=Dint/2.
Rext=Dext/2.
Pt_milieu=Rint+((Rext-Rint)/2)
**Chemise
Epaisseur=3.9
Hauteur_chemise=45.
**--------------------------------------------------------------------
**________maillage du joint________
*NODE
1, <Rint>, <Bas_joint>
9, <Rext>, <Bas_joint>
81, <Rint>, <Hauteur>
85, <Pt_milieu>, <Hauteur>
89, <Rext>, <Hauteur>
*NGEN,NSET=BAS_JOINT
1,9
*NGEN,NSET=HAUT_JOINT
81,89
*NSET,NSET=INT_JOINT,GENERATE
1,81,10
*NSET,NSET=EXT_JOINT,GENERATE
9,89,10
*NFILL,NSET=ALL_JOINT
BAS_JOINT,HAUT_JOINT,8,10
**________section________
*SOLID SECTION,MATERIAL=GEM,ELSET=JOINT_GEM
**________element axisymetrique a 8 noeuds________
*ELEMENT,TYPE=CAX8
1,1,3,23,21,2,13,22,11
*ELGEN,ELSET=JOINT_GEM
1,4,2,1,4,20,10
**________surface pour contact________
*ELSET,ELSET=SURFACE_ELEMENT_JOINT,GENERATE
4,34,10
*SURFACE,TYPE=ELEMENT,NAME=SURFACE_JOINT
SURFACE_ELEMENT_JOINT
*ELSET, ELSET=ELT_14
14
**--------------------------------------------------------------------
**________maillage de la chemise________
*NODE
101, 22.975, 0.
105, 26.875, 0.
2101, 22.975, 45. 
2105, 26.875, 45.
*NGEN,NSET=BAS_CHEMISE
101,105
*NGEN,NSET=HAUT_CHEMISE
2101,2105
*NSET,NSET=INT_CHEMISE,GENERATE
101,2101,50
*NSET,NSET=EXT_CHEMISE,GENERATE
105,2105,50
*NFILL,NSET=ALL_CHEMISE
BAS_CHEMISE,HAUT_CHEMISE,40,50
*NSET,NSET=BAS_INT_CHEMISE
101
**________section________
*SOLID SECTION,MATERIAL=ACIER,ELSET=CHEMISE
**________element axisymetrique a 8 noeuds________
*ELEMENT,TYPE=CAX8,ELSET=CHEMISE
101,101,103,203,201,102,153,202,151
*ELGEN,ELSET=CHEMISE
101,2,2,1,20,100,10
**________surface pour contact________
*ELSET,ELSET=SURFACE_ELEMENT_CHEMISE,GENERATE
101,291,10
*SURFACE,TYPE=ELEMENT,NAME=SURFACE_CHEMISE
SURFACE_ELEMENT_CHEMISE
*ELSET, ELSET=ELT_16
171
**--------------------------------------------------------------------
**________proprietes du materiau________
*MATERIAL,NAME=GEM
*ELASTIC
2100.,0.3
*MATERIAL,NAME=ACIER
*ELASTIC
210000.,0.3
**--------------------------------------------------------------------
**________contact________
*SURFACE INTERACTION, NAME=JOINT_CHEMISE
*CONTACT PAIR, INTERACTION=JOINT_CHEMISE,TYPE=SURFACE TO SURFACE
**surface esclave,surface maitre
SURFACE_CHEMISE,SURFACE_JOINT
**________conditions aux limites________
*BOUNDARY
BAS_JOINT,2
INT_JOINT,1
BAS_INT_CHEMISE,2
**________pilotage________
*STEP,NAME=charge,NLGEOM=YES,INC=1000000
*STATIC
0.1,1.,1.e-10,0.1 
*BOUNDARY
HAUT_JOINT,2,2,-0.30 
*OUTPUT,FIELD
*NODE OUTPUT
U, RF, COORD
*ELEMENT OUTPUT
S, LE, COORD
*CONTACT OUTPUT, VARIABLE=ALL
*END STEP
