*HEADING
Cylindrical elment testing under traction load (CCL12)
*PREPRINT, ECHO=YES, MODEL=YES, HISTORY=YES
**
**********************************************************
** Parameter definition
**
*PARAMETER
INRAD=10.0
EXRAD=12.0
HEIGHT=1.0
**
MIDHEIGHT=HEIGHT/2
MID=(INRAD+EXRAD)/2
**
***********************************************************
** Model definition
**
*NODE, NSET=SECTION
1, <INRAD>,0,0
2, <EXRAD>,0,0
3, <EXRAD>,0,<HEIGHT>
4, <INRAD>,0,<HEIGHT>
*NCOPY, CHANGE NUMBER=100, OLD SET=SECTION, NEW SET=REST, SHIFT, MULTIPLE=7
0,0,0
0,0,0,0,0,1,45
*NSET, NSET=ALL
REST, SECTION
*NSET, NSET=INT, GENERATE
1,701,100
4,704,100
*NSET, NSET=EX, GENERATE
2,702,100
3,703,100
*NSET, NSET=TOP, GENERATE
3,703,100
4,704,100
*NSET, NSET=BOTTOM, GENERATE
1,701,100
2,702,100
**
*ELEMENT, TYPE=CCL12, ELSET=FIRST
1, 201,202,203,204,1,2,3,4,101,102,103,104
*ELEMENT, TYPE=CCL12, ELSET=LAST
4, 1,2,3,4,601,602,603,604,701,702,703,704
*ELGEN, ELSET=FIRST3
1,3,200,1
*ELSET, ELSET=ALL
FIRST3,LAST
*SOLID SECTION, ELSET=ALL, MATERIAL=MYMAT
*MATERIAL, NAME=MYMAT
*ELASTIC
30E6,0.3
************************************************************
*ORIENTATION, SYSTEM=CYLINDRICAL, NAME=CYL
0,0,0, 0,0,1
** Boundary Condition
*TRANSFORM, TYPE=C, NSET=ALL
0,0,0, 0,0,1
*BOUNDARY
INT,1,3,0
************************************************************
** History data
**
*STEP, NLGEOM=YES, UNSYMM=YES
*STATIC
0.1,1.0
*DLOAD,ORIENTATION=CYL
ALL,TRVEC4NU,5e6,1.,0.,0.
*OUTPUT, FIELD
*NODE OUTPUT, VARIABLE=PRESELECT
*END STEP