用Opensees进行IDA分析(桥墩模型命令流).docx

下载文档 降价啦

22
0
约9.8千字
约 16页
2017-12-20 发布于河南
举报
版权申诉
保障服务

用Opensees进行IDA分析(桥墩模型命令流).docx

1、本文档共16页，可阅读全部内容。
2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。

用Opensees进行IDA分析(桥墩模型命令流)

wipe# Opensees dandun# #Units:kN, m, sec# -----------------# Start of model generation# -----------------# Create ModeBulider (with two-dimensions and 3 DOF/node)model basic -ndm 2 -ndf 3 # -----------------#tag X Y node 1 0.0 0.0node 2 0.0 0.0node 3 0.0 2.0 node 4 0.0 4.0node 5 0.0 6.0 node 6 0.0 8.0node 7 0.0 10.0node 8 0.0 12.0node 9 0.0 14.0node 10 0.0 16.0node 11 0.0 18.0 node 12 0.0 20.0 # -----------------# Fix supports at base of columns# tag DX DY RZfix 1 1 1 1 # ----------------# Concretetag fc ec0fcu ecu # Core concrete (confined)uniaxialMaterial Concrete01 1 -25600.0 -0.00219 -17780.0 -0.01 #Cover concrete (unconfined)uniaxialMaterial Concrete01 2 -23400.0 -0.002 -0.0 -0.006 # STEEL # Reinforcing steel set fy 400000.0; #Yield stressset E 200000000.0;# Youngs modulus# tag fy E0 b uniaxialMaterial Steel02 3 $fy $E 0.01 18.5 0.925 0.15 uniaxialMaterial Elastic 11niaxialMaterial Elastic 12niaxialMaterial Elastic 13 587247596#Define cross-section for nonlinear columns # ---------------------# set some parameters set colWidth 8.18 set colDepth 4.28 set cover 0.05 set As 0.00049 # some variables derived from the parametersset y1 [expr $colDepth/2.0] set z1 [expr $colWidth/2.0] section Fiber 1 { # Create the concrete core fibers patch rect 1 20 30 [expr $cover-$y1] [expr $cover-$z1] [expr $y1-$cover] [expr $z1-$cover] # Create the concrete cover fibers (top, bottom, left, right) patch rect 2 20 5 [expr -$y1] [expr $z1-$cover] $y1 $z1 patch rect 2 20 5 [expr -$y1] [expr -$z1] $y1 [expr $cover-$z1] patch rect 2 5 10 [expr -$y1] [expr $cover-$z1] [expr $cover-$y1] [expr $z1-$cover] patch rect 2 5 10 [expr $y1-$cover] [expr $cover-$z1] $y1 [expr $z1-$cover] # Create the reinforcingfibers (left, middle, right) layer straight 3 175 $As [expr $y1-$cover] [expr $z1-$cover] [expr $y1-$cover] [expr $cover-$z1] layer straight 3 175 $As [expr $cover-$y1] [expr $z1-$cover] [expr $cover-$y1] [expr $cover-$z1] layer straight 3 115 $As [expr $y1-$cove