0023367: New functionality restoring the middle path of pipe-like shape
[occt.git] / tests / bugs / modalg / bug23367_15
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 -10 0 20 0 0 10 10 0 0 0 0
10 polyline sp 0 0 0 0 0 50 -100 0 0 -50 0 -50
11 mksweep sp
12 addsweep pp
13 buildsweep a -R
14 explode a e
15 wire w1 a_11 a_8 a_5 a_2
16 wire w2 a_34 a_36 a_28 a_31
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