*HEADING
:*MODAL DYNAMIC RESPONSE UNDER DYNAMIC FORCE;
SIMULATE 1-D CASE; GASKET BEHAVIOR MODEL FOR THE GASKET BEHAVIOR;
[GKPE4,GKPS4,GKPS4N,GKPE6,GKPS6,GKPS6N]
*RESTART,WRITE,FREQ=20
*NODE,NSET=N1
1,0.,0.
2,1.,0.
11,0.,1.
12,1.,1.
*NODE,NSET=N1000
1001,10.,0.
1002,11.,0.
1011,10.,1.
1012,11.,1.
*NODE,NSET=N2000
2001,20.,0.
2002,21.,0.
2011,20.,1.
2012,21.,1.
**
2020,21.,0.
2120,21.,1.
*NODE,NSET=N3000
3001,30.,0.
3002,31.,0.
3011,30.,0.5
3012,31.,0.5
3021,30.,1.
3022,31.,1.
*NODE,NSET=N4000
4001,40.,0.
4002,41.,0.
4011,40.,0.5
4012,41.,0.5
4021,40.,1.
4022,41.,1.
*NODE,NSET=N5000
5001,50.,0.
5002,51.,0.
5011,50.,0.5
5012,51.,0.5
5021,50.,1.
5022,51.,1.
**
5020,51.,0.
5120,51.,0.5
5220,51.,1.
*NSET, NSET=NALL
N1, N1000, N2000, N3000, N4000, N5000
*ELEMENT,TYPE=GKPE4,ELSET=SP1
1,11,1,12,2
*ELEMENT,TYPE=GKPS4,ELSET=SP1000
1001,1011,1001,1012,1002
*ELEMENT,TYPE=GKPS4N,ELSET=SP2000
2001,2011,2001,2012,2002
*ELEMENT,TYPE=GKPE6,ELSET=SP3000
3001,3021,3011,3001,3022,3012,3002
*ELEMENT,TYPE=GKPS6,ELSET=SP4000
4001,4021,4011,4001,4022,4012,4002
*ELEMENT,TYPE=GKPS6,ELSET=SP5000
5001,5021,5011,5001,5022,5012,5002
*ELSET,ELSET=SP
SP1,SP1000,SP2000,SP3000,SP4000,SP5000
*GASKET SECTION,ELSET=SP,BEHAVIOR=BE
1.2,
*GASKET BEHAVIOR,NAME=BE
*GASKET THICKNESS BEHAVIOR,TYPE=DAMAGE,DIRECTION=LOADING,VARIABLE=STRESS
0.,0.
200.,1.
*ELEMENT,TYPE=MASS,ELSET=MA1
2,2
3,12
*ELEMENT,TYPE=MASS,ELSET=MA1000
1002,1002
1003,1012
*ELEMENT,TYPE=MASS,ELSET=MA2000
2002,2020
2003,2120
*ELSET,ELSET=MA
MA1,MA1000,MA2000
*MASS,ELSET=MA
0.25, 
*ELEMENT,TYPE=MASS,ELSET=MA3000
3002,3002
3003,3012
3004,3022
*ELEMENT,TYPE=MASS,ELSET=MA4000
4002,4002
4003,4012
4004,4022
*ELEMENT,TYPE=MASS,ELSET=MA5000
5002,5020
5003,5120
5004,5220
*ELSET,ELSET=MASS
MA3000,MA4000,MA5000
*MASS,ELSET=MASS
0.16666, 
*AMPLITUDE,NAME=COS,DEFINITION=PERIODIC
1,10.,0.,0.
10.,0.
** N,w,t_0,A_0 | A_1,B_1  ==>  P = P_0 cos(wt) = 10 cos(10t)
****************************************
*MPC
TIE,2020,2002
TIE,2120,2012
**
TIE,5020,5022
TIE,5120,5022
TIE,5220,5022
****************************************
*EQUATION
2, 
12,1,1.,2,1,-1.
**
2, 
1012,1,1.,1002,1,-1.
**
2, 
2012,1,1.,2002,1,-1.
**
2, 
3002,1,1.,3022,1,-1.
2, 
3012,1,1.,3022,1,-1.
**
2, 
4002,1,1.,4022,1,-1.
2, 
4012,1,1.,4022,1,-1.
**
2, 
5002,1,1.,5022,1,-1.
2, 
5012,1,1.,5022,1,-1.
*BOUNDARY
1,1,2,0
2,2,2,0
11,1,2,0
12,2,2,0
**
1001,1,2,0
1002,2,2,0
1011,1,2,0
1012,2,2,0
**
2001,1,1,0
2011,1,1,0
**
3001,1,2,0
3002,2,2,0
3011,1,2,0
3012,2,2,0
3021,1,2,0
3022,2,2,0
**
4001,1,2,0
4002,2,2,0
4011,1,2,0
4012,2,2,0
4021,1,2,0
4022,2,2,0
**
5001,1,2,0
5002,2,2,0
5011,1,2,0
5012,2,2,0
5021,1,2,0
5022,2,2,0
****************************************
*STEP
*FREQUENCY, EIGENSOLVER=LANCZOS
6,1.0
*OUTPUT,FIELD,FREQ=0
*MODAL FILE
*END STEP
****************************************
*STEP
*MODAL DYNAMIC
1e-3,1e0,
*MODAL DAMPING
1,6
*SELECT EIGENMODES, GENERATE
1,6,1
*CLOAD, AMP=COS
2,1,-5.
12,1,-5.
**
1002,1,-5.
1012,1,-5.
**
2002,1,-5.
2012,1,-5.
**
3002,1,-3.33333333
3012,1,-3.33333333
3022,1,-3.33333333
**
4002,1,-3.33333333
4012,1,-3.33333333
4022,1,-3.33333333
**
5002,1,-3.33333333
5012,1,-3.33333333
5022,1,-3.33333333
*EL PRINT,FREQ=500
S,
E,
*EL FILE,FREQ=50
S,
E,
*NODE PRINT,FREQ=500
U,
RF, 
*NODE FILE,FREQ=50
U,
RF, 
*ENERGY PRINT,FREQ=500
*OUTPUT,FIELD,OP=NEW,FREQ=50
*ELEMENT OUTPUT,ELSET=SP
S,E
*NODE OUTPUT, NSET=NALL
U,RF
*OUTPUT,HISTORY,FREQ=50
*ELEMENT OUTPUT,ELSET=SP
S,E
*NODE OUTPUT, NSET=NALL
U,RF
*END STEP