August 28, 2023 at 7:21 pm
wrbulat
Ansys Employee
The APDL test case input at the bottom of this post illustrates a way, by selecting discreet REINF264 element table stress results (rather than nodes), to identify fibers whose SX stresses have exceeded some allowable stress. SX is always the axial component of REINF264 stress (regardless of the orientation of the REINF264 relative to the global X axis).
Copy the APDL below into a text file and read that text file into an interactive MAPDL session with the /INPUT command.
An alternative to using EKILL might be to define a material damage law for your REINF264:
Â
Â
I can see from the table below that material damage laws are supported by REFINF264:
Â
Â
Yet another (probably easier) option might be to define bilinear isotropic or kinematic hardening laws for your REINF264 (I see these options in the table above too).
Â
fini
/cle
Â
/vie,1,1,1,1
/vup,1,z
/esha,1
/pnu,type,1
/num,1
Â
/sys,del file*.png
Â
/title,FIBER REINFORCED CANTILEVER BEAM
Â
Â
C*******************************************
C*** PARAMETERS
C*******************************************
l=0.100 ! LENGTH
t=0.005 ! THICKNESS
w=0.010 ! WIDTH
Â
a_f=(t/10)**2 ! FIBER CROSS SECTION AREA
Â
E_m=2e11/1e3 ! MATRIX ELASTIC MODULUS
nu_m=0.3 ! MATRIX POISSON'S
Â
E_f=2e11/1e1 ! FIBER ELASTIC MODULUS
nu_f=0.2 ! FIBER POISSON'S
Â
esz=t/5 ! MATRIX MESH SIZE
dvz=5 ! MESH DIVISIONS IN Z (THICKNESS) DIRECTION
Â
u_tip=0.01 ! ENFORCED DISPLACEMENT OF BEAM TIP
Â
s_failure=0.15e9 ! FIBER FAILURE STRESS
Â
Â
C*******************************************
C*** MODEL
C*******************************************
/prep7
n,1,,w/2,t/2 ! REMOTE POINT NODES
n,2,l,w/2,t/2
Â
bloc,,l,,w,,t ! BEAM GEOMETRY
Â
et,1,185 ! MATRIX ATTRIBUTES
mp,ex,1,E_m
mp,nuxy,1,nu_m
Â
lsel,s,leng,,t ! MESH
lesi,all,,,dvz
alls
vmes,all
Â
Â
C*******************************************
C*** REMOTE PTS AT BEAM ENDS
C*******************************************
et,2,174
keyo,2,4,1 ! FORCE DISTRIBUTED
keyo,2,2,2 ! MPC
keyo,2,12,5 ! BONDED
Â
et,3,170
keyo,3,2,1 ! USER-SPECIFIED PILOT NODE CONSTRAINT
keyo,3,5,3 ! SHELL-SOLID
Â
r,2
Â
real,2
type,2
nsel,s,loc,x
nsel,u,node,,1
esurf
Â
type,3
tsha,pilo
alls
e,1
Â
d,1,all
Â
Â
et,4,174
keyo,4,4,1 ! FORCE DISTRIBUTED
keyo,4,2,2 ! MPC
keyo,4,12,5 ! BONDED
Â
et,5,170
keyo,5,2,1 ! USER-SPECIFIED PILOT NODE CONSTRAINT
keyo,5,5,3 ! SHELL-SOLID
Â
r,4
Â
real,4
type,4
nsel,s,loc,x,l
nsel,u,node,,2
esurf
Â
type,5
tsha,pilo
alls
e,2
Â
d,2,ux
d,2,uy
d,2,uz,-u_tip
d,2,rotx
d,2,roty
d,2,rotz
Â
Â
C*******************************************
C*** REINFORCING
C*******************************************
et,6,264
mp,ex,6,E_f
mp,nuxy,6,nu_f
sect,6,reinf,disc
secd,6,a_f,edgo,1,0.5,0.5,0.5,0.5
mat,6
secn,6
esel,s,type,,1
ereinf
Â
esel,s,ename,,264
eplo
Â
Â
C*******************************************
C*** SOLVE
C*******************************************
/solu
nsub,5,5,5
outr,all,all
nlge,on
alls
solv
fini
Â
Â
C*******************************************
C*** POST PROCESS REINF264
C*******************************************
/post1
set,last
Â
esel,s,ename,,264
plns,s,x,2
/sho,png $plns,s,x,2 $/sho,close $/wait,2
Â
etab,sx,s,x
esel,u,etab,sx,-s_failure,s_failure
plns,s,x,2
/sho,png $plns,s,x,2 $/sho,close $/wait,2
Â
Â
Best,
Bill