mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
51 lines
1.2 KiB
Plaintext
51 lines
1.2 KiB
Plaintext
puts "============"
|
|
puts "OCC26841"
|
|
puts "============"
|
|
puts ""
|
|
###############################
|
|
## Wrong result obtained by intersection algorithm.
|
|
###############################
|
|
|
|
restore [locate_data_file bug26841c1-prism.brep] p1
|
|
restore [locate_data_file bug26841c1-deck.brep] a1
|
|
|
|
bsection result a1 p1 -n2d2
|
|
|
|
smallview
|
|
donly result
|
|
fit
|
|
display a1 p1
|
|
|
|
set nbshapes_expected "
|
|
Number of shapes in shape
|
|
VERTEX : 5
|
|
EDGE : 5
|
|
WIRE : 0
|
|
FACE : 0
|
|
SHELL : 0
|
|
SOLID : 0
|
|
COMPSOLID : 0
|
|
COMPOUND : 1
|
|
SHAPE : 11
|
|
"
|
|
|
|
checknbshapes result -ref ${nbshapes_expected} -t -m "SECTION"
|
|
|
|
regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTolerance
|
|
puts "MaxTolerance=$MaxTolerance"
|
|
|
|
set expected_MaxTolerance 4.8861509475438473e-005
|
|
set tol_abs_MaxTolerance 0.0
|
|
set tol_rel_MaxTolerance 0.01
|
|
checkreal "MaxTolerance" ${MaxTolerance} ${expected_MaxTolerance} ${tol_abs_MaxTolerance} ${tol_rel_MaxTolerance}
|
|
|
|
set log [checksection result]
|
|
|
|
if { [string compare -nocase $log " nb alone Vertices : 0\n\n"] } {
|
|
puts "ERROR: the section is not closed"
|
|
} else {
|
|
puts "The section is OK"
|
|
}
|
|
|
|
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|