#混凝土材料参数(C40) set hnt 40 ;#C40混凝土 set fcuk [expr 1e-6*$hnt] set fck 2.68e7 #以下为定义保护层混凝土 set fpc0 -$fck ;#轴心抗压强度标准值 set epsc0 -0.002 ;#最大抗压强度所对应的应变 set fpcu0 [expr 0.2*$fpc0] ;#极限抗压强度 set epscu0 -0.005 ;#极限抗压强度所对应的应变(-0.01) set ft0 [expr -0.1*$fpc0] ;#抗拉强度 #以下为定义核心混凝土 set Kfc 1.2 set fpc1 [expr $Kfc*$fpc0] set epsc1 [expr -0.002*$Kfc] set fpcu1 [expr 0.2*$fpc1] set epscu1 [expr -0.005 *$Kfc] set ft1 [expr -0.1*$fpc1] #共用参数 set Ets [expr $fpc0/0.002] set lambda 0.1 请按照以上模板写出C50混凝土和C30混凝土的材料参数设置(包含其相应的保护层和核心混凝土定义),编写代码必须是tcl语言字体
时间: 2024-03-16 09:43:17 浏览: 168
好的,以下是C50混凝土和C30混凝土的材料参数设置,包含保护层和核心混凝土的定义:
C50混凝土:
```
#混凝土材料参数(C50)
set hnt 50 ;#C50混凝土
set fcuk [expr 1e-6*$hnt]
set fck 2.98e7
#以下为定义保护层混凝土
set fpc0 -$fck
set epsc0 -0.002
set fpcu0 [expr 0.2*$fpc0]
set epscu0 -0.005
set ft0 [expr -0.1*$fpc0]
#以下为定义核心混凝土
set Kfc 1.2
set fpc1 [expr $Kfc*$fpc0]
set epsc1 [expr -0.002*$Kfc]
set fpcu1 [expr 0.2*$fpc1]
set epscu1 [expr -0.005 *$Kfc]
set ft1 [expr -0.1*$fpc1]
#共用参数
set Ets [expr $fpc0/0.002]
set lambda 0.1
```
C30混凝土:
```
#混凝土材料参数(C30)
set hnt 30 ;#C30混凝土
set fcuk [expr 1e-6*$hnt]
set fck 1.96e7
#以下为定义保护层混凝土
set fpc0 -$fck
set epsc0 -0.002
set fpcu0 [expr 0.2*$fpc0]
set epscu0 -0.005
set ft0 [expr -0.1*$fpc0]
#以下为定义核心混凝土
set Kfc 1.2
set fpc1 [expr $Kfc*$fpc0]
set epsc1 [expr -0.002*$Kfc]
set fpcu1 [expr 0.2*$fpc1]
set epscu1 [expr -0.005 *$Kfc]
set ft1 [expr -0.1*$fpc1]
#共用参数
set Ets [expr $fpc0/0.002]
set lambda 0.1
```
以上是TCL语言的代码,可以直接在OpenSees中使用。注意,保护层混凝土和核心混凝土的定义可以根据实际需要进行调整。
阅读全文