Project 1- Building a Master TCL/TK Macro
It defines several procedures (Normals, cleanup_tool, free&t_edges, Reflect_entities) that are triggered when the corresponding buttons are clicked.
Here's a breakdown of the code:
-
The first few lines set up the main window (
$master) for the GUI. -
The
Normalsprocedure defines a sub-window ($normals) that provides options related to displaying and reversing normals of selected elements. -
The
cleanup_toolprocedure defines a sub-window ($top) that contains various buttons for performing cleanup operations on the model, such as deleting entities, reordering components, and renumbering entities. -
The
free&t_edgesprocedure defines a sub-window ($top) for working with free edges and T-edges in the model. -
The
Reflect_entitiesprocedure defines a sub-window ($top) for reflecting entities in the model. It includes options for OptiStruct and Radioss solvers.