!Abkühlung eines Ringes, geschlitzt
!gesamter Ring
!Schätzing, 11.3.2009
!
fini  $/clear
*abbr,Abkuehl1,/input,abkuehlung1.txt

!-----Zylinder--------
rirad=360e-3      !Ring-Radius außen
ribrei=120e-3     !Ring-Breite
ridi=60e-3        !Ring-Dicke

/prep7  
!et,1,solid98
!et,1,solid5
et,1,solid226,11
mp,ex,1,7.3e10
mp,nuxy,1,0.33
mp,alpx,1,2.43e-5
mp,dens,1,2700
mp,kxx,1,15.6
mp,c,1,963
!----Geometrie-Ring-----
cylind,rirad-ridi,rirad,-ribrei/2,ribrei/2,  0, 90
cylind,rirad-ridi,rirad,-ribrei/2,ribrei/2, 90,180
cylind,rirad-ridi,rirad,-ribrei/2,ribrei/2,180,270
cylind,rirad-ridi,rirad,-ribrei/2,ribrei/2,270,358
vglue,all

/view,,0.35,0.65,1
/ang,,1.15

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

!----thermische-Randbedingungen--------
nsel,all
ic,all,temp,600
csys,1
nsel,s,loc,x,rirad
sf,all,conv,600,20
csys,0
allsel

!=======================
/solu
antype,trans
kbc,1
time,120
nsubst,5,10,5
outres,all,all
autots,on
solve
!-------------------
/post1
/plopts,minm,0
/dist,1,1,1
plns,temp
plns,s,eqv
/dscale,,1

ancntr,10,0.5