!aus dem Forum von Odybukide
!rotationssymmetrisches Modell
!mit plane223
!Schätzing, 19.2.2010

finish
/clear
*abbr,odybukide3,/input,odybukide3,txt

/prep7
!Bauteilbezogene Größen(auch Material)
radi=0.5e-3     !Radius innen
rada=5e-3       !Radius außen
lang=5e-3       !Länge
!B_Laenge=5           !Bauteillänge(z)
!B_Breite=10             !Bauteilbreite(x)
!B_Hoehe=5                !Bauteilhöhe(y)
!Grund=0

!---Geometrie-----
rectng,0,radi,0,lang   !Innen
rectng,0,rada,0,lang   !Alu-Block
aovlap,all
!A1:Innen  A3:Alublock

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!Thermische Vernetzung des Modells!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

et,1,plane223,11,,1

!!!!!ALU!!!!!!!!!!!!!!!
mp,KXX,1,186
mp,DENS,1,2.716e3
mp,C,1,897
mp,ex,1,72e9
mp,nuxy,1,0.33
mp,alpx,1,2.3e-5
!!!!!STAHL!!!!!
mp,KXX,2,14.7
mp,kxx,2,52
mp,DENS,2,7.85e3
mp,C,2,460
mp,ex,2,210e9
mp,nuxy,2,0.33
mp,alpx,2,1.2e-5 



!!!!!!!
!vsel,s,volu,,1
!vsel,a,volu,,3,4
mat,2
esize,0.25e-3
amesh,1
mat,1
!esize,2.5e-3
amesh,all
allsel
!/eof
!----Randbedingungen-thermisch----
ic,all,temp,450

nsel,s,loc,x,rada
sf,all,conv,20,20

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


allsel
!----------------------
/solu
antype,trans
endzeit=200
schritte=20
*do,i,0,schritte
time,i*endzeit/schritte+1e-12
kbc,1
solve
*enddo


!-----------------------
/post1
/expand,27,axis,,,10
/view,1,0.25,0.2,0.9

plns,s,eqv