809eca9d |
1 | puts "============" |
2 | puts "OCC22695" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | # The algorithm BRepFilletAPI_MakeFillet2d crashes in cases when some original edges of the face degenerate (become punctual) |
7 | ####################################################################### |
8 | |
9 | set BugNumber OCC22695 |
10 | |
11 | smallview |
12 | |
13 | polyline pp 0 0 0 10 0 0 10 10 0 0 10 0 0 0 0 |
14 | mkplane ff pp |
15 | explode ff e |
16 | fit |
17 | |
18 | donly ff ff_1 ff_2 |
19 | if { [catch {chfi2d res1 ff ff_1 ff_2 F 5} catch_result] } { |
20 | puts "Faulty ${BugNumber}" |
21 | } |
22 | |
23 | #set length 37.854 |
24 | |
25 | explode res1 e |
26 | donly res1 res1_3 res1_4 |
27 | if { [catch {chfi2d res2 res1 res1_3 res1_4 F 5} catch_result] } { |
28 | puts "Faulty ${BugNumber}" |
29 | } |
30 | |
31 | #set length 35.708 |
32 | |
33 | explode res2 e |
34 | donly res2 res2_1 res2_5 |
35 | if { [catch {chfi2d res3 res2 res2_1 res2_5 F 5} catch_result] } { |
36 | puts "Faulty ${BugNumber}" |
37 | } |
38 | |
39 | #set length 33.5619 |
40 | |
41 | explode res3 e |
42 | donly res3 res3_4 res3_5 |
43 | if { [catch {chfi2d result res3 res3_4 res3_5 F 5} catch_result] } { |
44 | puts "Faulty ${BugNumber}" |
45 | } |
46 | |
47 | set length 31.4159 |
48 | set 3dviewer 0 |
49 | |