I want to analyze a rectangular cross section under torsion weekend by a edge crack. I used element of PLANE42 for modelling of cross section, then with help of element of SOLID45, I extruded cross-section along the perpendicular to the surface. but I don't know how to apply a moment to the end of beam.

/prep7

ET,1,plane182

ET,2,solid95

DOF,ROTZ,WARP

MPDE,ALL,1

TBDE,ALL,1

MPTEMP,,,,,,,

MPTEMP,,,,,,,,

MPTEMP,1,0

MPDATA,EX,1,,30e6

MPDATA,PRXY,1,,0.3

*AFUN,DEG

k, , 0, 12.5+SIN(45)/2

k, , COS(45), 12.5-SIN(45)/2

k, , 0, 12.5+SIN(45)/2

k, , 0, 0

k, , 5, 0

k, , 5, 12.5-(5-COS(45))*TAN(45)-SIN(45)/2

k, , 5, 25

k, , 0, 25

L,4,5

L,5,6

L,6,2

L,2,1

L,1,4

L,6,7

L,7,8

L,7,8

L,8,3

L,3,2

/PNUM,LINE,1

/REPLOT

AL,1,2,3,4,5,

AL,6,7,8,9,3,

CSKP,11,0,2,6,7,1,1,

CSYS,0

KSCON,2,1/20,1,6,0,

KESIZE,ALL,5/3

kesize,1,1/3

kesize,3,1/3

kesize,2,1/30

K, ,,,0,

K, ,,,-100,

L, 9, 10

AMESH,ALL

TYPE, 2

EXTOPT,ESIZE,100,0,

FLST,2,2,5,ORDE,2

FITEM,2,1

FITEM,2,-2

VDRAG,P51X, , , , , , 10

/VIEW,1,1,1,1

/ANG,1

/REP,FAST

EPLOT

FLST,2,2,5,ORDE,2

FITEM,2,8

FITEM,2,13

/GO

DA,P51X,ALL,

More Alireza Hassani's questions See All
Similar questions and discussions