*HEADING
PULSE LOADING, QUIET BOUND [CIN3D18R]
STEADY STATE DYNAMICS,DIRECT VERIFICATION
*NODE,NSET=FEN
1,0.,0.
2,0.,-1.
3,1.,0.
4,1.,-1.
5,0.,0.,1
6,0.,-1.,1.
7,1.,0.,1.
8,1.,-1.,1.
16,0.5,-1.,1.
17,1.,-1.,0.5
18,0.5,-1.,0.
19,0.,-1.,0.5
20,0.5,0.,1.
21,1.,0.,0.5
22,0.5,0.,0.,
23,0.,0.,0.5
24,0.,-0.5,1.
25,1.,-0.5,1.
26,1.,-0.5,0.
27,0.,-0.5,0.
28,0.5,-0.5,0.5
29,0.5,-1.,0.5
30,0.5,0.,0.5
31,0.5,-0.5,1.
32,1.,-0.5,0.5
33,0.5,-0.5,0.
34,0.,-0.5,0.5
102,0.,-1.
104,1.,-1.
106,0.,-1.,1.
108,1.,-1.,1.
116,0.5,-1.,1.
117,1.,-1.,0.5
118,0.5,-1.,0.
119,0.,-1.,0.5
129,0.5,-1.,0.5
*NSET,NSET=INTER1
2,4
*NSET,NSET=INTER2
6,8
*NSET,NSET=INTER3
16, 
*NSET,NSET=INTER4
17, 
*NSET,NSET=INTER5
18, 
*NSET,NSET=INTER6
19, 
*NSET,NSET=INTER7
29, 
*NSET,NSET=TOP,GENERATE
1,7,2
20,23,1
*NCOPY,OLD SET=INTER1,CHANGE NUMBER=7,POLE,NEW SET=FAR1
1, 
*NCOPY,OLD SET=INTER2,CHANGE NUMBER=7,POLE,NEW SET=FAR2
1, 
*NCOPY,OLD SET=INTER3,CHANGE NUMBER=32,POLE,NEW SET=FAR3
1, 
*NCOPY,OLD SET=INTER4,CHANGE NUMBER=32,POLE,NEW SET=FAR4
1, 
*NCOPY,OLD SET=INTER5,CHANGE NUMBER=32,POLE,NEW SET=FAR5
1, 
*NCOPY,OLD SET=INTER6,CHANGE NUMBER=32,POLE,NEW SET=FAR6
1, 
*NCOPY,OLD SET=INTER7,CHANGE NUMBER=23,POLE,NEW SET=FAR7
1, 
*NSET,NSET=NALL
FAR1,FAR2,FAR3,FAR4,FAR5,
FAR6,FAR7,FEN
*ELEMENT,TYPE=C3D27,ELSET=FE
1,6,8,4,2,5,7,3,1,16,17,18,19,
20,21,22,23,24,25,26,27,28,29,
30,31,32,33,34
*SOLID SECTION,ELSET=FE,MATERIAL=ONE
*ELEMENT,TYPE=CIN3D18R,ELSET=IE
2,102,104,108,106,118,117,116,119,9,11,15,13,
50,49,48,51,129,52
*SURFACE,NAME=SFIN,TYPE=ELEMENT
1, S1
*SURFACE,NAME=SINF,TYPE=ELEMENT
2, S1
*TIE, NAME=TIE
SFIN, SINF
*SOLID SECTION,ELSET=IE,MATERIAL=ONE
*MATERIAL,NAME=ONE
*ELASTIC
1.,.1
*DENSITY
.01, 
*RESTART,WRITE,FREQUENCY=1
*STEP
*STEADYSTATEDYNAMICS,DIRECT,FREQUENCY SCALE=LINEAR
0.01,0.04,4,1
*BOUNDARY
NALL,1
NALL,3
TOP,2,2,1.E-4
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT
*ENERGY PRINT
*EL PRINT,FREQUENCY=0
*NODE PRINT
U, 
PU, 
*OUTPUT,FIELD
*NODE OUTPUT
U, 
*END STEP
*STEP
*STEADYSTATEDYNAMICS,DIRECT,FREQUENCY SCALE=LINEAR
0.01,0.04,4,1
*BOUNDARY,OP=NEW
NALL,2,3
TOP,1,1,1.E-4
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT
*ENERGY PRINT
*EL PRINT,FREQUENCY=0
*NODE PRINT
U, 
PU, 
*OUTPUT,FIELD
*NODE OUTPUT
U, 
*END STEP