*HEADING
: MEMBRANE LOADING  [CPS8RE]
*PREPRINT,ECHO=YES,HISTORY=YES,MODEL=YES
*NODE
 1, 0.0, 0.0
 2, 2.0, 0.0
 3, 2.0, 1.0
 4, 0.0, 1.0
 5, 1.0, 0.0
 6, 2.0, 0.5
 7, 1.0, 1.0
 8, 0.0, 0.5
*ELEMENT,TYPE=CPS8RE, ELSET=EALL
 1, 1,2,3,4,5,6,7,8
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
 1.0, 
*surface,NAME=SIDE
1,S3
*MATERIAL,NAME=A1
*ELASTIC,TYPE=ISOTROPIC
 30.0E6,0.3
*PIEZOELECTRIC,TYPE=S
0.,0.,0.,0.,0.,0.,0.,0.
0.,0.,0.,0.,0.,0.,0.,0.
0.,0.
*DIELECTRIC,TYPE=ISO
1.0E-3, 
*STEP,PERTURBATION
*STATIC
*BOUNDARY
 1,1,2
 2,2
 1,9
 2,9
 5,9
**--THE FOLLOWING B.C.'S ARE NEEDED TO SUPPRESS HOURGLASS MODES
 5,1,,-2.3333E-5
 5,2
*DLOAD,OP=NEW
 1, P1, 1000.0
 1, P2, 1000.0
 1, P3, 1000.0
 1, P4, 1000.0
*DECHARGE
 1, ES1, 1000.0
 1, ES2, 1000.0
 1, ES3, 1000.0
 1, ES4, 1000.0
*CLOAD
 2,1,   333.333333
 3,1,  -333.333333
 3,2,  -166.666667
 4,2,   166.666667
 4,1,  -333.333333
 5,1,  1333.333333
 6,2,  -666.666667
 7,1, -1333.333333
 8,2,   666.666667
*CECHARGE
1,,-500.
2,,-500.
3,,-166.666667
4,,-166.666667
5,,-1333.33333
6,,-666.666667
8,,-666.666667
*El PRINT
NFORC,
*SECTION PRINT,NAME=SIDE34,SURFACE=SIDE,AXES=LOCA
 ,1.0,1.0
 ,2.0,1.0
SOAREA,SOF
SOE, 
*SECTION FILE,NAME=SIDE34,SURFACE=SIDE,AXES=LOCAL
 ,1.0,1.0
 ,2.0,1.0
SOAREA,SOF
SOE, 
*EL FILE
 S,COORD,E,
 LOADS,
 CHRGS,
 EFLX,EPG
 ENER,
 ELEN,
*ENERGY FILE
*NODE FILE
 U,COORD,EPOT,RCHG,RF,CECHG
*NODE PRINT
 U,COORD,EPOT
 RCHG,RF,CECHG
*EL PRINT
 S,COORD,
 E,
 LOADS,
 CHRGS,
 EFLX,EPG
 ENER,
 ELEN,
*END STEP