# How to simulate contact stress using ANSYS APDL?

• 140 Views
• Last Post 16 September 2018
• Topic Is Solved
Nuno koh posted this 15 September 2018

Hello~

I'm beginner of ANSYS APDL.

I'm interested in contact stress.

I have been trying for it with the text "ENGINEERING ANALYSIS with ANSYS SOFTWARE (Author: Y. Nakasone and S. Yoshimoto)".

The Contact stress problem is described in 120page ~138page in the text.

I have followed the text, But I can't get the solution.

What is wrong ?

I have added the capture image for the contact stress problem from the text.

Plz, refer to the link below for details.

Thanks.

peteroznewman posted this 15 September 2018

Nuno koh,

Below I put an image of the textbook problem you had in your link for ease of viewing by the community.

Please reply with the full APDL code you used. Click the Blockquote button before you paste to keep the length to a minimum. Note that there is a 3000 character limit to each post.

I hope you get a reply from someone who uses APDL code, because I use Workbench and Mechanical to solve Static Structural models.

Nuno koh posted this 16 September 2018

Plz, refer to the link below with source code

Nuno koh posted this 16 September 2018

/PREP7

BLC4,0,0,500,-500

CYL4,0,500,500,-90,500,0

SAVE

SAVE

FLST,2,2,5,ORDE,2

FITEM,2,1

FITEM,2,-2

AGLUE,P51X

!*

MPTEMP,,,,,,,,

MPTEMP,1,0

MPDATA,EX,1,,2.1E5

MPDATA,PRXY,1,,0.3

!*

ET,1,PLANE183

!*

KEYOPT,1,1,0

KEYOPT,1,3,2

KEYOPT,1,6,0

!*

ET,2,TARGE169

!*

ET,3,CONTA172

!*

FLST,5,2,4,ORDE,2

FITEM,5,2

FITEM,5,-3

CM,_Y,LINE

LSEL, , , ,P51X

CM,_Y1,LINE

CMSEL,,_Y

!*

LESIZE,_Y1, , ,60,1/10, , , ,1

!*

FLST,5,2,4,ORDE,2

FITEM,5,1

FITEM,5,4

CM,_Y,LINE

LSEL, , , ,P51X

CM,_Y1,LINE

CMSEL,,_Y

!*

LESIZE,_Y1, , ,60,10, , , ,1

!*

FLST,5,2,4,ORDE,2

FITEM,5,8

FITEM,5,-9

CM,_Y,LINE

LSEL, , , ,P51X

CM,_Y1,LINE

CMSEL,,_Y

!*

LESIZE,_Y1, , ,40,10, , , ,1

!*

FLST,5,1,4,ORDE,1

FITEM,5,6

CM,_Y,LINE

LSEL, , , ,P51X

CM,_Y1,LINE

CMSEL,,_Y

!*

LESIZE,_Y1, , ,40,1/10, , , ,1

!*

MSHKEY,0

FLST,5,2,5,ORDE,2

FITEM,5,1

FITEM,5,3

CM,_Y,AREA

ASEL, , , ,P51X

CM,_Y1,AREA

CHKMSH,'AREA'

CMSEL,S,_Y

!*

AMESH,_Y1

!*

CMDELE,_Y

CMDELE,_Y1

CMDELE,_Y2

!*

!!!!!!!!!!  Cylinder btm surface line selection/!!!!!!!!!!

LSEL,S, , ,       8

!!!!!!!!!!  /Cylinder btm surface line selection!!!!!!!!!!

!!!!!!!!!!  Cylinder btm surface node selection/!!!!!!!!!!

NSLL,R,1

!!!!!!!!!!  / Cylinder btm surface node selection!!!!!!!!!!

!!!!!!!!!!  Cylinder Btm surface contact point near area selection/!!!!!!!!!!

FLST,5,14,1,ORDE,3

FITEM,5,242

FITEM,5,11043

FITEM,5,-11055

NSEL,R, , ,P51X

!!!!!!!!!!  /Cylinder Btm surface contact point  near area selection/!!!!!!!!!!

!!!!!!!!!!  Contact element define of cylinder btm surface /!!!!!!!!!!!!!

TYPE,   3

MAT,       1

REAL,

ESYS,       0

SECNUM,

TSHAP,LINE

!*

!!!!!!!!!!  /Contact element define of cylinder btm surface !!!!!!!!!!!!!

save

!!!!!!!!!!  Contact element attach on cylinder btm surface /!!!!!!!!!!!!!

FLST,5,14,1,ORDE,3

FITEM,5,242

FITEM,5,11043

FITEM,5,-11055

CM,_Y,NODE

NSEL, , , ,P51X

CM,_Y1,NODE

CMSEL,S,_Y

!*

CMSEL,,_Y1

ESURF, ,BOT,

CMSEL,,_Y

CMDELE,_Y

CMDELE,_Y1

!!!!!!!!!!  /Contact element attach on cylinder btm surface !!!!!!!!!!!!!

save

ALLSEL,ALL

!!!!!!!!!!  Flat plate Top surface line selection/!!!!!!!!!!

LSEL,S, , ,       3

!!!!!!!!!!  /Flat plate Top surface line selection!!!!!!!!!!

!!!!!!!!!!  Flat plate Top surface node selection/!!!!!!!!!!

NSLL,R,1

!!!!!!!!!!  /Flat plate Top surface node selection!!!!!!!!!!

!!!!!!!!!!  Flat plate Top surface contact point  near area selection/!!!!!!!!!!

FLST,5,23,1,ORDE,3

FITEM,5,242

FITEM,5,340

FITEM,5,-361

NSEL,R, , ,P51X

!!!!!!!!!!  /Flat plate Top surface contact point  near area selection!!!!!!!!!!

!!!!!!!!!!  Target element define on Flat plate Top surface/!!!!!!!!!!!!!

TYPE,   2

MAT,       1

REAL,

ESYS,       0

SECNUM,

TSHAP,LINE

!*

!!!!!!!!!!  /Target element define on Flat plate Top surface !!!!!!!!!!!!!

save

!!!!!!!!!!  Target element attach on Flat plate Top surface /!!!!!!!!!!!!!

FLST,5,23,1,ORDE,3

FITEM,5,242

FITEM,5,340

FITEM,5,-361

CM,_Y,NODE

NSEL, , , ,P51X

CM,_Y1,NODE

CMSEL,S,_Y

!*

CMSEL,,_Y1

ESURF, ,TOP,

CMSEL,,_Y

CMDELE,_Y

CMDELE,_Y1

!!!!!!!!!!  /Target element attach on Flat plate Top surface !!!!!!!!!!!!!

save

ALLSEL,ALL

!!!!!!!!!!boundary condition/!!!!!!!!!!!

EPLOT

FINISH

/SOL

FLST,2,2,4,ORDE,2

FITEM,2,4

FITEM,2,9

!*

/GO

DL,P51X, ,UX,

FLST,2,1,4,ORDE,1

FITEM,2,1

!*

/GO

DL,P51X, ,UY,

FLST,2,1,4,ORDE,1

FITEM,2,6

/GO

!*

SFL,P51X,PRES,1,

!!!!!!!!!!/boundary condition!!!!!!!!!!!

/SOL

/STATUS,SOLU

SOLVE