[occt.git] / tests / bugs / modalg_5 / bug24620

puts "============"
puts "OCC24620"
puts "============"
puts ""
#######################################################################
# BOPAlgo_CheckerSI returns interferences that are not sub-shapes of the source shape
#######################################################################

vertex v1 0 0 0
vertex v2 10 0 0
vertex v3 4 -5 0
vertex v4 4 5 0
edge e1 v1 v2
edge e2 v3 v4
compound e1 e2 b1

bopcheck b1

compound x0 x1 b1 result

set nb_v_good 4
set nb_e_good 2
set nb_w_good 0
set nb_f_good 0
set nb_sh_good 0
set nb_sol_good 0
set nb_compsol_good 0
set nb_compound_good 2
set nb_shape_good 8

set 2dviewer 1
Commit	Line	Data
6f31882a	1	puts "============"
	2	puts "OCC24620"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# BOPAlgo_CheckerSI returns interferences that are not sub-shapes of the source shape
	7	#######################################################################
	8
	9	vertex v1 0 0 0
	10	vertex v2 10 0 0
	11	vertex v3 4 -5 0
	12	vertex v4 4 5 0
	13	edge e1 v1 v2
	14	edge e2 v3 v4
	15	compound e1 e2 b1
	16
	17	bopcheck b1
	18
	19	compound x0 x1 b1 result
	20
	21	set nb_v_good 4
	22	set nb_e_good 2
	23	set nb_w_good 0
	24	set nb_f_good 0
	25	set nb_sh_good 0
	26	set nb_sol_good 0
	27	set nb_compsol_good 0
	28	set nb_compound_good 2
	29	set nb_shape_good 8
	30
	31	set 2dviewer 1