1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-09 18:50:54 +03:00
occt/tests/bugs/modalg_1/buc60712
ski 58cf74e0c0 0025945: Make stable checking of shape global properties in tests
- Added function checkprops, set default tolerance parameter to 1.0e-4
- Using "area" instead of "square".
- Options "-equal\notequal" isn't used together with "-s" in blend and offset test cases.
- Correct regressions/differences/improvements and CPU problem (set props tolerance to 0.1)
- Corrected test cases to use checkprops proc.
- Correct image difference
- Updated TODOs in test cases.
- Updated test cases to get correct images of result shape
2015-12-10 16:56:03 +03:00

53 lines
1.0 KiB
Plaintext
Executable File

puts "=========="
puts "BUC60712"
puts "=========="
puts ""
puts "=================================="
puts "It takes visual check for this BUG"
puts "=================================="
#
# OCC22070: Grid Tests: CHL set, detected problems
# Problems:
# The shape buc60712a.brep is self-interferred.
# thus it can not be used as the argument for Boolean Operation Algorithm.
#
# Proposals:
# The Case chl/902/F3 should be removed or rewritten:
restore [locate_data_file buc60712a.brep] a
checkshape a
restore [locate_data_file buc60712b.brep] b
checkshape b
# Recompute "a" shape
explode a f
bop a_1 a_2
bopfuse r12
bop a_3 a_4
bopfuse r34
bop r12 r34
bopfuse r
# Start boolean operation
bop r b
bopsection result
# Check result
regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num
# Resume
if { $num != 0 } {
puts " Faulty BUC60712: Result shape is INcorrect !!! "
} else {
puts "BUC60712 OK: Result shape is correct "
}
checkprops result -l 1.88145
checkshape result
checksection result
set 2dviewer 0