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

25 lines
482 B
Plaintext
Executable File

puts "============"
puts "BUC60865"
puts "BUC60864"
puts "============"
puts ""
##########################
## Section gives duplicate edges.
##########################
restore [locate_data_file BUC60865_sh6.brep] sh
checkshape sh
plane pl 1.1 0.99999 1 0 1 0
mkface f pl
bsection result sh f
checknbshapes result -edge 5 -m "SECTION operation"
checkprops result -l 4.5
checkshape result
checksection result
checkview -display result -2d -path ${imagedir}/${test_image}.png