刚构耦合力筋工科.docVIP

下载本文档

1
0
约2.76万字
约 29页
2017-11-20 发布于江苏
举报
版权申诉

刚构耦合力筋工科.doc

1、本文档共29页，可阅读全部内容。
2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
5、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
6、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
7、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
8、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

刚构耦合力筋工科

!宁蚌一标变截面连续纲构桥 !单元太多，所以耦合很慢 finish /clear /prep7 /title,lian xv gang gou et,1,solid95 et,2,link8 et,3,solid95 mp,dens,1,2600 mp,ex,1,3.5e10 mp,prxy,1,0.1667 r,1 mp,dens,2,7800 mp,ex,2,1.95e11 mp,prxy,2,0.3 mp,dens,3,2600 mp,ex,3,3.0e10 mp,prxy,3,0.1667 r,3 areagjx=1.4e-4 *dim,gjarea,array,2 gjarea(1)=15*areagjx gjarea(2)=19*areagjx F=195.5e3 Ey=1.95e11 L=0.5 detL=F*L/(Ey*areagjx) istrn=detL/(detL+L) r,4,gjarea(1),istrn r,5,gjarea(2),istrn acel,,9.8 *dim,z,,15 *dim,x,,7 *dim,y,,8 z(1)=0,-1,-4,-7,-10,-13.5,-17,-20.5,-24.5,-28.5, z(11)=-32.5,-36.5,-38.5,-42.3,-47 x(1)=0 x(2)=-1.5 x(3)=-3.5 x(4)=-4 x(5)=-6 x(6)=-8.25 x(7)=-3.0 y(1)=0 y(2)=-0.15 y(3)=-0.25 y(4)=-0.3 y(5)=-0.65 y(6)=-3.45 y(7)=-3.7 y(8)=-4.2 k,1,x(1),y(1),z(1) k,2,x(2),y(1),z(1) k,3,x(3),y(1),z(1) k,4,x(4),y(1),z(1) k,5,x(5),y(1),z(1) k,6,x(6),y(1),z(1) k,7,x(6),y(2),z(1) k,8,x(5),y(4),z(1) k,9,x(4),y(5),z(1) k,10,x(4),y(6),z(1) k,11,x(4),y(8),z(1) k,12,x(3),y(8),z(1) k,13,x(3)+0.5,y(8),z(1) k,14,x(1),y(8),z(1) k,15,x(1),y(7),z(1) k,16,x(3)+0.5,y(7),z(1) k,17,x(3),y(6),z(1) k,18,x(3),y(5),z(1) k,19,x(2),y(3),z(1) k,20,x(1),y(3),z(1) !定义顶板预应力筋 !腹板束T1 *get,kp0,kp,0,num,max *GET,LINE1,LINE,0,NUM,MAX k,kp0+1,-3.77,-1.44,-4.001 k,kp0+2,-3.77,-0.64,-1.211 k,kp0+3,-3.77,-0.64,1.211 k,kp0+4,-3.77,-1.44,4.001 l,kp0+1,kp0+2 l,kp0+2,kp0+3 l,kp0+3,kp0+4 LFILLT,LINE1+1,LINE1+2,4 LFILLT,LINE1+2,LINE1+3,4 lsel,s,loc,x,-3.77 LCOMB,ALL cm,gjx_T1,line latt,2,5,2 !腹板束T2 *get,kp0,kp,0,num,max *GET,LINE1,LINE,0,NUM,MAX k,kp0+1,-3.77,-1.28,-7.001 k,kp0+2,-3.77,-0.48,-3.237 k,kp0+3,-3.77,-0.48,3.237 k,kp0+4,-3.77,-1.28,7.001 l,kp0+1,kp0+2 l,kp0+2,kp0+3 l,kp0+3,kp0+4 LFILLT,LINE1+1,LINE1+2,12 LFILLT,LINE1+2,LINE1+3,12 lsel,s,line,,LINE1+1,LINE1+5,1 LCOMB,ALL cm,gjx_T2,line latt,2,5,2 !腹板束T3 *get,kp0,kp,0,num,max *GET,LINE1,LINE,0,NUM,MAX k,kp0+1,-3.77,-1.12,-10.001 k,kp0+2,-3.77,-0.32,-6.237 k,k