+++ /dev/null
-puts "3D visualization performance tests"
-puts "Interactive selection of sub-objects (EDGE) by rectangular selection for AIS-object in V3d View with 27 AIS-objects (+ AIS trihedron)"
-puts "Object haves wireframe mode"
-
-
-vsetdispmode 0
-vselmode 2 1
-
-dchrono tmr start
-
-set x1 225; set y1 235; set x2 270; set y2 190
-set x11 5; set y11 5
-
-for {set i 1} {$i < 100} {incr i} {
- vselect $x1 $y1 $x2 $y2 1
- vselect $x11 $y11
-}