Changeset 5538 for trunk

Timestamp:

May 17, 2015, 11:02:25 PM (9 years ago)

Author:

ldelgass

Message:

Fix for unirect3d mesh (I'm pretty sure this method is not actually used)

File:

• trunk/gui/scripts/unirect3d.tcl (modified) (4 diffs)

trunk/gui/scripts/unirect3d.tcl

@@ -20 +20 @@
 
 itcl::class Rappture::Unirect3d {
-    constructor {xmlobj field cname {extents 1}} { # defined below }
+    constructor {xmlobj field cname {numComponents 1}} { # defined below }
     destructor { # defined below }
 
@@ -55 +55 @@
 # Constructor
 # ----------------------------------------------------------------------
-itcl::body Rappture::Unirect3d::constructor {xmlobj field cname {extents 1}} {
+itcl::body Rappture::Unirect3d::constructor {xmlobj field cname {numComponents 1}} {
     if {![Rappture::library isvalid $xmlobj]} {
         error "bad value \"$xmlobj\": should be Rappture::library"
@@ -70 +70 @@
     GetSize $m "yaxis.numpoints" _yNum
     GetSize $m "zaxis.numpoints" _zNum
-    set _compNum $extents
+    set _compNum $numComponents
     foreach {key path} {
         group   about.group
@@ -145 +145 @@
 # ----------------------------------------------------------------------
 itcl::body Rappture::Unirect3d::mesh {} {
-    set dx [expr {($_xMax - $_xMin) / double($_xNum)}]
-    set dy [expr {($_yMax - $_yMin) / double($_yNum)}]
-    set dz [expr {($_zMax - $_zMin) / double($_zNum)}]
+    set dx [expr {($_xMax - $_xMin) / double($_xNum - 1)}]
+    set dy [expr {($_yMax - $_yMin) / double($_yNum - 1)}]
+    set dz [expr {($_zMax - $_zMin) / double($_zNum - 1)}]
     foreach {a b c} $_axisOrder break
     for { set i 0 } { $i < [set _${a}Num] } { incr i } {