*HEADING
 SQUARE PLATE FUSION                          
**
*** User subroutine UMATHT is used to define
*** the thermal constitutive behavior.
**
*NODE
101,0.,0.
109,4.,0.
901,0.,4.
909,4.,4.
*NGEN,NSET=Y0
101,109
*NGEN,NSET=Y4
901,909
*NGEN,NSET=X0
101,901,100
*NGEN,NSET=X4
109,909,100
*NFILL
Y0,Y4,8,100
*ELEMENT,TYPE=DC2D4
101,101,102,202,201
*ELGEN,ELSET=ALL
101,8,1,1,8,100,100
*elset,elset=el202
202
*SOLID SECTION,ELSET=ALL,MATERIAL=A1
*MATERIAL,NAME=A1
*USER MATERIAL, TYPE=THERMAL,CONSTANTS=5
1.08, 1.0, 70.26, -0.25, -0.15
** cond, spht,latht,solidus temperature ,liquidus temperature
*DENSITY
1., 
*AMPLITUDE,NAME=RAMP,TIME=TOTAL TIME,VALUE=ABSOLUTE
0.,0.,.05,-45.,5.,-45.
*RESTART,WRITE,FREQUENCY=1
*NSET,NSET=FOUT
 303,305
*STEP,INC=250
*HEAT TRANSFER,DELTMX=4.
.001,5.
*CONTROLS,PARAMETERS=TIME
 
 , 0.25 
*BOUNDARY,AMPLITUDE=RAMP
 X0,11,11,-45.
 Y0,11,11,-45.
*NODE PRINT,FREQUENCY=1
NT, 
*NODE FILE,NSET=FOUT
NT, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=FOUT
NT,
*element output
gradt
*output,history
*element output,elset=el202
gradt
*END STEP