文档介绍：时程分析实例
时程分析实例
finish
/clear
/filename,ex6-1 力）360
cable_strain_zs(5)=-3 !定义主索初始应变（预应力）350
cable_strain_zs(6)=-3 !定义主索初始应变（预应力）350
cable_strain_zs(7)=-3 !定义主索初始应变（预应力）300
cable_strain_zs(8)=-3 !定义主索初始应变（预应力）260
cable_strain_zs(9)=-3 !定义主索初始应变（预应力）260
cable_strain_zs(10)=-3 !定义主索初始应变
（预应力）220
cable_strain_zs(11)=-3 !定义主索初始应变（预应力）200
!
*do,i,120,130 !定义主索实常数
R,i,,cable_strain_zs(i-119)
*enddo
!定义桥面与塔连接单元实常数
r,131,16,,,4,4 !定义桥面与塔的连接梁单元实常数
!定义材料参数
mp,ex,1, !定义塔上部材料特性
mp,prxy,1,
mp,dens,1,
!
MP,EX,2, !定义桥面材料特性
mp,prxy,2,
MP,DENS,2,
!
MP,EX,3,2e11 !定义背索材料特性
mp,prxy,3,
MP,DENS,3,
!**********************************
!生成关键点
!**********************************
!定义桥塔的关键点
*do,i,,,- !生成塔上部关键点
k,110-i*2,-(+i)/,i,0
*enddo
!
*do,i,33,0,- !生成塔下部关键点
k,110-i*2,-*i/,i,*i/-
*enddo
*do,i,-,-,-
k,110-i*2,-*i/6,i,-i/2-
*enddo
*do,i,33,0,-
k,182-i*2,-*i/,i,-*i/+
*enddo
*do,i,-,-,-
k,182-i*2,-*i/6,i,i/2+
*enddo
!定义桥面关键点(其中配跨为曲线)
k,192,-2,0,-6 !生成左配跨关键点
k,193,0,0,-6
k,194,2,0,-6
k,195,9,0,-6
!
*do,i,196,205 !生成左桥面关键点
k,i,(i-195)*9+9,0,-6
*enddo
k,206,105,0,-6
!
k,207,-2,0,6 !生成右配跨关键点
k,208,0,0,6
k,209,2,0,6
k,210,9,0,6
!
*do,i,211,220 !生成右桥面关键点
k,i,(i-210)*9+9,0,6
*enddo
k,221,105,0,6
!定义背索锚碇关键点
k,222,-31,0,14
k,223,-31,0,-14
!**********************************
!划分网格，生成单元
!************************