*heading
EC24DFD4 - FIELD VAR DEP FILM COEFFICIENT THOUGH SUBROUTINE UFIELD, DC2D4
*restart,write,f=100
*node
*ngen,nset=nall
*nset,nset=top
*element,type=dc2d4
*elgen,elset=eall
*solid section,elset=eall,material=mat
*material,name=mat
*conductivity
1.40,
*specific heat
260.0,
*density
7800.0,
*film property,name=filmp,dep=1
*amplitude,name=sink
0.0,100.0, 3600.0,200.0
*initial conditions,type=temperature
nall,0.0
*initial conditions,type=field,var=1
top,0.0
*step,inc=1000,unsymm=yes
*heattransfer,deltmx=20.0
*film,amp=sink
   10,    f3,        1.0,      filmp
*dflux
eall,s2,0.0
eall,s4,0.0
1,s1,0.0
*field,var=1,user
top,0.0
*elprint,f=100,position=centroidal
coord,temp,hfl,fv1
*nodeprint,f=100
*elfile,f=4,position=centroidal
coord,
temp,
hfl,
*el print,f=4
film,
*el file,f=4
film,
*nodefile,f=4
nt,
rfl,
*endstep