*HEADING
EC36EFDF: DLOAD, DECHARGE, AND TEMPERATURE FOR PIEZO. ELEMENTS  [C3D6E]
*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=C3D6E,ELSET=ELEMS
 1, 4,3,8,1,2,5
 2, 3,7,8,2,6,5
**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
*DLOAD
 ELEMS,BX,3000.
*EL PRINT
 LOADS,
*NODE PRINT
 RF, 
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,BY,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,BZ,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,GRAV,300.,1.,0.,0.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,CENT,300.,-1000.,3.5,-3.5,0.,1.,0.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,CENTRIF,30.,-1000,3.5,-3.5,0.,1.,0.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,P1,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,P2,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,P3,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 2,P3,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 2,P4,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,P5,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,HP1,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 ELEMS,HP2,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,HP3,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 2,HP3,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 2,HP4,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DLOAD
 1,HP5,3000.,0.,-7.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
ELEMS,EBF,3000.
*EL PRINT
 CHRGS,
*NODE PRINT
RCHG, 
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
 ELEMS,ES1,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
 ELEMS,ES2,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
 1,ES3,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
 2,ES3,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
 2,ES4,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*DECHARGE
 1,ES5,3000.
*END STEP
*STEP,PERTURBATION
*STATIC
*TEMPERATURE
 ALL,40.
*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.
*EL PRINT,FREQ=0
*NODE PRINT
 U, 
*END STEP