puts "3D visualization performance tests"
puts "Turn V3d View with 1 MeshVS_Mesh (+ AIS trihedron)"
puts "Object haves shrink mode"


set A_z 0.10
for {set i 1} {$i < 100} {incr i} {
    vturnview 0 0 ${A_z} 1
}