fini
/clear
/title, Spannungsberechnung mit plane55

!Variablen

x1=0
x2=1

y1=0
y2=0.1

t=0.01
gro=0.01

!Materialeigenschaften Stahl
lambda=50				!W/(m²K)
emod=210000000000		!N/m²
quer=0,3
ausd=0,000012			!1/K

!Temperaturen
ausgang=10		!°C
end=15			!°C

/prep7

!geometrische Struktur

k,1,x1,y1
k,2,x1,y2
k,3,x2,y2
k,4,x2,y1

a,1,2,3,4

!FE-Modell

et,1,plane55
keyopt,1,3,3			!real-Konstante mit der Dicke 
r,1,t
mp,kxx,1,lambda
esize,gro

mat,1
real,1
type,1
amesh,all

save
finish

/solu

antype,static,new

time,1
nsel,s,loc,x,x1
nsel,a,loc,x,x2
d,all,temp,ausgang
nsel,all

allsel
lswrite,1

nsel,s,loc,x,x1
nsel,a,loc,x,x2
ddele,all
nsel,all


time,2
nsel,s,loc,x,x1
nsel,a,loc,x,x2
d,all,temp,end
nsel,all

allsel
lswrite,2


lssolve,1,2

save
finish

/prep7

tref,ausgang

!Materialeigenschaften
mp,ex,1,emod
mp,prxy,1,quer
mp,alpx,1,ausd

etchg,tts

save
finish

/solu

!Randbedingungen

nsel,s,loc,x,x1
nsel,a,loc,x,x2
d,all,ux
d,all,uy
nsel,all

!Aufbringen Temperaturen aus thermischer Analyse
ldread,temp,1,1,,0,,rth

solve
save
finish