!建模
finish$/clear$/prep7 ET,1,SOLID65
ET,2,LINK8
k,,60,210,0
k,,-60,210,0
k,,-60,-210,0
k,,-20,-210,0
k,,20,-210,0
k,,60,-210,0
k,,60,210,50
k,,-60,210,50
k,,-60,-210,50
k,,-20,-210,50
k,,20,-210,50
k,,60,-210,50
*do,j,0,58,1
*do,i,7+j*6,12+j*6,1
kgen,2,i,,,,,100,,, *enddo
*enddo
k,,60,210,6000 k,,-60,210,6000 k,,-60,-210,6000 k,,-20,-210,6000 k,,20,-210,6000 k,,60,-210,6000
*do,i,1,367,6
l,i,i+1
l,i+1,i+2
l,i+2,i+3
l,i+3,i+4
l,i+4,i+5
l,i+5,i
*enddo
*do,i,1,6,1
*do,j,i,i+360,6
l,j,j+6
*enddo
*enddo
!附加点
k,,100,250,0
k,,-100,250,0
k,,-100,-250,0
k,,100,-250,0
k,,60,250,0
k,,-60,250,0
k,,-60,-250,0
k,,60,-250,0
k,,100,250,6000
k,,-100,250,6000
k,,-100,-250,6000
k,,100,-250,6000
k,,60,250,6000
k,,-60,250,6000
k,,-60,-250,6000
k,,60,-250,6000
!粘体
v,1,2,3,6,367,368,369,372
v,373,377,380,376,381,385,388,384 v,378,374,375,379,386,382,383,387 v,377,378,2,1,385,386,368,367
v,6,3,379,380,372,369,387,388 vglue,all
NUMMRG,KP, , , ,LOW
!参数
R,1,1256,
R,2,113.04,0, MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,1.8145e10 MPDATA,PRXY,1,,0.2
TB,kinh,1,1,13,0
TBTEMP,0
TBPT,,0.0002 , 3629000 TBPT,,0.0004 , 6876000 TBPT,,0.0006, 9741000 TBPT,,0.0008, 12224000 TBPT,,0.001, 14325000 TBPT,,0.0012, 16044000 TBPT,,0.0014, 17831000 TBPT,,0.0016, 18336000 TBPT,,0.0018, 18909000 TBPT,,0.002, 19100000 TBPT,,0.0024, 19063032
TBPT,,0.0028, 19026065 TBPT,,0.0032, 18989097 TB,CONC,1,1,9, TBTEMP,0
TBDATA,,0.5,0.95,1.71,19.1 ,, TBDATA,,0,0,1
MPTEMP,,,,,,,, MPTEMP,1,0
MPDATA,EX,2,,2e11 MPDATA,PRXY,2,,0.3
TB,BISO,2,1,2, TBTEMP,0
TBDATA,,310e6,0.76e11,,,,
!分网
VSEL, , , , all VATT, 1, , 1 ESIZE,50,0,
vsweep,all
allsel,all
LSEL, , , ,1,372
LATT,2,2,2, , , ,
LESIZE,all,50, , , , , , ,1 lmesh,all
allsel,all
LSEL, , , ,373,738
LATT,2,1,2, , , ,
LESIZE,all,50, , , , , , ,1 lmesh,all
allsel,all
NUMMRG,ALL, , , ,LOW
!加力
ASEL,S,loc ,z ,0
ASEL,a,loc ,z ,6000
!NSLA,R,1
Da,all,ALL
allsel,all
ASEL,S,loc ,y ,250
SFA,all,1,PRES,1000000 allsel,all
/SOL
TIME,1
antype,0
nlgeom,1
nropt,full,
eqslv,spar,,0,
time,1.0
autots,1
nsubst,1000,200,50,1
kbc,0
cnvtol,u,,0.03,0
neqit,50
pred,on,,on
outres,all,all
SAVE
SOLVE
*DO,I,2,1000,1
TIME,I
etable,strain,epto,eqv
esel,s,etab,strain,0.033
EKILL,all
SAVE
SOLVE
*ENDDO
!/sol
!solve
!/POST1
!PLDISP,1
仅含建模部分后处理理论纷争因ANSYS 版本不同稳定性不高难以服众仅限参考本模型属于分离式建模考虑各种复杂情况（两排钢筋外加不等间距箍筋）
声明：本模型为本人17届北京力学分会会议论文集附属文件。

完全引用请注明。

声明人：flybebrave
建模后概图：。