This example utilizes Tcl variable-substitution and array-management tools to optimize the building of the numerical model of a generic 2D frame. The number of stories and the number of bays are set as variables, and can, therefore, be changed.
While this input file requires careful programming, chances of error are reduced because nodes and elements do not have to be defined individually and manually. While the number of bays is limited to 9 (this can be changed by modifying the node-numbering scheme), there is no limit to the number of stories.
The following library files include tasks that are achieved by Tcl procs or script segments and are used in this example:
Model Building |
|
define units and constants |
|
define displacement increments for reversed cyclic displacement paths |
|
define procedures for creating standard W-section fiber sections and get section properties |
|
define materials for reinforced-concrete section |
|
define procedures for creating reinforced-concrete fiber sections |
|
procedure for displaying a plane in model |
|
procedure for displaying 2D perspective of model |
|
Static Lateral-Load Analysis |
|
define static-analysis parameters for lateral-load analysis |
|
Dynamic Lateral-Load Analysis |
|
define dynamic-analysis parameters for lateral-load analysis |
|
define a procedure which parses a ground motion record from the PEER strong motion database by finding dt in the record header, then echoing data values to the output file. |
The following figure shows the frame layout and node-numbering scheme used: