*HEADING
INFINITELY LONG SQUARE TUBE, BLOCKING, DC3D8, 1 CYC SYMM (NC=4)
PLUS 1 PER SYMM (NR=20)
*PREPRINT
*PHYSICAL CONSTANTS, STEFAN=5.669E-8,ABSOLUTE ZERO=0.0
*NODE
1,4.,4.
13,16.,4.
241,4.,16.
253,16.,16.
2001,4.,4.,1.
2013,16.,4.,1.
2241,4.,16.,1.
2253,16.,16.,1.
*NGEN,NSET=LHS
1,241,20
2001,2241,20
*NGEN,NSET=RHS
13,253,20
2013,2253,20
*NFILL,NSET=ALLN
LHS,RHS,12
*NSET,NSET=OUTN,GEN
22,27
106,107
*ELEMENT,TYPE=DC3D8,ELSET=CONDEL
1,1,2,22,21,2001,2002,2022,2021
106,106,107,127,126,2106,2107,2127,2126
*ELGEN,ELSET=CONDEL
1,6,1,1
1,6,20,20
*ELSET,ELSET=OUTEL,GEN
2,6
106,106
*SOLID SECTION,ELSET=CONDEL,MATERIAL=ALUM
*MATERIAL,NAME=ALUM
*CONDUCTIVITY
204., 
*DENSITY
2707., 
*SPECIFIC HEAT
896., 
***  CAVITY DEFINITION
*ELSET,ELSET=ELHS,GEN
21,101,20
*ELSET,ELSET=EBOT,GEN
2,6
*surface,NAME=SLHS,PROPERTY=PSIDE
ELHS,S4
*surface,NAME=SBOT,PROPERTY=PTOBO
EBOT,S5
*surface,NAME=SBLOCK,PROPERTY=PBLOCK
106,S3
106,S6
*CAVITY DEFINITION,NAME=CAV3D,AMB=200.
SLHS,SBOT,SBLOCK
*SURFACE PROPERTY,NAME=PSIDE
*EMISSIVITY
0.5, 
*SURFACE PROPERTY,NAME=PTOBO
*EMISSIVITY
0.5, 
*SURFACE PROPERTY,NAME=PBLOCK
*EMISSIVITY
0.5, 
***
*INITIAL CONDITIONS,TYPE=TEMPERATURE
ALLN,300.
*RESTART,WRITE,FREQ=10
*STEP,INC=20
*HEAT TRANSFER,STEADY STATE
1.,1.
*BOUNDARY
127,11,,1000.
2127,11,,1000.
1,11,,400.
2001,11,,400.
*RADIATION VIEW,REFLECTION=NO,SYMM=CYCPER
*RADIATION SYMM,NAME=CYCPER
*CYCLIC,TYPE=AXIS,NC=4
10.,10.,0.,10.,10.,1.
0.,10.,0.
*PERIODIC,TYPE=3D,NR=20
0.,0.,0.,20.,0.,0.
0.,20.,0.,0.,0.,1.
*NODE PRINT,NSET=OUTN
NT, 
*NODE FILE,NSET=OUTN
NT, 
*RADIATION PRINT
RADFL,VFTOT,FTEMP
*RADIATION FILE,ELSET=OUTEL
RADFL,VFTOT,FTEMP
*VIEWFACTOR OUTPUT,CAVITY=CAV3D
*END STEP