- Timestamp:
- Apr 3, 2013, 12:36:40 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/vtkisosurfaceviewer.tcl
r3592 r3622 2551 2551 } 2552 2552 2553 2554 2553 itcl::body Rappture::VtkIsosurfaceViewer::UpdateContourList {} { 2555 2554 if { ![info exists _limits($_curFldName)] } { … … 2557 2556 } 2558 2557 foreach { vmin vmax } $_limits($_curFldName) break 2559 set v [blt::vector create \#auto] 2560 $v seq $vmin $vmax [expr $_currentNumContours+1] 2561 set slice [expr ($vmax - $vmin) / double($_currentNumContours)] 2562 $v expr {$v + ($slice * 0.5)} 2563 $v delete end 2558 set v [blt::vector create \#auto] 2559 $v seq $vmin $vmax [expr $_currentNumContours+2] 2560 $v delete end 0 2564 2561 set _contourList [$v range 0 end] 2565 2562 blt::vector destroy $v
Note: See TracChangeset
for help on using the changeset viewer.