Changeset 4997 for trunk


Ignore:
Timestamp:
Feb 11, 2015 12:24:14 PM (5 years ago)
Author:
ldelgass
Message:

initialize variable

Location:
trunk/gui/scripts
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/gui/scripts/field.tcl

    r4972 r4997  
    371371    }
    372372    if {[info exists _comp2unirect3d($cname)]} {
    373         return [$_comp2unirect3d($cname) blob]
     373        return [$_comp2unirect3d($cname) values]
    374374    }
    375375    error "can't get field values. Unknown component \"$cname\": should be [join [lsort [array names _comp2dims]] {, }]"
     
    14421442        }
    14431443        # Get the data limits
    1444         set vector [$_comp2unirect3d($cname) valuesObj]
     1444        set vector [$_comp2unirect3d($cname) values]
    14451445        set minmax [VectorLimits $vector $vectorsize]
    14461446        lappend limits $cname $minmax
  • trunk/gui/scripts/unirect3d.tcl

    r4791 r4997  
    2727    public method mesh {}
    2828    public method values {}
    29     public method valuesObj {}
    3029    public method units { axis }
    3130    public method label { axis }
     
    141140# ----------------------------------------------------------------------
    142141# method mesh
    143 #       Returns a Tcl list that represents the points  of the uniform
    144 #       grid.
     142#       Returns a Tcl list that represents the points of the uniform
     143#       grid.  Each point has x,y and z values in the list.
    145144# ----------------------------------------------------------------------
    146145itcl::body Rappture::Unirect3d::mesh {} {
     
    163162
    164163# ----------------------------------------------------------------------
    165 # method values 
    166 #       Returns a Tcl list that represents the field values
     164# method values
     165#       Returns a BLT vector that represents the field values
    167166# ----------------------------------------------------------------------
    168167itcl::body Rappture::Unirect3d::values {} {
    169     if { [$_values length] > 0 } {
    170         return [$_values range 0 end]
    171     }
    172     return ""
    173 }
    174 
    175 # ----------------------------------------------------------------------
    176 # method valuesObj
    177 #       Returns a BLT vector that represents the field values
    178 # ----------------------------------------------------------------------
    179 itcl::body Rappture::Unirect3d::valuesObj {} {
    180168    return $_values
    181169}
  • trunk/gui/scripts/vtkheightmapviewer.tcl

    r4769 r4997  
    10731073            SendCmd [list axis name $axis $label]
    10741074
     1075            set units ""
    10751076            if {$axis == "z" && [$_first hints ${axis}units] == ""} {
    10761077                if {$_curFldName != ""} {
Note: See TracChangeset for help on using the changeset viewer.