[occt.git] / tests / bugs / modalg / bug23367_13

puts "============"
puts "CR23367"
puts "============"
puts ""
##########################################################################################################
# New functionality restoring the middle path of pipe-like shape
##########################################################################################################

polyline pp 0 0 0 10 0 0 20 10 0 20 20 0
polyline sp 0 0 0 0 0 100 -50 50 200 -100 100 100
mksweep sp
addsweep pp
buildsweep a -R
explode a e
wire w1 a_2 a_5 a_8
wire w2 a_24 a_27 a_30
donly a w1 w2
fit
middlepath result a w1 w2

set length 1.

set 2dviewer 1
Commit	Line	Data
7416e83c	1	puts "============"
	2	puts "CR23367"
	3	puts "============"
	4	puts ""
	5	##########################################################################################################
	6	# New functionality restoring the middle path of pipe-like shape
	7	##########################################################################################################
	8
	9	polyline pp 0 0 0 10 0 0 20 10 0 20 20 0
	10	polyline sp 0 0 0 0 0 100 -50 50 200 -100 100 100
	11	mksweep sp
	12	addsweep pp
	13	buildsweep a -R
	14	explode a e
	15	wire w1 a_2 a_5 a_8
	16	wire w2 a_24 a_27 a_30
	17	donly a w1 w2
	18	fit
	19	middlepath result a w1 w2
	20
	21	set length 1.
	22
	23	set 2dviewer 1
	24
	25
	26
	27