!本文件计算成桥3年后恒荷载+活荷载工况1作用下的结构
/prep7
!--------------------------------------------------------------
ET,1,SOLID187   !定义单元类型,采用10节点四面体单元
!混凝土C40
MP,EX,1,3.25e4
MP,NUXY,1,0.2
MP,DENS,1,2.5e-6
!钢材
MP,EX,2,2.06e5
MP,NUXY,2,0.3
MP,DENS,2,7.85e-6
!--------------------------------------------------------------
!下面开始实体建模
!--------------------------------------------------------------
!桩承台
k,1,0,    0,0
k,2,11000,0,0
k,3,11000, 3500,0
k,4,    0, 3500,0
k,5,0,    0,2000
k,6,11000,0,2000
k,7,11000, 3500,2000
k,8,    0, 3500,2000
V,1,2,3,4,5,6,7,8
k,15,1000 ,0,3000
k,16,10000,0,3000
k,17,10000, 2500,3000
k,18,1000 , 2500,3000
V,5,6,7,8,15,16,17,18
k,21,3200 ,0   , 3000
k,22,6850 ,0   , 3000
k,23,6850 ,0   ,10920
k,24,3200 ,0   ,10920
k,25,3200 ,1500, 3000
k,26,6850 ,1500, 3000
k,27,6850 ,1100,10920
k,28,3200 ,1100,10920
V,21,22,23,24,25,26,27,28
!--------------------------------------------------------------
!主杆牛腿以下部分
k,31,4200 ,0   , 3000
k,32,4200 ,0   , 9120
k,33,4200 ,1500, 9120
k,34,4200 ,1500, 3000
A,31,32,33,34
k,35,3200 ,0   ,10320
k,36,3200 ,1500,10320
A,32,33,36,35
k,41,5592 ,0   , 6220
k,42,5200 ,0   ,10920
k,43,5592 ,1500, 6200
k,44,5200 ,1500,10920
A,41,42,44,43
k,45,6850 ,0   , 5065
k,46,6850 ,1500, 5065
L,45,46
LARC,41,45,23,1260,
LARC,43,46,27,1260,
AL,43,45,44,46
ASEL,,,,18,21
VSBA,3,all
ALLSEL,ALL
VDELE,4
VDELE,5
NUMCMP,VOLU
!--------------------------------------------------------------
!主杆牛腿以上部分
k,51,4200 ,0    ,10920
k,52,5200 ,0    ,10920
k,53,5200 ,0    ,26600
k,54,4200 ,0    ,26600
k,55,4200 ,1100 ,10920
k,56,5200 ,1100 ,10920
k,57,5200 ,1100 ,26600
k,58,4200 ,1100 ,26600
V,51,52,53,54,55,56,57,58
!--------------------------------------------------------------
!附杆牛腿以上部分
k,61,5200 ,0    ,10920
k,62,9050 ,0    ,10920
k,63,9050 ,0    ,28000
k,64,5200 ,0    ,28000
k,65,5200 ,400  ,10920
k,66,9050 ,400  ,10920
k,67,9050 ,400  ,28000
k,68,5200 ,400  ,28000
V,61,62,63,64,65,66,67,68
k,69,5700 ,0    ,28000
k,70,5700 ,400  ,28000
L,69,70
k,71,6798.82,0,25000
k,72,6798.82,400,25000
L,71,72
LARC,69,71,61,45566,
LARC,70,72,65,45566,
AL,79,81,80,82
k,73,8122.9,0,20000
k,74,8122.9,400,20000
L,73,74
LARC,71,73,61,45566,
LARC,72,74,65,45566,
AL,80,84,83,85
k,75,8861.8,0,15000
k,76,8861.8,400,15000
L,75,76
LARC,73,75,61,45566,
LARC,74,76,65,45566,
AL,83,87,86,88
LARC,75,62,61,45566,
LARC,76,66,65,45566,
AL,86,89,46,90
k,81,8300,0,10920
k,82,8300,400,10920
k,83,8108.6,0,15000
k,84,8108.6,400,15000
L,81,82
LARC,81,83,61,44086
L,83,84
LARC,82,84,65,44086
AL,91,92,93,94
k,85,7357.1,0,20000
k,86,7357.1,400,20000
L,85,86
LARC,83,85,61,44086
LARC,84,86,65,44086
AL,93,96,95,97
k,87,6374.2,0,23850
k,88,6374.2,400,23850
L,87,88
LARC,85,87,61,44086
LARC,86,88,65,44086
AL,95,98,99,100
k,89,5200,0,23675
k,90,5200,400,23675
L,89,90
LARC,87,89,61,600
LARC,88,90,65,600
AL,98,101,102,103
ASEL,,,,42,49
VSBA,5,all
ALLSEL,ALL
VDELE,6
VDELE,7
NUMCMP,VOLU
ALLSEL,ALL
!--------------------------------------------------------------
!附杆牛腿以下部分
k,101,6850,0,3000
k,102,9050,0,3000
k,103,9050,0,10920
k,104,6850,0,10920
k,105,6850,400,3000
k,106,9050,400,3000
k,107,9050,400,10920
k,108,6850,400,10920
V,101,102,103,104,105,106,107,108
k,201,6850,0,5065
k,202,8106.4,0,6272.2
k,203,8300,0,10920
k,204,6850,800,5065
k,205,8106.4,800,6272.2
k,206,8300,800,10920
k,207,6850,0,6320
k,208,6850,800,6320
NUMCMP,LINE
L,201,204
L,202,205
L,203,206
LARC,201,202,207,1260
L,202,203
LARC,204,205,208,1260
L,205,206
NUMCMP,AREA
AL,122,127,123,125
AL,123,128,124,126
ASEL,,,,63,64
VSBA,6,all
VDELE,7
NUMCMP,AREA
NUMCMP,LINE
k,301,6850,700,3000
k,302,6850,700,5065
k,303,7150,400,3000
k,304,7150,400,5101.8
k,305,6850,400,3000
k,306,6850,400,5065
V,301,303,305,302,304,306
ALLSEL,ALL
VPLOT
!--------------------------------------------------------------
!钢索垫
k,401,4200,0,28000
k,402,4200,0,26600
k,403,4200,1100,26600
k,404,4200,1500,27413
k,405,5200,0,28000
k,406,5200,0,26600
k,407,5200,1100,26600
k,408,5200,1500,27413
k,409,4200,400,28000
k,410,5200,400,28000
V,409,402,403,404,410,406,407,408
V,401,402,409,405,406,410
!--------------------------------------------------------------
!将各块合成一个volumn
VADD,5,8
VADD,ALL              !将各块合成一个块
VSYMM,Y,ALL,,,,0,0    !镜像得到模型的另一半
VADD,ALL              !再合成
NUMMRG,ALL, , , ,LOW  !消除重复的点线面
NUMCMP,ALL            !重新编号
!--------------------------------------------------------------
!将钢材和混凝土分开
A,46,47,88,87
A,21,117,92,86
ASEL,,,,105,106
VSBA,1,ALL
ALLSEL,ALL
NUMMRG,ALL, , , ,LOW  !消除重复的点线面
NUMCMP,ALL            !重新编号
VSEL, , , ,2
VATT,1, , 1, 0
VSEL, , , ,1
VATT,2, , 1, 0
ALLSEL,ALL
!--------------------------------------------------------------
!合并一些面,以便优化网格的划分
AADD,95,76
AADD,52,50
NUMMRG,ALL, , , ,LOW  !消除重复的点线面
NUMCMP,ALL            !重新编号
!--------------------------------------------------------------
!找出牛腿处的加载面
k,301,3700,0,10920
k,302,3375,0,10920
k,303,4025,0,10920
k,304,3700,375,10920
k,305,3700,-375,10920
LARC,302,304,301,375
LARC,302,305,301,375
LARC,303,304,301,375
LARC,303,305,301,375
FLST,3,2,4,ORDE,2
FITEM,3,215
FITEM,3,217
ASBL,      96,P51X
FLST,3,2,4,ORDE,2
FITEM,3,216
FITEM,3,218
ASBL,      54,P51X
!--------------------------------------------------------------
!找出顶点的关键点
k,201,4700,-400,28000
k,202,4700,0,28000
k,203,4700,400,28000
L,201,202
L,202,203
ASBL,93,222
ASBL,50,167
NUMMRG,ALL, , , ,LOW  !消除重复的点线面
NUMCMP,ALL            !重新编号
!--------------------------------------------------------------
!施加位移约束及荷载
DA,7,ALL
DA,74,ALL
ACEL,0,0,1                    !自重
FK,119,FZ,-2.3845e7            !顶点恒载+活载
FK,119,FY,2.138e5             !顶点恒载+活载
SFA,95,1,PRES,8.377776         !牛腿上恒载+活载
SFA,104,1,PRES,8.377776        !牛腿上恒载+活载
!--------------------------------------------------------------
!网格划分
SMRT,1
VMESH,ALL
!--------------------------------------------------------------
!求解
finish
/solu
solve!---------------------------------------------------------
!观察结果
FINISH
/POST1
PLNSOL,U,Y,0,1