*HEADING
PLANE FINNED SURFACE UNDER FIRE CONDITION   
**
**  FIN...
*NODE
1,
5,   0.025D0
7,   0.035D0
11,   0.06D0
1001,   0.D0,0.1D0
1005,0.025D0,0.1D0
1007,0.035D0,0.1D0
1011,0.060D0,0.1D0
3001,    0D0,0.25D0
3005,0.025D0,0.25D0
3007,0.035D0,0.25D0
3011,0.060D0,0.25D0
*NGEN,NSET=N1
1,5
5,7
7,11
*NGEN,NSET=N2
1001,1005
1005,1007
1007,1011
*NGEN,NSET=N3
3001,3005
3005,3007
3007,3011
*NFILL,NSET=NALL
N1,N2,10,100
N2,N3,20,100
*ELEMENT,TYPE=DC2D4
1,1,2,102,101
5000,1005,1006,1106,1105
*ELGEN,ELSET=STRUC
1,10,1,1,10,100,10
5000,2,1,1,20,100,2
**
**  AMBIENT...
*NODE
5001,   0D0,0.550D0
5011,0.06D0,0.550D0
5101,   0D0,0.555D0
5111,0.06D0,0.555D0
*NGEN,NSET=NAMB
5001,5011
5101,5111
*ELEMENT,TYPE=DC2D4
8000,5001,5002,5102,5101
*ELGEN,ELSET=STRUC
8000,10,1,1
*ELSET,ELSET=EAMB,GENERATE
8000,8009
**
**  SURFACES...
*ELSET,ELSET=BOTF1,GENERATE
1,10
*ELSET,ELSET=TOPF3,GENERATE
91,94
97,100
5038,5039
*ELSET,ELSET=TOPF4,GENERATE
5000,5038,2
*ELSET,ELSET=TOPF2,GENERATE
5001,5039,2
*surface,NAME=SRFS,PROPERTY=REFL
TOPF3,S3
TOPF4,S4
TOPF2,S2
*surface,NAME=SAMB,PROPERTY=RAMB
EAMB,S1
*SURFACE PROPERTY,NAME=REFL
*EMISSIVITY
0.8D0, 
*SURFACE PROPERTY,NAME=RAMB
*EMISSIVITY
1.0D0, 
*CAVITY DEFINITION,NAME=CAV2D
SRFS,SAMB
**
*SOLID SECTION,ELSET=STRUC,MATERIAL=MSTRUC
*MATERIAL,NAME=MSTRUC
*DENSITY
7800.0D0, 
*CONDUCTIVITY
50.0D0, 
*SPECIFIC HEAT
500.0D0, 
*RESTART,WRITE,FREQUENCY=100
*PHYSICAL CONSTANTS,STEFANBOLTZMANN=5.6697D-8,
ABSOLUTE ZERO=-273.0
**
*INITIAL CONDITIONS,TYPE=TEMPERATURE
NALL,77.D0
NAMB,77.D0
*NSET,NSET=THREE
11,1011,3006
**
**
*surface, NAME=BOTF1
 BOTF1, S1
*STEP,INC=500
*HEAT TRANSFER,STEADY STATE
1.0, 
*BOUNDARY
NAMB,11,,38.D0
*SFILM
 BOTF1,FNU
*SFILM
 SRFS,FNU
*RADIATION VIEWFACTOR,SYMMETRY=NSYMM,VTOL=0.1
*RADIATION SYMMETRY,NAME=NSYMM
*PERIODIC,TYPE=2D,NR=20
0.0D0,0.555D0, 0.0D0,0.0D0, 0.06D0,0.0D0
*VIEWFACTOR OUTPUT, CAVITY=CAV2D, FREQUENCY=100
*RADIATION PRINT,CAVITY=CAV2D, FREQUENCY=10
RADFL,RADFLA,RADTL,RADTLA,VFTOT,FTEMP
*RADIATION FILE,CAVITY=CAV2D, FREQUENCY=10
RADFL,RADFLA,RADTL,RADTLA,VFTOT,FTEMP
*EL PRINT,FREQUENCY=0
*NODE PRINT,NSET=THREE
NT, 
*NODE FILE,NSET=THREE
NT, 
*END STEP
*STEP,INC=500
*HEAT TRANSFER,DELTMX=5
10,1800
*BOUNDARY
NAMB,11,,800.D0
*END STEP
*STEP,INC=500
*HEAT TRANSFER,DELTMX=5
10,3600
*BOUNDARY
NAMB,11,,38.D0
*END STEP