mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
32 lines
719 B
Plaintext
32 lines
719 B
Plaintext
puts "##################################################"
|
|
puts "0025055: Incorrect shape copying in BRepBuilderAPI_Copy"
|
|
puts "##################################################"
|
|
|
|
# load and check shape
|
|
restore [locate_data_file bug25055.brep] a
|
|
|
|
tolerance a
|
|
|
|
# call fixshape
|
|
fixshape aa a 1e-3
|
|
checkshape aa
|
|
tcopy aa b
|
|
checkshape b
|
|
|
|
tclean result
|
|
incmesh aa 0.1
|
|
regexp {([0-9]+) +triangles.*[^0-9]([0-9]+) +nodes} [trinfo aa] full NbTrian_1 NbNodes_1
|
|
|
|
tclean result
|
|
incmesh b 0.1
|
|
|
|
set info_good [tricheck b]
|
|
if { [string compare $info_good "" ] != 0 } {
|
|
puts "Error : Result tricheck is BAD"
|
|
}
|
|
|
|
checktrinfo b -tri ${NbTrian_1} -nod ${NbNodes_1}
|
|
|
|
checkview -display b -2d -path ${imagedir}/${test_image}.png
|
|
|