[occt.git] / tests / bugs / heal / bug22

puts "======="
puts "OCC22"
puts "======="
puts ""
#####################################################################
##Locations are not correctly processed by ShapeBuild_ReShape (and base class BRepTools_ReShape)
#####################################################################

pload QAcommands

restore [locate_data_file OCC21.brep] shape
explode shape f
compound shape_1 shape_2 compoundToBeDivided

# Case A of the bug is reproduced. Resulting shape must have 5 faces instead of 3

if [catch { OCC22 result shape compoundToBeDivided 0 } ] {
    puts "OCC22 ERROR; (case 1)"
} else {
    puts "OCC22 OK; (case 1)"
}

regexp {([-0-9.+eE]+)\s FACE} [statshape result] full nbFaces
if {$nbFaces != 5} {
    puts "OCC22 FAULTY: Initial shape was not splitted"
}

# Case B of the bug is reproduced. Result must be valid
if [catch { OCC22 res shape compoundToBeDivided 1 } ] {
    puts "OCC22 ERROR; (case 2)"
} else {
    puts "OCC22 OK; (case 2)"
}

set 2dviewer 0
Commit	Line	Data
352ffd73	1	puts "======="
	2	puts "OCC22"
	3	puts "======="
	4	puts ""
	5	#####################################################################
	6	##Locations are not correctly processed by ShapeBuild_ReShape (and base class BRepTools_ReShape)
	7	#####################################################################
	8
	9	pload QAcommands
	10
	11	restore [locate_data_file OCC21.brep] shape
	12	explode shape f
	13	compound shape_1 shape_2 compoundToBeDivided
	14
	15	# Case A of the bug is reproduced. Resulting shape must have 5 faces instead of 3
	16
	17	if [catch { OCC22 result shape compoundToBeDivided 0 } ] {
	18	puts "OCC22 ERROR; (case 1)"
	19	} else {
	20	puts "OCC22 OK; (case 1)"
	21	}
	22
	23	regexp {([-0-9.+eE]+)\s FACE} [statshape result] full nbFaces
	24	if {$nbFaces != 5} {
	25	puts "OCC22 FAULTY: Initial shape was not splitted"
	26	}
	27
	28	# Case B of the bug is reproduced. Result must be valid
	29	if [catch { OCC22 res shape compoundToBeDivided 1 } ] {
	30	puts "OCC22 ERROR; (case 2)"
	31	} else {
	32	puts "OCC22 OK; (case 2)"
	33	}
	34
	35	set 2dviewer 0
	36