/filenam, HGEN_test
/title, Simple HGEN Example
/units,si
/prep7
! define geometry
length=0.05
height=0.01
!height1=0.002
nuse=100
blc4,0,0,length, height
! mesh 2D areas
et,1,55
mp,kxx,1,170
esize,height/nuse
amesh,all
finish
/solu
antype,0
! fixed temp BC's
nsel, s, loc,y,height
d,all,temp,273
nsel,all
nsel,s,loc,y,0
*do,i,1,nuse/5
nsel,a,loc,y,i*height/nuse
*enddo
bf,all,hgen,1e9
nsel,all
solve
finish
/post1
plnsol,temp,,0,

!50
!383.549
!273
!110.549

!100
!381.225

!273+
!105.882
!378.882