Changeset 4667
 Timestamp:
 Nov 8, 2014 8:25:19 PM (6 years ago)
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

trunk/gui/scripts/field.tcl
r4659 r4667 427 427 set min "" 428 428 set max "" 429 blt::vector tmp zero430 429 431 430 foreach cname [array names _comp2dims] { … … 453 452 454 453 if {$log} { 455 # on a log scale, use abs value and ignore 0's 454 blt::vector tmp zero 455 # on a log scale, use abs value and ignore zeros 456 456 $vname dup tmp 457 457 $vname dup zero 458 zero expr {tmp == 0} ;# find the 0's458 zero expr {tmp == 0} ;# find the zeros 459 459 tmp expr {abs(tmp)} ;# get the abs value 460 tmp expr {tmp + zero*max(tmp)} ;# replace 0's with abs max460 tmp expr {tmp + zero*max(tmp)} ;# replace zeros with abs max 461 461 set axisMin [blt::vector expr min(tmp)] 462 462 set axisMax [blt::vector expr max(tmp)] 463 blt::vector destroy tmp zero 463 464 } else { 464 465 set axisMin [$vname min] … … 477 478 } 478 479 } 479 2D  3D{480 default { 480 481 if {[info exists _comp2limits($cname)]} { 481 482 array set limits $_comp2limits($cname) … … 519 520 } 520 521 } 521 blt::vector destroy tmp zero522 522 set val [$_field get "${axis}axis.min"] 523 523 if {"" != $val && "" != $min} {
Note: See TracChangeset
for help on using the changeset viewer.