Changeset 4030 for trunk/gui

Timestamp:

Nov 4, 2013 10:41:32 AM (11 years ago)

Author:

ldelgass

Message:

Better fix for z axis limits issue addressed in r3996 and r4021 : return [0,0]
z limits from unirect2d, always treat z as mesh dimension, don't alias to value
limits.

Location:

trunk/gui/scripts

Files:

• field.tcl (modified) (4 diffs)
• unirect2d.tcl (modified) (1 diff)
• unirect3d.tcl (modified) (2 diffs)

trunk/gui/scripts/field.tcl

@@ -1576 +1576 @@
         set _values [$_field get $cname.values]
         set limits {}
-        foreach axis { x y } {
+        foreach axis { x y z } {
             lappend limits $axis [$_comp2unirect2d($cname) limits $axis]
         }
@@ -1583 +1583 @@
         lappend limits $cname [$xv limits]
         lappend limits v [$xv limits]
-        lappend limits z [$xv limits]
         blt::vector destroy $xv
         set _comp2limits($cname) $limits
@@ -1620 +1619 @@
             }
         }
-        if { $dim  != 3 } {
+        if { $dim != 3 } {
             set _dim $dim
         }
     }
-        
+
     if {$_dim == 1} {
         # 1D data: Create vectors for graph widget.
@@ -1670 +1669 @@
         incr _counter
         array unset _comp2limits $cname
-        foreach axis { x y } {
+        foreach axis { x y z } {
             lappend _comp2limits($cname) $axis [$mesh limits $axis]
         }
         lappend _comp2limits($cname) $cname [$v limits]
         lappend _comp2limits($cname) v [$v limits]
-        lappend _comp2limits($cname) z [$v limits]
         return 1
     } 

trunk/gui/scripts/unirect2d.tcl

@@ -211 +211 @@
             set min $_xMin
             set max $_xMax
-            set axis "xaxis"
         }
         y - ylin - ylog {
             set min $_yMin
             set max $_yMax
-            set axis "yaxis"
+        }
+        z - zlin - zlog {
+            set min 0
+            set max 0
         }
         default {

trunk/gui/scripts/unirect3d.tcl

@@ -200 +200 @@
             set min $_xMin
             set max $_xMax
-            set axis "xaxis"
         }
         y - ylin - ylog {
             set min $_yMin
             set max $_yMax
-            set axis "yaxis"
         }
         z - zlin - zlog {
             set min $_zMin
             set max $_zMax
-            set axis "zaxis"
         }
         v - vlin - vlog {
@@ -220 +217 @@
                 set max 1.0
             }
-            set axis "vaxis"
         }
         default {