*HEADING
:*MODAL DYNAMIC RESPONSE UNDER DYNAMIC FORCE;
SIMULATE 1-D CASE; MATERIAL MODEL FOR THE GASKET BEHAVIOR;
[GKAX2,GKAX2N,GKAX4,GKAX4N,GKAX6,GKAX6N]
*RESTART,WRITE,FREQ=20
*NODE,NSET=N1
1,0.282095,0.
2,0.282095,1.
*NODE,NSET=N1000
1001,0.282095,10.
1002,0.282095,11.
**
1011,0.282095,10.
1012,0.282095,11.
*NODE,NSET=N2000
2001,0.     ,20.
2002,0.56419,20.
2011,0.     ,21.
2012,0.56419,21.
*NODE,NSET=N3000
3001,0.     ,30.
3002,0.56419,30.
3011,0.     ,31.
3012,0.56419,31.
**
3010,0.     ,30.
3020,0.56419,30.
3110,0.     ,31.
3120,0.56419,31.
*NODE,NSET=N4000
4001,0.      ,40.
4002,0.282095,40.
4003,0.56419 ,40.
4011,0.      ,41.
4012,0.282095,41.
4013,0.56419 ,41.
*NODE,NSET=N5000
5001,0.      ,50.
5002,0.282095,50.
5003,0.56419 ,50.
5011,0.      ,51.
5012,0.282095,51.
5013,0.56419 ,51.
**
5010,0.      ,50.
5020,0.282095,50.
5030,0.56419 ,50.
5110,0.      ,51.
5120,0.282095,51.
5130,0.56419 ,51.
*NSET, NSET=NALL
N1, N1000, N2000, N3000, N4000, N5000
*ELEMENT,TYPE=GKAX2,ELSET=SP1
1,1,2
*ELEMENT,TYPE=GKAX2N,ELSET=SP1000
1001,1001,1002
*ELSET,ELSET=SP
SP1,SP1000
*ELEMENT,TYPE=GKAX4,ELSET=SP2000
2001,2001,2002,2011,2012
*ELEMENT,TYPE=GKAX4N,ELSET=SP3000
3001,3001,3002,3011,3012
*ELEMENT,TYPE=GKAX6,ELSET=SP4000
4001,4001,4002,4003,4011,4012,4013
*ELEMENT,TYPE=GKAX6N,ELSET=SP5000
5001,5001,5002,5003,5011,5012,5013
*ELSET,ELSET=SPR
SP2000,SP3000,SP4000,SP5000
*GASKET SECTION,ELSET=SP,MATERIAL=BE
1.2,,,0.56419,0,1,0
*GASKET SECTION,ELSET=SPR,MATERIAL=BE
1.2,,,,0,1,0
*MATERIAL,NAME=BE
*ELASTIC
240.,0.
*ELEMENT,TYPE=MASS,ELSET=MA1
2,2
*ELEMENT,TYPE=MASS,ELSET=MA1000
1002,1012
*ELSET,ELSET=MA
MA1,MA1000
*MASS,ELSET=MA
0.5, 
*ELEMENT,TYPE=MASS,ELSET=MA2000
2002,2011
2003,2012
*ELEMENT,TYPE=MASS,ELSET=MA3000
3002,3110
3003,3120
*ELSET,ELSET=MAS
MA2000,MA3000
*MASS,ELSET=MAS
0.25, 
*ELEMENT,TYPE=MASS,ELSET=MA4000
4002,4011
4003,4012
4004,4013
*ELEMENT,TYPE=MASS,ELSET=MA5000
5002,5110
5003,5120
5004,5130
*ELSET,ELSET=MASS
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,1011,1001
TIE,1012,1002
**
**TIE,3010,3001
**TIE,3020,3002
TIE,3110,3011
TIE,3120,3012
**
**TIE,5010,5001
**TIE,5020,5002
**TIE,5030,5003
TIE,5110,5011
TIE,5120,5012
TIE,5130,5013
****************************************
*EQUATION
2, 
2012,2,1.,2011,2,-1.
**
2, 
3012,1,1.,3011,1,-1.
**
2, 
4012,2,1.,4011,2,-1.
2, 
4013,2,1.,4011,2,-1.
**
2, 
5012,1,1.,5011,1,-1.
2, 
5013,1,1.,5011,1,-1.
****************************************
*BOUNDARY
1,1,2,0
2,1,1,0
**
1001,1,1,0
**
2001,1,2,0
2002,1,2,0
2011,1,1,0
2012,1,1,0
**
3001,1,1,0
3002,1,1,0
**
4001,1,2,0
4002,1,2,0
4003,1,2,0
4011,1,1,0
4012,1,1,0
4013,1,1,0
**
5001,1,1,0
5002,1,1,0
5003,1,1,0
****************************************
*STEP
*FREQUENCY, EIGENSOLVER=LANCZOS, SIM=NO
6,1.
*OUTPUT,FIELD,FREQ=0
*MODAL FILE
*END STEP
****************************************
*STEP
*MODAL DYNAMIC
1e-3,1e0,
*CLOAD, AMP=COS
2,2,-10.
**
1002,1,-10
**
2011,2,-5.
2012,2,-5.
**
3011,1,-5.
3012,1,-5.
**
4011,2,-3.3333
4012,2,-3.3333
4013,2,-3.3333
**
5011,1,-3.3333
5012,1,-3.3333
5013,1,-3.3333
*EL PRINT,FREQ=500
S,
E,
*EL FILE,FREQ=50
S,
E,
*NODE PRINT,FREQ=500,GLOBAL=YES
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