Changeset 2014
- Timestamp:
- Dec 20, 2010, 6:52:24 AM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/molvisviewer.tcl
r1996 r2014 2075 2075 set vertices "" 2076 2076 foreach n { 0 1 0 2 0 3 1 4 2 4 2 6 1 7 3 7 5 7 4 5 3 6 5 } { 2077 set values [point${n} values]2077 set values [point${n} range 0 end] 2078 2078 append vertices "\[ [join $values {, }] \], \\\n" 2079 2079 } 2080 set values [point6 values]2080 set values [point6 range 0 end] 2081 2081 append vertices "\[ [join $values {, }] \] \\\n" 2082 2082 blt::vector destroy point0 point1 point2 point3 point4 point5 point6 \
Note: See TracChangeset
for help on using the changeset viewer.