2 puts "0029938: Visualization - SelectMgr_ViewerSelector::PickedPoint() should return point lying on an object"
6 pload MODELING VISUALIZATION
12 vdisplay -dispMode 1 -mutable b
17 #Check Vertex selection mode case
21 set exp {Point: ([-0-9.+eE]+) ([-0-9.+eE]+) ([-0-9.+eE]+)}
22 set match [regexp -all -inline $exp [vstate -entities]]
23 foreach {_ x y z} $match {
24 if {$pnt != "$x $y $z"} {
25 puts "Error: Calculate point ($x $y $z) is not equal to target ($pnt)" }
28 #Check Wire selection mode case
33 set exp {Point: ([-0-9.+eE]+) ([-0-9.+eE]+) ([-0-9.+eE]+)}
34 set match [regexp -all -inline $exp [vstate -entities]]
35 foreach {_ x y z} $match {
36 if {$pnt != "$x $y $z"} {
37 puts "Error: Calculate point ($x $y $z) is not equal to target ($pnt)" }
40 #Check Face selection mode case
45 set exp {Point: ([-0-9.+eE]+) ([-0-9.+eE]+) ([-0-9.+eE]+)}
46 set match [regexp -all -inline $exp [vstate -entities]]
47 foreach {_ x y z} $match {
48 if {$pnt != "$x $y $z"} {
49 puts "Error: Calculate point ($x $y $z) is not equal to target ($pnt)" }