mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-11 01:58:22 +08:00
13 lines
218 B
Plaintext
13 lines
218 B
Plaintext
puts "3D visualization performance tests"
|
|
puts "Display/erase 1 AIS-object"
|
|
puts "Object haves HidelLineRemoval mode"
|
|
|
|
|
|
vsetdispmode 2
|
|
|
|
dchrono tmr start
|
|
|
|
for {set i 1} {$i < 100} {incr i} {
|
|
verase b; vdisplay b
|
|
}
|