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_7/bug31470
jgv 13dd311c9b 0031470: Modeling Algorithms - Regression: BOP common produces empty result (box and holed sphere)
Approx_ComputeCLine.gxx : new class field is added to manage hang checking.
ProjLib/ProjLib_ComputeApprox.cxx : unset hang checking for analytical surfaces and curves
2020-04-16 09:58:15 +03:00

37 lines
767 B
Plaintext

puts "================================================================="
puts "OCC31470: BOP common produces empty result (box and holed sphere)"
puts "================================================================="
puts ""
plane pln1 51.899912462 99.996691888 62.33204004
psphere s1 pln1 15
psphere s2 pln1 10
bcut ss s1 s2
box bb 100 100 100
bcommon result bb ss
savehistory hh
explode ss f
modified ff hh ss_1
generated ee hh ss_1
checkshape result
checknbshapes result -solid 1 -shell 1 -face 3 -wire 6 -edge 8 -vertex 6
set tolres [checkmaxtol result]
if { ${tolres} > 2.e-7} {
puts "Error: bad tolerance of result"
}
checkprops result -v 4975.49
v2d
pcurve pc ee ff
trim pc pc
2dfit
checkview -screenshot -2d -path ${imagedir}/${test_image}.png