GettingStartedInputFile.tcl -– Setup & Materials: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
| (13 intermediate revisions by the same user not shown) | |||
| Line 1: | Line 1: | ||
__NOTOC__ | |||
[[Image:BuildingTclLogo.gif|link=BuildingTcl|right]] | |||
<source lang="Tcl"> | |||
# Initialize Input | |||
# make sure you source the BuildingTcl library files first: | |||
setDataDir Data; | |||
setUnits -Length in -Force kip -Time sec; | |||
# MATERIALS --------------------------------------- | |||
# Core Concrete (Default confinement effects) | |||
addMaterialData MaterialLabel 4ksiConfinedConcrete | |||
addMaterialData MaterialModelLabel ConfinedConcrete; | |||
addMaterialData Fc 4000.*\$psi; | |||
addMaterial | |||
# Cover Concrete | |||
addMaterialData MaterialLabel 4ksiUnconfinedConcrete | |||
addMaterialData MaterialModelLabel UnconfinedConcrete | |||
addMaterialData Fc 4.*\$ksi | |||
addMaterial | |||
# Reinforcing Steel | |||
addMaterialData MaterialLabel 60ksiReinforcingSteel | |||
addMaterialData MaterialModelLabel Steel | |||
addMaterialData fY 68.8*\$ksi | |||
addMaterial | |||
puts --DoneMaterials-- | |||
</source> | |||
---- | ---- | ||
Return to [[BuildingTcl]] | Return to [[Getting Started with BuildingTcl]] | ||
Latest revision as of 17:12, 30 October 2009
# Initialize Input
# make sure you source the BuildingTcl library files first:
setDataDir Data;
setUnits -Length in -Force kip -Time sec;
# MATERIALS ---------------------------------------
# Core Concrete (Default confinement effects)
addMaterialData MaterialLabel 4ksiConfinedConcrete
addMaterialData MaterialModelLabel ConfinedConcrete;
addMaterialData Fc 4000.*\$psi;
addMaterial
# Cover Concrete
addMaterialData MaterialLabel 4ksiUnconfinedConcrete
addMaterialData MaterialModelLabel UnconfinedConcrete
addMaterialData Fc 4.*\$ksi
addMaterial
# Reinforcing Steel
addMaterialData MaterialLabel 60ksiReinforcingSteel
addMaterialData MaterialModelLabel Steel
addMaterialData fY 68.8*\$ksi
addMaterial
puts --DoneMaterials--Return to Getting Started with BuildingTcl