*HEADING
EC3AVFDM: *DSFLUX, *DSECURRENT FOR COUPLED THERMAL-ELECTRICAL
ELEMENTS  [DC3D10E]
*NODE
*ELEMENT,TYPE=DC3D10E,ELSET=ALLELS
*surface, NAME=SIDE_1
 1, S1
 4, S1
*surface, NAME=SIDE_2
 2, S3
 3, S3
*surface, NAME=SIDE_3
 1, S2
 2, S1
*surface, NAME=SIDE_4
 1, S3
 3, S2
*surface, NAME=SIDE_5
 3, S1
 4, S3
*surface, NAME=SIDE_6
 2, S2
 4, S4
*SOLID SECTION,MATERIAL=A1, ELSET=ALLELS
*MATERIAL,NAME=A1
*CONDUCTIVITY
 3.77E-5,
*ELECTRICAL CONDUCTIVITY
*JOULE HEAT FRACTION
*DENSITY
 82.9,
*SPECIFIC HEAT
 .39,
*NSET,NSET=FIX1
*NSET,NSET=FIX2
*NSET,NSET=FIX3
*NSET,NSET=FIX4
*NSET,NSET=FIX5
*NSET,NSET=FIX6
*BOUNDARY
 FIX1,11
 FIX1, 9
*STEP
*COUPLED THERMAL-ELECTRICAL, STEADY STATE
*BOUNDARY, OP=NEW
 FIX2, 11
 FIX2,  9
*DSFLUX, OP=NEW
 SIDE_1, S, .3
*DSECURRENT,OP=NEW
 SIDE_1, CS, .3
*NODE PRINT
 NT,RFL
EPOT, RECUR
*OUTPUT,FIELD
*NODE OUTPUT
 NT,RFL
EPOT, RECUR
*EL PRINT,FREQ=0
*OUTPUT,FIELD
*ELEMENT OUTPUT
*END STEP
*STEP
*COUPLED THERMAL-ELECTRICAL, STEADY STATE
*BOUNDARY, OP=NEW
 FIX1, 11
 FIX1, 9
*DSFLUX,OP=NEW
 SIDE_2, S, .3
*DSECURRENT,OP=NEW
 SIDE_2, CS, .3
*END STEP
*STEP
*COUPLED THERMAL-ELECTRICAL, STEADY STATE
*BOUNDARY, OP=NEW
 FIX5, 11
 FIX5,  9
*DSFLUX,OP=NEW
 SIDE_3, S, .3
*DSECURRENT,OP=NEW
 SIDE_3, CS, .3
*END STEP
*STEP
*COUPLED THERMAL-ELECTRICAL, STEADY STATE
*BOUNDARY, OP=NEW
 FIX6, 11
 FIX6,  9
*DSFLUX,OP=NEW
 SIDE_4, S, .3
*DSECURRENT, OP=NEW
 SIDE_4, CS, .3
*END STEP
*STEP
*COUPLED THERMAL-ELECTRICAL, STEADY STATE
*BOUNDARY, OP=NEW
 FIX3, 11
 FIX3,  9
*DSFLUX,OP=NEW
 SIDE_5, S, .3
*DSECURRENT,OP=NEW
 SIDE_5, CS, .3
*END STEP
*STEP
*COUPLED THERMAL-ELECTRICAL, STEADY STATE
*BOUNDARY, OP=NEW
 FIX4, 11
 FIX4,  9
*DSFLUX,OP=NEW
 SIDE_6, S, .3
*DSECURRENT,OP=NEW
 SIDE_6, CS, .3
*END STEP