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 0 50 200 0 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_22 a_20 |
17 | donly a w1 w2 |
18 | fit |
19 | middlepath result a w1 w2 |
20 | |
58cf74e0 |
21 | checkprops result -l 288.824 |
22 | checkshape result |
23 | checksection result |
7416e83c |
24 | |
5747059b |
25 | checkview -display result -2d -path ${imagedir}/${test_image}.png |
7416e83c |
26 | |
27 | |
28 | |
29 | |