tests/perf/single_object_selection/A1

   1 puts "3D visualization performance tests"
   2 puts "Display/erase 1 AIS-object"
   3 puts "Object haves wireframe mode"
   4
   5
   6 vsetdispmode 0
   7
   8 dchrono tmr start
   9
  10 for {set i 1} {$i < 100} {incr i} {
  11     verase b; vdisplay b
  12 }