*HEADING
: MEMBRANE LOADING  [CPS3E]
*PREPRINT,ECHO=YES,HISTORY=YES,MODEL=YES
*RESTART,WRITE
*NODE
 1, 0.0, 0.0
 2, 2.0, 0.0
 3, 2.0, 1.0
 4, 0.0, 1.0
*ELEMENT,TYPE=CPS3E, ELSET=EALL
 1, 1,2,3
 2, 1,3,4
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
 1.0, 
*surface,NAME=SIDE
2,S2
*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, 
*BOUNDARY
 1,1,2
 2,2
 1,9
 2,9
*STEP,PERTURBATION
*STATIC
*DLOAD,OP=NEW
 1, P2, 1000.0
 2, P2, 1000.0
 2, P3, 1000.0
*DECHARGE
 1, ES1, 1000.0
 1, ES2, 1000.0
 2, ES2, 1000.0
 2, ES3, 1000.0
*CLOAD
 2,1,  1000.0
 3,1, -1000.0
 3,2,  -500.0
 4,2,   500.0
 4,1, -1000.0
*CECHARGE
1,,-1500.
2,,-1500.
3,,-500.
4,,-500.
*EL PRINT
NFORC,
*SECTION PRINT,NAME=SIDE34,SURFACE=SIDE,AXES=LOCAL
 ,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 PRINT
*ENERGY FILE
*NODE FILE
 U,COORD,EPOT,RCHG,RF
*NODE PRINT
 U,COORD,EPOT
 RCHG,RF
*EL PRINT
 S,COORD,
 E,
 LOADS,
 CHRGS,
 EFLX,EPG
 ENER,
 ELEN,
*END STEP