原创力文档- 1、本文档共7页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
opensees模拟：有粘结实体桥墩分析算例
# Written by wyy
# Units: N, m, sec
wipe; #wipe memery for new calculation
model basic -ndm 2 -ndf 3; #2-d problem, 3-degree of freedom per node
## Define constant
set PI [expr 2*asin(1.0)] #等于π
set g 9.81;
## Data input
set hCol 0.36; # Height of Column
set bCol 0.50; # Width of Column
set colAspect 4.86; # Column aspect ratio: L/D 柱子的纵横比
set v [expr 0.1]; # Column axial load rate -- P = v*fc*Ag 轴向荷载率
set LCol [expr $hCol*$colAspect]; # Column length 柱长
set fc -4.16E7; # Concrete compressive strength
set fpc -5.747E+7
set epsc0 -0.006328
set fpcu -3.302E+7
set epsu -0.0215
#set ratio 0.3
#set ft 5.474E+5
set Ec 2.43E10
set colArea [expr $hCol*$bCol]; # Column cross-section area 横截面积
set P [expr 2*$v*$fc*$colArea]; # Column axial load 轴向荷载
#set P [expr -576000-691484]
set m [expr -$P/$g]; # Beam nodal mass 节点质量
set beamArea $colArea; # Beam cross-section area
set GJ 1.0e15; # Torsional stiffness 扭转刚度
set np 3; # Number of integration points
## Define uniaxial materials
# Core concrete (confined约束混凝土)
uniaxialMaterial Concrete01 1 [expr $fpc] $epsc0 $fpcu $epsu
#uniaxialMaterial Concrete02 1 [expr $fpc] $epsc0 $fpcu $epsu $ratio $ft $Ets
# Cover concrete (unconfined无约束)
uniaxialMaterial Concrete01 2 [expr $fc] -0.002 0 -0.005
# STEEL
## Cover steel Tube
#set fy 3.67e8; # Yield stress
#set E 2.0E11; # Youngs modulus E=200000000kN/m
# tag fy E0 b
#uniaxialMaterial Steel01 3 $fy $E 0.01
# STEEL
set fy 3.2E8
set fu 4.59E8
set Es 2.0E11
set Esh 6E9 ; # 0.03*Es
set esh 0.016 ; # 8*ey
set eult 0.08 ;# 40*ey
set lsr 6.0
set beta 1.0
set r 0.8
set gama 0.8
set Cf 0.7
set alpha 0.506
set Cd 0.7
uniaxialMaterial ReinforcingSteel 3 $fy $fu $Es $Esh $esh $eult -GABuck $lsr $beta $r $gama -CMFatigue $Cf $alpha $Cd
# Post-tension threaded rod tag E0 eyt eyc initial strain(以负为正)
set beta1 1.0
set r1 0.5
set gama1 0.5
set Cf1
文档评论（0）