*HEADING
EC38SIDI: *DSLOAD AND *TEMPERATURE FOR STRESS-DISPLACEMENT ELEMENTS  [C3D8I]
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE,NSET=ALL
1    , 0.        , 0.        , 0.
2    , 7.        , 0.        , 0.
3    , 7.        , 0.        , -7.
4    , 0.        , 0.        , -7.
5    , 0.        , 7.        , 0.
6    , 7.        , 7.        , 0.
7    , 7.        , 7.        , -7.
8    , 0.        , 7.        , -7.
*NSET,NSET=NS1
1,4,5,8
*NSET,NSET=NS2
1,2,3,4
*NSET,NSET=NS3
1,2,5,6
*ELEMENT,TYPE=C3D8I, ELSET=EALL
 1,  1,2,3,4,5,6,7,8
*surface, NAME=SIDE_1
 1, S1
*surface, NAME=SIDE_2
 1, S2
*surface, NAME=SIDE_3
 1, S3
*surface, NAME=SIDE_4
 1, S4
*surface, NAME=SIDE_5
 1, S5
*surface, NAME=SIDE_6
 1, S6
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
*MATERIAL,NAME=A1
*ELASTIC
 3.E6,0.3
*DENSITY
 10.0, 
*EXPANSION
 .0001, 
*INITIAL CONDITIONS,TYPE=TEMPERATURE
 ALL,-10.
*BOUNDARY
 ALL,1,3
*STEP,PERTURBATION
*STATIC
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT
*OUTPUT,FIELD
*NODE OUTPUT
 RF, 
*DSLOAD
 SIDE_1,P,3000.
*EL PRINT,TOTALS=YES
 LOADS,
 IVOL,
 EVOL,
*OUTPUT,FIELD
*ELEMENT OUTPUT
 LOADS,
 IVOL,
 EVOL,
*NODE PRINT
 RF, 
*OUTPUT,FIELD
*NODE OUTPUT
 RF, 
*ELEMENT OUTPUT
 IVOL,EVOL
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=ALL
 RF, 
*ELEMENT OUTPUT,ELSET=EALL
 IVOL,EVOL
*ENERGY OUTPUT,VAR=ALL
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_2,P,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_3,P,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_4,P,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_5,P,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_6,P,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_1,HP,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_2,HP,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_3,HP,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_4,HP,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_5,HP,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_6,HP,3000.,0.,-7.
*END STEP
*STEP
*STATIC
*TEMPERATURE,OP=NEW
 ALL,30.
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT
*OUTPUT,FIELD
*ELEMENT OUTPUT
 S, 
*OUTPUT,FIELD
*NODE OUTPUT
 RF, 
*EL PRINT
 S, 
*NODE PRINT
 RF, 
*OUTPUT,FIELD
*NODE OUTPUT
 RF, 
*ELEMENT OUTPUT
 S, 
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=ALL
 RF, 
*ELEMENT OUTPUT,ELSET=EALL
 S, 
*ENERGY OUTPUT,VAR=ALL
*END STEP
*STEP
*STATIC
*BOUNDARY,OP=NEW
 NS1,1
 NS2,2
 NS3,3
*TEMPERATURE,OP=MOD
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT
*OUTPUT,FIELD
*NODE OUTPUT
 U, 
*EL PRINT,FREQ=0
*NODE PRINT
 U, 
*OUTPUT,FIELD
*NODE OUTPUT
 U, 
*ELEMENT OUTPUT
 S, 
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=ALL
 U, 
*ENERGY OUTPUT,VAR=ALL
*END STEP