mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
34 lines
709 B
Plaintext
34 lines
709 B
Plaintext
puts "##################################################"
|
|
puts "0025055: Incorrect shape copying in BRepBuilderAPI_Copy"
|
|
puts "##################################################"
|
|
|
|
vclear
|
|
vinit View1
|
|
vdefaults -autoTriang 0
|
|
|
|
# load and check shape
|
|
restore [locate_data_file bug25055.brep] a
|
|
|
|
tcopy a b
|
|
|
|
tclean a
|
|
incmesh a 0.1
|
|
|
|
regexp {([0-9]+) +triangles.*[^0-9]([0-9]+) +nodes} [trinfo a] full NbTrian_1 NbNodes_1
|
|
|
|
tclean b
|
|
incmesh b 0.1
|
|
|
|
vclear
|
|
vdisplay -dispMode 1 b
|
|
vfit
|
|
vdump ${imagedir}/${test_image}.png
|
|
|
|
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}
|
|
|