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

puts "============"
puts "OCC24532"
puts "============"
puts ""
#######################################################################
# BRepOffsetAPI_MakePipeShell raises an exception in a case with auxiliary guide
#######################################################################

polyline w1 -4 -3 0 4 -3 0 4 3 0 -4 3 0 -4 -3 0
polyline w2 4 3 80 -4 3 80 -4 -3 80 4 -3 80 4 3 80
polyline sp 0 0 0 0 0 80

cylinder cc 0 0 0 0 0 1 -4 -3 0 5
line ll 0 0 pi 80
trim ll ll 0 sqrt(pi*pi+80*80)
explode w1 v
explode w2 v
mkedge ee ll cc w1_1 w2_1
wire gg ee

mksweep sp
setsweep -G gg 0 0
addsweep w1
buildsweep result -S

set square 2343.46

set nb_v_good 8
set nb_e_good 12
set nb_w_good 6
set nb_f_good 6
set nb_sh_good 1
set nb_sol_good 1
set nb_compsol_good 0
set nb_compound_good 0
set nb_shape_good 34

set 2dviewer 1
Commit	Line	Data
561ea68e	1	puts "============"
	2	puts "OCC24532"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# BRepOffsetAPI_MakePipeShell raises an exception in a case with auxiliary guide
	7	#######################################################################
	8
	9	polyline w1 -4 -3 0 4 -3 0 4 3 0 -4 3 0 -4 -3 0
	10	polyline w2 4 3 80 -4 3 80 -4 -3 80 4 -3 80 4 3 80
	11	polyline sp 0 0 0 0 0 80
	12
	13	cylinder cc 0 0 0 0 0 1 -4 -3 0 5
	14	line ll 0 0 pi 80
	15	trim ll ll 0 sqrt(pipi+8080)
	16	explode w1 v
	17	explode w2 v
	18	mkedge ee ll cc w1_1 w2_1
	19	wire gg ee
	20
	21	mksweep sp
	22	setsweep -G gg 0 0
	23	addsweep w1
	24	buildsweep result -S
	25
	26	set square 2343.46
	27
	28	set nb_v_good 8
	29	set nb_e_good 12
	30	set nb_w_good 6
	31	set nb_f_good 6
	32	set nb_sh_good 1
	33	set nb_sol_good 1
	34	set nb_compsol_good 0
	35	set nb_compound_good 0
	36	set nb_shape_good 34
	37
	38	set 2dviewer 1