|
|
|
The following is an example on how to define materials for reinforced-concrete structures. The examples assume that the variables have been defined apriori. If these commands are placed into an external file they can be used in a number of analyses without significant modifications using the source command.
# -------MaterialsRC.tcl----------------------------------------------------------
set ConcreteMaterialType "inelastic"; # options: "elastic","inelastic"
set SteelMaterialType "hysteretic"; # options: "elastic","bilinear","hysteretic"
# CONCRETE
if {$ConcreteMaterialType =="elastic"} {
uniaxialMaterial Elastic $IDcore $Ec
uniaxialMaterial Elastic $IDcover $Ec
}
if {$ConcreteMaterialType == "inelastic"} {
uniaxialMaterial Concrete01 $IDcore $fc1C $eps1C $fc2C $eps2C; # Core concrete
uniaxialMaterial Concrete01 $IDcover $fc1U $eps1U $fc2U $eps2U; # Cover concrete
}
# STEEL
if {$SteelMaterialType == "elastic"} {
uniaxialMaterial Elastic $IDsteel $Es
}
if {$SteelMaterialType == "bilinear"} {
uniaxialMaterial Steel01 $IDsteel $Fy $Es $Bs
}
if {$SteelMaterialType == "hysteretic"} {
uniaxialMaterial Hysteretic $IDsteel $Fy $epsY $Fy1 $epsY1 $Fu $epsU -$Fy -$epsY -$Fy1 -$epsY1 -$Fu -$epsU $pinchX $pinchY $damage1 $damage2 $betaMUsteel
}