1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-06-15 11:44:07 +03:00

35 lines
537 B
Plaintext
Executable File

puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
puts "================"
puts "OCC31"
puts "================"
puts ""
restore [locate_data_file OCC31.brep] sh
puts [checkshape sh]
explode sh f
explode sh_2 e
chamf res1 sh sh_2_1 sh_2 7 7
puts [checkshape res1]
explode res1 f
explode res1_5 e
chamf res2 res1 res1_5_4 res1_5 7 7
puts [checkshape res2]
explode res2 f
explode res2_4 e
chamf result res2 res2_4_1 res2_4 7 7
puts [checkshape result]
set check_square 1
set square 107634
set 2dviewer 0