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/bug23958
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
700 B
Plaintext

puts "========="
puts "OCC23958"
puts "========="
puts ""
#################################################################################
# Section of shell by plane is incomplete
#################################################################################
cpulimit 4000
pload DATAEXCHANGEKERNEL
# shell
restore [locate_data_file bug23958_bug948-shape.brep] a
# plane
plane p 10.62752 0 0 1 0 0
mkface f p
# check that everything is Ok
checkshape a
tolerance a
bopargcheck a f -S #F
# build section
bsection result a f
# check total length of result
checkprops result -l 1.21473
checkshape result
checksection result
checkview -display result -2d -path ${imagedir}/${test_image}.png