FINISH
/CLEAR 
/PREP7  
/UNITS,MKS  !Einheiten in (m,kg,sek,°C)

! *** Elementtyp des Blocks und Materialparameter ***   
ET,1,SOLID5

!**************Matrerialeigenschaften***************************
MP,C,1,460    	!Wärmekapazität 460 J/(kg°C)   
MP,KXX,1,16   	!Wärmeleitfähigkeit 16 W/(m°C )
MP,DENS,1,7800  !Dichte 7800 kg/m³
MP,EX,1,200E9  	!E-Modul 200kN/mm²  
MP,ALPX,1,10.5e-6  !Wärmeausdehnung 10,5 
MP,PRXY,1,0.3  
!***********************************************************


! ************* Geometrie **********************************   

! Maße immer in Meter!!  

A=0.5		!Gesamtlänge 
B=0.15   	!Breite   
C=0.08  	!Tiefe   


CON=25		!Werte für konvektiven Übergang zur Luft in W/(m²*K)
STR=800		!Wert für Strahlung in W/m²

!***********************************************************

BLOCK, 0, A, 0, B, 0, C

ESIZE,0.01,0, 				!Vernetzung  
MSHAPE,0,3D 
MSHKEY,1
VMESH,ALL

!************* Konvektion **********************************
ASEL,S,LOC,Z,C
ASEL,A,LOC,X,0
ASEL,A,LOC,X,A
ASEL,A,LOC,Y,0
ASEL,A,LOC,Y,B
NSLA,S,1
SF,ALL,CONV,CON,20
ALLS

!************* Strahlung ***********************************
ASEL,S,LOC,Z,0
NSLA,S,1
NPLOT
SF,ALL,HFLUX,STR
ALLS

!************* Lagerung ***********************************

NSEL,S,LOC,X,(A/2)
D,ALL,Ux,0
ALLS

NSEL,S,,,577
D,ALL,UY,0
D,ALL,UZ,0
ALLS



!************* Lösung ***********************************

/SOLU
ANTYPE,TRANS
AUTOTS,on
!Delttim,60,,120
CNVTOL,HEAT
TIMINT,ON
TIME,26000
ALLS
SOLVE