GettingStartedInputFile.tcl -– Setup & Materials: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
Line 1: | Line 1: | ||
[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-- | |||
[\tcl] | |||
Revision as of 05:09, 28 October 2009
[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-- [\tcl]
Return to BuildingTcl