851f8701 |
1 | puts "============" |
2 | puts "OCC27674" |
3 | puts "============" |
4 | puts "" |
5 | ############################################################################ |
6 | # BRepOffsetAPI_ThruSections make invalid |
7 | # shape if sections are connected at ends |
8 | ############################################################################ |
9 | |
10 | restore [locate_data_file bug27674_CircleLineWires.brep] a |
11 | |
12 | explode a |
13 | wire w a_1 a_2 |
14 | explode w |
15 | wire a1 w_1 |
16 | wire a2 w_2 |
17 | thrusections r 0 0 a1 a2 |
18 | checkshape r |
19 | |
20 | checknbshapes r -vertex 2 -edge 4 |
21 | |
22 | puts "Check that edges degenerated and has no 3d curve..." |
23 | explode r E |
24 | if [regexp {degenerated} [dump r_2]] { |
25 | puts "OK: r_2 is a degenerated edge." |
26 | if [catch {mkcurve c1 r_2} catch_result] { |
27 | puts "OK: r_2 has no 3d curve." |
28 | } else { |
29 | puts "Faulty: r_2 has 3d curve" |
30 | } |
31 | } else { |
32 | puts "Faulty: r_2 is not degenerated edge." |
33 | } |
34 | |
35 | if [regexp {degenerated} [dump r_4]] { |
36 | puts "OK: r_4 is a degenerated edge." |
37 | if [catch {mkcurve c1 r_4} catch_result] { |
38 | puts "OK: r_4 has no 3d curve." |
39 | } else { |
40 | puts "Faulty: r_4 has 3d curve" |
41 | } |
42 | } else { |
43 | puts "Faulty: r_4 is not degenerated edge." |
44 | } |
45 | |
46 | checkview -display r -2d -path ${imagedir}/${test_image}.png |
47 | |