Luis Guillermo Yáñez GuillermoYanez
GuillermoYanez
/ delete-entities.tcl
Last active
March 28, 2018 16:08
TCL proc to delete all existing gemetric entities from GiD (pre and post processor)
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # TCL proc to delete all entities from GiD. | |
| # It was taken from GiD Forums. | |
| # Restarts the entities counter to 1. | |
| proc DeleteEntities { } { | |
| GidUtils::DisableGraphics | |
| foreach type { volume surface line point } { | |
| GiD_Geometry delete $type 1:end | |
| } | |
| GidUtils::EnableGraphics |