*HEADING
   THREE LAYER COMPOSITE PLATE:  PAGANO (1969) S4 ELEMENTS
   LOADING USING ELEMENT DCOUP3D
*RESTART, WRITE, FREQ=999
*NODE
1, 0.,0.,0
11,10.,0.,0.
101,0.,1.0,0.
111,10.,1.0,0.
*NODE,NSET=HANDLE
1001,5.0,0.5
*NGEN,NSET=EDGE
1,11
101,111
*NSET,NSET=LEFT
1,101
*NSET,NSET=RIGHT
11,111
*NSET,NSET=NALL
EDGE, 
LEFT, 
RIGHT, 
*ELEMENT,TYPE=S4
1,1,2,102,101
*ELGEN,ELSET=PLATE
1,10,1,1
*SHELL SECTION,ELSET=PLATE,COMPOSITE
0.83333,5,LAMINA,PL0
0.83333,5,LAMINA,PL90
0.83333,5,LAMINA,PL0
*MATERIAL,NAME=LAMINA
*ELASTIC,TYPE=LAMINA
25.E6,1.E6,.25,0.5E6,0.5E6,0.2E6
*FAIL STRESS
30.,-12.,.5,-1.5,1.0,0.
*FAIL STRAIN
17.E-2,-7.E-2,5.E-2,-1.3E-2,11.E-2
*ELSET,ELSET=FMEAS
5,
*ORIENTATION,NAME=PL0
1,0,0,0,1,0
3,0
*ORIENTATION,NAME=PL90
1,0,0,0,1,0
3,90
*ELEMENT,TYPE=DCOUP3D,ELSET=DIST
1001,1001
*DISTRIBUTING COUPLING,ELSET=DIST
  1,2.60368E-02
  2,0.15324    
  3,0.29149    
  4,0.40120    
  5,0.47163    
  6,0.49590    
  7,0.47163    
  8,0.40120    
  9,0.29149    
 10,0.15324    
 11,2.60368E-02
101,2.60368E-02
102,0.15324    
103,0.29149    
104,0.40120    
105,0.47163    
106,0.49590    
107,0.47163    
108,0.40120    
109,0.29149    
110,0.15324    
111,2.60368E-02
*BOUNDARY
LEFT,1,3
RIGHT,2,3
EDGE,2
EDGE,4
EDGE,6
*STEP,PERTURBATION
*STATIC
 1.0, 
*CLOAD
HANDLE,3,6.36620
*EL PRINT,POSITION=AVERAGED AT NODES
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15
S, 
TSHR, 
*EL PRINT,ELSET=PLATE
 SF, 
 SE, 
*EL FILE,ELSET=PLATE
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15
S, 
TSHR, 
CFAILURE,
*EL FILE,ELSET=PLATE
SF,SE
*NODE FILE
U, 
*NODE PRINT
U, 
*EL PRINT,ELSET=FMEAS,POSITION=AVERAGED AT NODES
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15
CFAILURE,
*END STEP