0023367: New functionality restoring the middle path of pipe-like shape
[occt.git] / tests / bugs / modalg / bug23367_3
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 5 0 0 10 0 0 10 10 0 0 10 0 0 0 0
10 mkplane ff pp
11 prism a ff 0 0 50
12 explode a f
13 donly a a_6 a_7
14 fit
15 middlepath result a a_6 a_7
16
17 set length 50.
18
19 set 2dviewer 1
20
21
22