*HEADING
: *DSLOAD AND *TEMPERATURE FOR STRESS-DISPLACEMENT ELEMENTS  [M3D9R]
*NODE
*NGEN,NSET=BOTTOM
*NGEN,NSET=TOP
*NGEN,NSET=LEFT
*NGEN,NSET=RIGHT
*NSET,NSET=ALL,GENERATE
*ELEMENT,TYPE=M3D9R, ELSET=EALL
*surface, NAME=TOP
 1,SPOS
*MEMBRANE SECTION,MATERIAL=A1, ELSET=EALL
2.,
*MATERIAL,NAME=A1
*ELASTIC
3.E6      , 0.3
*EXPANSION
0.0001,
*DENSITY
 1.0,
*INITIAL CONDITIONS,TYPE=TEMPERATURE
ALL  , -10.
*BOUNDARY
ALL  , 1    , 3
*STEP,PERTURBATION
*STATIC
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT,VARIABLE=PRESELECT
*OUTPUT,FIELD
*NODE OUTPUT
RF,
*DSLOAD
TOP,HP,3000.,7.,0.
*EL PRINT
 LOADS,
*OUTPUT,FIELD
*ELEMENT OUTPUT
LOADS,
*NODE PRINT
 RF,
*END STEP
*STEP,PERTURBATION
*STATIC
*DSLOAD
TOP,P,1000.
*END STEP
*STEP,PERTURBATION
*STATIC
*TEMPERATURE
ALL,40.
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,
*OUTPUT,FIELD
*NODE OUTPUT
RF,
U,
*EL PRINT
 S,
*NODE PRINT
 RF,
 U,
*END STEP
*STEP,PERTURBATION
*STATIC
*BOUNDARY,OP=NEW
 ALL,3,6
LEFT,1
BOTTOM,2
*TEMPERATURE,OP=MOD
ALL,40.
*END STEP