1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
occt/tests/bugs/modalg_1/buc60882
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

48 lines
1.3 KiB
Plaintext
Executable File

puts "============"
puts "BUC60882"
puts "============"
puts ""
#######################################################################
## The edge is corrupted after applying command "fsameparameter": tolerance is increased up to 1e+50
#######################################################################
pload XDE
restore [locate_data_file BUC60882_samepar.brep] result
set che [checkshape result]
if { [regexp {Faulty} $che ] == 1 } {
puts "Warning BUC60882: Source shape is NOT correct. It was detected by Checkshape command"
} else {
puts "BUC60882 OK: Source shape is valid"
}
puts "*** Before : "
regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTol
puts "MaxTolerance = $MaxTol"
if { $MaxTol > 1 } {
puts "Warning : Tolerance of Source edge is more then 1.0"
} else {
puts " Tolerance of source edge is less then 1.0"
}
fsameparameter result 1e-5
puts "*** After : "
regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTol_1
puts "MaxTolerance = $MaxTol_1"
if { $MaxTol_1 > $MaxTol } {
puts [format "Faulty BUC60882 : Tolerance of Result edge increased and it is equal to %s" $MaxTol_1]
} else {
puts " BUC60882 OK: Tolerance of Result edge is less or equal to tolerance of Sourse edge."
}
checkprops result -l 1768.53
checkshape result
checksection result
set 2dviewer 0