1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
occt/tests/bugs/modalg_5/bug24390_2
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

22 lines
645 B
Plaintext
Executable File

puts "========================"
puts "OCC24390"
puts "========================"
puts ""
#######################################################################
# Sewing produces the result with huge tolerance
#######################################################################
pload XSDRAW
restore [locate_data_file bug24390_face1.brep] f1
restore [locate_data_file bug24390_face2.brep] f2
sewing result f1 f2
checkshape result
checkmaxtol result -ref 0.016556973295771653 -source {f1 f2} -min_tol 0 -multi_tol 5.
checknbshapes result -shell 1
checkfreebounds result 6
checkview -display result -2d -path ${imagedir}/${test_image}.png