Changeset 1143
- Timestamp:
- Jun 1, 2011 6:12:23 PM (12 years ago)
- Location:
- branches/sandbox
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/sandbox/graceexport.tcl
r930 r1143 241 241 set center 10 242 242 } elseif {[string range $just 0 0] == "e"} { 243 # is this correct? 243 # is this correct? 244 set center 1 245 } else { 244 246 set center 0 245 } else {246 set center 1247 247 } 248 248 set color_data 1 -
branches/sandbox/liveplot
r1142 r1143 2176 2176 if {[lindex $xr 0] != [lindex $xr end]} { 2177 2177 set ymult([lindex $xr 0]:[lindex $xr end]) $ym 2178 .g marker create line -coords "$xl -Inf $xl Inf" -name mag[incr i] 2178 if {$xl != $xvec(min)} { 2179 .g marker create line -coords "$xl -Inf $xl Inf" -name mag[incr i] 2180 } 2179 2181 .g marker create text -coords "$xl Inf" -name mag[incr i] -text "x$ym" -anchor w 2180 2182 }
Note: See TracChangeset
for help on using the changeset viewer.