Code:
fini
/CLE! entsprechend der Inkompressibilitätsbedingung ux = 100/70*100=42.856.
!Definition der Neo-Hooke Parameter
c10=3.5
d=1e-5 !nahezu inkompressibel, Kompressionsmodul = 2/d
/PREP7
et,1,solid186,
!Materialdaten
!NEO-HOOKE-Materialverhalten
tb,hyper,1,1,2,neo
tbdat,,c10,d
block,0,100,0,100,0,10
esize,10
vmesh,1
nsel,s,loc,x,0
d,all,ux
allsel
nsel,s,loc,y,0
d,all,uy
allsel
nsel,s,loc,z,0
d,all,uz ! Ebener Verzerrungszustand
allsel
nsel,s,loc,z,10
d,all,uz ! Ebener Verzerrungszustand
allsel
nsel,s,loc,y,100
d,all,uy,-30
allsel
/solu
nlgeom,on
autots,on
nsubst,10
solve
/post1
/dscale,,1.0
PLNSOL, U,X, 0,1.0