*HEADING
EC3FEFDM: *DSLOAD, *DSECHARGE, AND TEMPERATURE FOR PIEZO. ELEMENTS  [C3D15E]
*NODE
1    , 0.        , 0.        , 0.
3    , 7.        , 0.        , 0.
19   , 0.        , 7.        , 0.
21   , 7.        , 7.        , 0.
7    , 0.        , 0.        , -7.
9    , 7.        , 0.        , -7.
25   , 0.        , 7.        , -7.
27   , 7.        , 7.        , -7.
*NGEN,NSET=ALL
1    , 3
1    , 7    , 3
3    , 9    , 3
7    , 9
1    , 19   , 9
3    , 21   , 9
7    , 25   , 9
9    , 27   , 9
19   , 25   , 3
21   , 27   , 3
19   , 21
25   , 27
16   , 18
10   , 12
*NSET,NSET=NS1
1    , 4    , 7    , 16   , 25   , 22   , 19   , 10
*NSET,NSET=NS2
1    , 2    , 3    , 6    , 9    , 8    , 7    , 4
*NSET,NSET=NS3
1    , 2    , 3    , 12   , 21   , 20   , 19   , 10   , 11
*ELEMENT,TYPE=C3D15E,ELSET=ELEMS
 1, 7,9,25, 1,3,19, 8,17,16, 2,11,10, 4,6,22
 2, 9,27,25, 3,21,19, 18,26,17, 12,20,11, 6,24,22
*surface, NAME=SIDE_1
 1, S1
 2, S1
*surface, NAME=SIDE_2
 1, S2
 2, S2
*surface, NAME=SIDE_3
 1, S3
*surface, NAME=SIDE_4
 2, S3
*surface, NAME=SIDE_5
 2, S4
*surface, NAME=SIDE_6
 1, S5
**local orientation matching global system 
*ORIENTATION,NAME=RECT
 1.0, 0.0, 0.0, 0.0, 1.0, 0.0
 1, 0.0
*SOLID SECTION,MATERIAL=ELMAT, ELSET=ELEMS,ORIENT=RECT
*MATERIAL,NAME=ELMAT
*ELASTIC
 3.E6,0.3
*PIEZOELECTRIC,TYPE=S
 15.08,-5.207,-5.207,0.,0.,0.,0.,0.
 0.,12.710,0.,0.,0.,0.,0.,0.,
 12.710,0.
*DIELECTRIC,TYPE=ANISO
 5.872E-9,0.,6.752E-9,0.,0.,6.752E-9
*EXPANSION
 .0001, 
*DENSITY
 10.0, 
*INITIAL CONDITIONS,TYPE=TEMPERATURE
 ALL,-10.
*BOUNDARY
 ALL,1,3
 ALL,9
*STEP,PERTURBATION
*STATIC
*DSLOAD
 SIDE_1,P,3000.
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT
*OUTPUT,FIELD
*NODE OUTPUT
 RF, 
*EL PRINT
 LOADS,
*NODE PRINT
 RF, 
*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,PERTURBATION
*STATIC
*DSECHARGE
 SIDE_1,ES,3000.
*EL PRINT
 CHRGS,
*OUTPUT,FIELD
*NODE OUTPUT
RCHG, 
*NODE PRINT
RCHG, 
*END STEP
*STEP,PERTURBATION
*STATIC
*DSECHARGE
 SIDE_2,ES,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSECHARGE
 SIDE_3,ES,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSECHARGE
 SIDE_4,ES,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSECHARGE
 SIDE_5,ES,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DSECHARGE
 SIDE_6,ES,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*TEMPERATURE
 ALL,40.
*OUTPUT,FIELD
*ELEMENT OUTPUT
 S, 
*OUTPUT,FIELD
*NODE OUTPUT
 RF, 
*EL PRINT
 S, 
*NODE PRINT
 RF, 
*END STEP
*STEP,PERTURBATION
*STATIC
*BOUNDARY,OP=NEW
 NS1,1
 NS2,2
 NS3,3
 ALL,9
*TEMPERATURE,OP=MOD
 ALL,40.
*OUTPUT,FIELD
*NODE OUTPUT
 U, 
*EL PRINT,FREQ=0
*NODE PRINT
 U, 
*END STEP