mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
58cf74e0c0
- 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
37 lines
1.1 KiB
Plaintext
Executable File
37 lines
1.1 KiB
Plaintext
Executable File
|
|
puts "============"
|
|
puts "BUC60942"
|
|
puts "============"
|
|
###############################################################
|
|
## SplitShape algorithm modifies original shape (increases vertex tolerance of a plitting edge).
|
|
###############################################################
|
|
|
|
restore [locate_data_file BUC60942_splitshape.brep] c
|
|
explode c
|
|
checkshape c_1
|
|
checkshape c_2
|
|
|
|
renamevar c_1 f
|
|
renamevar c_2 w
|
|
|
|
set tol1 [maxtolerance w]
|
|
regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol1 full MaxEdgeTol1
|
|
regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol1 full MaxVertexTol1
|
|
|
|
splitshape result f f w
|
|
|
|
set tol2 [maxtolerance w]
|
|
regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol2 full MaxEdgeTol2
|
|
regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol2 full MaxVertexTol2
|
|
|
|
|
|
if { $MaxEdgeTol1 < $MaxEdgeTol2 || $MaxVertexTol1 < $MaxVertexTol1 } {
|
|
puts "Faulty BUC60942: max tolerance of the input wire has been increased by about 10 times."
|
|
} else {
|
|
puts "BUC60942 OK: Tolerance of shape is correct"
|
|
}
|
|
|
|
checkprops result -s 37.7032
|
|
checkshape result
|
|
set 2dviewer 0
|