*heading EC24DFD3 - TEMP DEP FILM COEFFICIENT THROUGH SUBROUTINE FILM, DC2D4 *restart,write,f=100 *node 1, 0.0, 0.0 11,0.0, 0.1 12,0.01, 0.0 22,0.01, 0.1 *ngen,nset=nall 1,11 12,22 *element,type=dc2d4 1, 1,12,13,2 *elgen,elset=eall 1, 10, 1 *solid section,elset=eall,material=mat *material,name=mat *conductivity 1.40, *specific heat 260.0, *density 7800.0, *initial conditions,type=temperature nall,0.0 *surface, name=surf_1 10, s3 *surface, name=surf_2 eall, s2 *surface, name=surf_3 eall, s4 *surface, name=surf_4 1, s1 *step,inc=1000,unsymm=yes *heattransfer,deltmx=20.0 100.,3600.,,100.0 *sfilm surf_1,fnu, *dsflux surf_2,s,0.0 surf_3,s,0.0 surf_4,s,0.0 *elprint,f=100,position=centroidal coord,temp,hfl *nodeprint,f=100 nt11, *elfile,f=4,position=centroidal coord, temp, hfl, *nodefile,f=4 nt, rfl, *output,field,freq=4 *node output nt,rfl *element output,position=centroidal coord,temp,hfl *endstep