*HEADING
viscoelastic damper under constant strain range (50%) cycling
*NODE
1, -1.75, -0.75
33, 1.75, -0.75
801, -1.75, -0.25
833, 1.75, -0.25
1601, -1.75, 0.25
1633, 1.75, 0.25
2401, -1.75, 0.75
2433, 1.75, 0.75
*NODE, NSET=TOPREFNODE
10000, 0.0, 0.75
*NGEN,NSET=BOTTOM
1, 33
*NGEN,NSET=INTRFB
801, 833
*NGEN,NSET=INTRFT
1601, 1633
*NGEN,NSET=TOP
2401, 2433
*NFILL
BOTTOM, INTRFB, 8, 100
*NFILL
INTRFB, INTRFT, 8, 100
*NFILL
INTRFT, TOP , 8, 100
*NSET,NSET=ALLNODES,GENERATE
1, 2433, 1
*NSET,NSET=TEMPS
817, 1217, 1617
**
*MPC
BEAM, TOP, TOPREFNODE
**
*ELEMENT,TYPE=CPE4T ,ELSET=PLATEB
1, 1, 2, 102, 101
*ELGEN,ELSET=PLATEB
1, 32, 1, 1, 8, 100, 100
** *ELEMENT,TYPE=CPE4T ,ELSET=VEDAMP
*ELEMENT,TYPE=CPE4HT ,ELSET=VEDAMP
801, 801, 802, 902, 901
*ELGEN,ELSET=VEDAMP
801, 32, 1, 1, 8, 100, 100
*ELEMENT,TYPE=CPE4T ,ELSET=PLATET
1601,1601,1602,1702,1701
*ELGEN,ELSET=PLATET
1601, 32, 1, 1, 8, 100, 100
**
*SOLID SECTION,ELSET=PLATEB,MATERIAL=STEEL
*SOLID SECTION,ELSET=VEDAMP,MATERIAL=POLYMER
*SOLID SECTION,ELSET=PLATET,MATERIAL=STEEL
**
*MATERIAL,NAME=STEEL
** elastic modulus (lbf/in2), poisson ratio
*ELASTIC
29.0E+06, 0.3
** mass density (lbf-s2/in4)
*DENSITY
7.30E-04
** coefficient of thermal expansion (in/in-C)
*EXPANSION
10.8E-06
** thermal conductivity (btu/s-in-C)
*CONDUCTIVITY
12.0E-04
** specific heat (btu-in/lbf-s2-C)
*SPECIFIC HEAT
76.3
**
*MATERIAL,NAME=POLYMER
*ELASTIC, MODULI=INSTANTANEOUS
6.232E+03, 0.495, 21.7
*VISCOELASTIC, TIME=PRONY
0.0396, 0.0, 1.766
0.1018, 0.0, 0.1536
0.8580, 0.0, 0.0127
*TRS, DEFINITION=WLF
21.7, 56.1, 1000.
** mass density (lbf-s2/in4) from Kasai (1993)
*DENSITY
9.93E-05
** coefficient of thermal expansion (in/in-C) ESTIMATE
*EXPANSION
9.0E-05
** thermal conductivity (btu/s-in-C) ESTIMATE
*CONDUCTIVITY
6.0E-06
** specific heat (btu-in/lbf-s2-C) from Kasai (1993)
*SPECIFIC HEAT
300.
** inelastic dissipation (convert lbf-in to btu)
*INELASTIC HEAT FRACTION
1.071E-4
**
*INITIAL CONDITIONS, TYPE=TEMPERATURE
ALLNODES, 21.7
**
*AMPLITUDE, NAME=CYCLIC, DEFINITION=PERIODIC
1, 6.283, 0.0, 0.0
0.0, 1.00
**
*RESTART,WRITE,FREQUENCY=10
**
*STEP, INC=20000, NLGEOM=YES
*COUPLED TEMPERATURE-DISPLACEMENT, CETOL=5e-3
0.01, 10.00, 1e-5, 0.1
*BOUNDARY
BOTTOM, 1, 2
TOPREFNODE , 2,6
*BOUNDARY, AMPLITUDE=CYCLIC
TOPREFNODE , 1, 1, 0.25
**
*OUTPUT, FIELD, VARIABLE=PRESELECT,FREQ=100
*NODE OUTPUT
NT
*OUTPUT, HISTORY, VARIABLE=PRESELECT
*NODE OUTPUT, NSET=TOPREFNODE
U1, RF1
*MONITOR, NODE=1217, DOF=11
*END STEP