!aus dem Forum
!Verformung beibehalten
!Schätzing, 19.3.2016

finish   $/clear

*abbr,frequently,/input,frequently,txt

!---------Parameter-----------
breit=40e-3
lang=60e-3
dick=10e-3
versch=6e-3

/prep7
!----Material------
et,1,solid226,1
mp,ex,1,1.17e11
mp,nuxy,1,0.3
mp,dens,1,8900

!-----Geometrie-----
block,0,lang,-breit/2,breit/2,0,dick
/view,,,-1
/view,,0.16,-0.9,0.3
/ang ,,-36 
vplot

!-------Vernetzung--------
esize,dick/3
vmesh,all

!-------Randbedingungen----------
nsel,s,loc,x,0
d,all,ux,0
d,all,uy,0
d,all,uz,0

!-----------Lasten---------------
nsel,s,loc,x,lang
nsel,r,loc,z,dick
d,all,uz,-versch
cm,kante,node    !Knoten der Kante

allsel
!----1.Lösung-------
/solu
solve

!------Auswertung------
/post1
pldi,1

!------Verschiebung auf die Knoten aufprägen
/prep7
upcoord,1
eplot
cmsel,s,kante
d,all,ux,0
d,all,uy,0
d,all,uz,0
!--damit ist die Kante fixiert
!--und nun können weitere Lasten folgen