mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
1e6b2065b5
Correct method ShapeUpgrade_UnifySameDomain::UnifyFaces: when creating the Edge-Face map of initial shape, count each face only once.
19 lines
569 B
Plaintext
19 lines
569 B
Plaintext
puts "======================================================================================="
|
|
puts "OCC32561: UnifySameDomain does nothing while it is expected to union two pairs of faces"
|
|
puts "======================================================================================="
|
|
puts ""
|
|
|
|
restore [locate_data_file bug32561.brep] a
|
|
|
|
unifysamedom result a
|
|
|
|
checkshape result
|
|
|
|
checknbshapes result -t -solid 64 -shell 64 -face 233 -wire 233 -edge 284 -vertex 116
|
|
|
|
set tolres [checkmaxtol result]
|
|
|
|
if { ${tolres} > 2.e-7} {
|
|
puts "Error: bad tolerance of result"
|
|
}
|