mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-07 18:30:55 +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
38 lines
991 B
Plaintext
38 lines
991 B
Plaintext
puts "================"
|
|
puts "OCC32"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################
|
|
## Standard_ConstructionError in Algo of the BRepFilletAPI_MakeChamfer
|
|
#######################################################
|
|
|
|
restore [locate_data_file OCC31.brep] sh
|
|
checkshape sh
|
|
|
|
explode sh f
|
|
explode sh_1 e
|
|
|
|
if [catch {chamf res sh sh_6_1 sh_6 A 2 45 sh_6_8 sh_6 A 2 45} inf] {
|
|
if { [regexp "No suitable edges to chamfer" $inf] != 1 } {
|
|
puts "OK. Chamfer was not build. But suitable message was given"
|
|
}
|
|
renamevar res result
|
|
} else {
|
|
checkshape res
|
|
explode res f
|
|
explode res_1 e
|
|
#But before chamfer two edges (res_1_4, res_1_5) union should be to make one arc
|
|
catch {chamf result res res_1_4 res_1 5 5} info
|
|
|
|
if { [regexp "No suitable edges to chamfer" $info] != 1 } {
|
|
puts "Warning. Chamfer was not build. But suitable message was given"
|
|
} else {
|
|
checkshape result
|
|
checkprops result -s 10
|
|
}
|
|
}
|
|
set 2dviewer 0
|
|
|
|
|
|
|