*HEADING PLATE WITH CIRCULAR HOLE *preprint,model=yes *NODE 1,0.25,0. 33,0.,0.25 1601,3.25,0. 1617,3.25,3.25 1633,0.,3.25 10000,0.,0. *NGEN,LINE=C 1,33,1,10000 *NGEN 1601,1617,1 1617,1633,1 *NSET,NSET=DOWN,GENERATE 1,33,1 *NSET,NSET=UP,GENERATE 1601,1633,1 *NFILL,BIAS=0.75 DOWN,UP,8,200 *NSET,NSET=TOP,GENERATE 1617,1633,2 *NSET,NSET=BOTTOM,GENERATE 1,1601,200 *NSET,NSET=LEFT,GENERATE 33,1633,200 *NSET,NSET=RMPC,GENERATE 1601,1617,2 *NSET,NSET=ONE 1,3,5,7 *nset,nset=nall,generate 1,1633 *ELEMENT,TYPE=DC2D4 1,1,201,203,3 *ELGEN,ELSET=ALLE 1,8,200,1,16,2,8 *ELSET,ELSET=TOPE,GENERATE 72,128,8 *ELSET,ELSET=LEFTE 121,128,8 *ELSET,ELSET=RIGHT,GENERATE 8,64,8 *initial condition,type=temperature nall,100 *MATERIAL,NAME=BIDERMAN *ELASTIC 1.7E+05, .3 *expansion 1.0E-6 *CONDUCTIVITY 1570 *density 1.0e-3 *SPECIFIC HEAT 8.04E8 *SOLID SECTION,MATERIAL=BIDERMAN,ELSET=ALLE 1, *AMPLITUDE,NAME=AMP1 0,1,10,2,20,1,30,1 *STEP,inc=500 *heat transfer 0.25,30 *boundary,amp=amp1 bottom,11,11,100 left,11,11,100 *DFLUX,am=amp1 right,s2,2000 tope,s2,2000 *node file,nset=nall nt *OUTPUT,history *node output,nset=one nt *END STEP *STEP,inc=500 *heat transfer 0.25,30 *boundary,amp=amp1 bottom,11,11,100 left,11,11,100 *DFLUX,am=amp1 right,s2,2000 tope,s2,2000 *node file,nset=nall nt *output, field *node output, nset=nall nt *OUTPUT,history *node output,nset=one nt *END STEP