~*Happy New Year 2023*~
Thank you for using my blog!
~~*~~
How to Run Commands:
- Option 1 - Type below APDL commands one by one in ANSYS Command Prompt.
- Option 2 - Copy and paste all APDL commands given below in ANSYS Command Prompt.
- Option 3 - Copy and paste all APDL commands given below in Notepad and save as .txt or .inp file. Go to ANSYS and read file in ANSYS using File->Read Input From and then select the txt/inp file which is saved just now.
After successfully running commands, go to Utility Menu->Parameters->Scalar Parameters. Quantitative results are listed in this option.
/COM, Problem 1 - LINK180
/COM, PREPROCESSING
/COM, PREPROCESSING
/PREP7
ET,1,LINK180
ET,1,LINK180
MP,EX,1,200E3
SECTYPE,1,LINK, ,AREA
SECDATA,3.14*10*10,
SECDATA,3.14*10*10,
K,1,
K,2,400,
K,2,400,
L,1,2,
LATT,1, ,1, , , ,1
LESIZE,1,,,1
LMESH,1,
LATT,1, ,1, , , ,1
LESIZE,1,,,1
LMESH,1,
DK,1,ALL,
FK,2,FX,40000
FK,2,FX,40000
/ESHAPE,1.0
/SOLU
ANTYPE,0
SOLVE
ANTYPE,0
SOLVE
/POST1
PLDISP,2
PLNSOL, U,SUM, 0,1.0
*GET,MAX_DISPLACEMENT,PLNSOL,0,MAX
PLESOL, S,EQV, 0,1.0
*GET,MAX_STRESS,PLNSOL,0,MAX
PLESOL, EPTO,EQV, 0,1.0
*GET,MAX_STRAIN,PLNSOL,0,MAX
PLDISP,2
PLNSOL, U,SUM, 0,1.0
*GET,MAX_DISPLACEMENT,PLNSOL,0,MAX
PLESOL, S,EQV, 0,1.0
*GET,MAX_STRESS,PLNSOL,0,MAX
PLESOL, EPTO,EQV, 0,1.0
*GET,MAX_STRAIN,PLNSOL,0,MAX