斜拉桥预应力混凝土索塔锚固区受力分析案例

et,3,link8   !!!!!!!!!  预应力钢束单元nas=1.40e-4  !!!!!!!!!  钢束截面积         nt=0.0053    !!!!!!!!!初应变以提供预应力，!!!!!!!!!!!!!!!！预应力为F = 截面积*弹性模量*初始应变r,3,nas*16,nt !!!!!!!!!!定义截面积和初应变实常数

cm,gsnode,node       !钢束节点*get,senum,node,,count*dim,snode,,senum         !钢束节点编号集*dim,cnode,,senum         !与钢束节点耦合节点编号集*get,nodei,node,,num,minsnode(1)=nodei*do,i,2,senumsnode(i)=ndnext(snode(i-1))*enddo               allsel,allcmsel,u,gsnode*do,i,1,senumnodei=snode(i)nodej=nnear(nodei)       !选择与钢束节点最近的混凝土单元节点cnode(i)=nodejnsel,u,,,nodej*enddoallsel,all*do,i,1,senumcp,next,all,snode(i),cnode(i)    !耦合节点所有自由度*enddo