*HEADING
INF LONG FINNED TUBE INSIDE INF LONG TUBE, DC3D8,
PER SYMM (NR=5)	PLUS  CYC SYM (NC=12)
*PREPRINT
*PHYSICAL CONSTANTS, STEFAN=5.669E-8,ABSOLUTE ZERO=0.0
*NODE
1,8.,2.,0.
13,32.,2.,0.
181,8.,20.,0.
193,32.,20.,0.
*NGEN,NSET=LHS
1,181,20
*NGEN,NSET=RHS
13,193,20
*NFILL,NSET=ALLNO
LHS,RHS,12
*NCOPY,OLD=ALLNO,SHIFT,CHANGE=1000,NEW=ALLNN
0.,0.,0.
0.,0.,0.,0.,1.,0.,30.
*NSET,NSET=ALLN
ALLNO,ALLNN
*NSET,NSET=LHS,GEN
1,181,20
1001,1181,20
*NSET,NSET=RHS,GEN
13,193,20
1013,1193,20
*NSET,NSET=OUTN,GEN
81,93
*ELEMENT,TYPE=DC3D8,ELSET=CONDEL
1,1001,1002,1022,1021,1,2,22,21
12,1012,1013,1033,1032,12,13,33,32
*ELGEN,ELSET=CONDEL
1,9,20,20
12,9,20,20
81,5,1,1
*ELSET,ELSET=OUTEL,GEN
81,92
*SOLID SECTION,ELSET=CONDEL,MATERIAL=ALUM
*MATERIAL,NAME=ALUM
*CONDUCTIVITY
204., 
*DENSITY
2707., 
*SPECIFIC HEAT
896., 
***  CAVITY DEFINITION
*ELSET,ELSET=ELHS,GEN
1,61,20
101,161,20
*ELSET,ELSET=ERHS,GEN
12,172,20
*ELSET,ELSET=EBLOCK,GEN
82,85
*surface,NAME=SURF,PROPERTY=PROP
ELHS,S4
ERHS,S6
EBLOCK,S3
EBLOCK,S5
85,S4
*CAVITY DEFINITION,NAME=CAV3D,AMB=200.
SURF, 
*SURFACE PROPERTY,NAME=PROP
*EMISSIVITY
0.5, 
***
*INITIAL CONDITIONS,TYPE=TEMPERATURE
ALLN,300.
*RESTART,WRITE,FREQ=10
*STEP,INC=20
*HEAT TRANSFER,STEADY STATE
1.,1.
*BOUNDARY
LHS,11,,1000.
RHS,11,,400.
*RADIATION VIEW,REFLECTION=NO,SYMM=YPERCYC
*RADIATION SYMMETRY,NAME=YPERCYC
*PERIODIC,NR=5,TYPE=3D
0.,2.,0.,1.,2.,0.
0.,2.,-1.,0.,18.,0.
*CYCLIC,NC=12,TYPE=AXIS
0.,0.,0.,0.,1.,0.
1.,0.,0.
*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