*HEADING
ECA8ERDM: *DSLOAD, *DSECHARGE, AND TEMPERATURE FOR PIEZO. ELEMENTS  [CAX8RE]
*NODE,NSET=ALL
 1,1.,0.
 3,4.,0.
 7,1.,3.
 9,4.,3.
*NGEN,NSET=ALL
 1,3
 7,9
 1,7,3
 3,9,3
*ELEMENT,TYPE=CAX8RE, ELSET=EALL
 1,1,3,9,7,2,6,8,4
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
*MATERIAL,NAME=A1
*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.,
0.,0.
*DIELECTRIC,TYPE=ISO
5.872E-9, 
*DENSITY
5.E-5, 
*BOUNDARY
 ALL,1,2
 ALL,9
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,P1,1000.
*ENERGY FILE
*NODE FILE
 RF, 
*EL PRINT
 LOADS,
*EL FILE
 LOADS,
*NODE PRINT
 RF, 
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,P2,2000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,P3,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,P4,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,HP1,3000.,3.,0.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,HP2,3000.,3.,0.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,HP3,3000.,3.,0.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,HP4,3000.,3.,0.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
1,ES1,1000.
*EL PRINT
 CHRGS,
*EL FILE
 CHRGS,
*NODE FILE
RCHG, 
*NODE PRINT
RCHG, 
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
1,ES2,2000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
1,ES3,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
1,ES4,3000.
*END STEP