1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-07 18:30:55 +03:00
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

34 lines
659 B
Plaintext
Executable File

puts "========================"
puts "BUC61027"
puts " OCC368 "
puts "========================"
puts ""
##############################################
## Visualization is too slow.
##############################################
restore [locate_data_file OCC368.brep] result
checkshape result
tclean result
isos result 0
vinit
dchrono h2 reset
dchrono h2 start
vdisplay result
vsetdispmode result 1
dchrono h2 stop
regexp {CPU user time: +([-0-9.+eE]+)} [dchrono h2 show] full z2
if { $z2 > 30 } {
puts "Error : Elapsed time is more then 30 seconds"
}
checkview -display result -2d -path ${imagedir}/${test_image}.png