e1cbc34c |
1 | puts "========" |
2 | puts "OCC23698" |
3 | puts "========" |
4 | puts "" |
5 | ############################################## |
6 | # BRepBuilderAPI_Copy creates invalid copy |
7 | ############################################## |
8 | |
9 | restore [locate_data_file case_1_solid.brep] a |
10 | restore [locate_data_file case_1_wire3.brep] b |
11 | bcommon result b a |
12 | tcopy result r |
13 | |
14 | regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full anEdge |
15 | if { ${anEdge} == 0 } { |
16 | puts "Error: Common operation is wrong" |
17 | } |
18 | |
19 | regexp {Mass +: +([-0-9.+eE]+)} [lprops r] full aCopyEdge |
20 | if { ${anEdge} != ${aCopyEdge} } { |
21 | puts "Error: Copy is wrong" |
22 | } else { |
23 | puts "OK: Copy is correct" |
24 | } |