c8187bb2 |
1 | puts "========" |
2 | puts "OCC25828" |
3 | puts "========" |
4 | puts "" |
5 | ########################################## |
6 | ## BRepAlgoAPI_Section fails for a solid and a face depending on order of arguments |
7 | ########################################## |
8 | |
9 | set BugNumber OCC25828 |
10 | |
11 | restore [locate_data_file bug25828_intersectionproblem.brep] b |
12 | |
13 | explode b |
14 | copy b_1 b1 |
15 | copy b_2 b2 |
16 | |
17 | explode b1 f |
18 | copy b1_1 b1 |
19 | explode b2 f |
20 | copy b2_6 b2 |
21 | |
22 | mksurface s1 b1 |
23 | mksurface s2 b2 |
24 | |
25 | trim s2 s2 -31.464272161690925 31.464272161690968 -21.228551512037676 26.343858939611884 |
26 | |
27 | set log [intersect rr s1 s2 2.0e-7] |
28 | |
29 | set ll [llength ${log}] |
30 | |
31 | if {${ll} == 1} { |
32 | puts "${BugNumber} OK" |
33 | } else { |
34 | puts "Error ${BugNumber}" |
35 | } |
36 | |
37 | smallview |
38 | donly rr |
39 | fit |
40 | |
41 | set only_screen_axo 1 |