73cd8a8a |
1 | puts "================" |
2 | puts "OCC24422" |
3 | puts "================" |
4 | puts "" |
5 | ####################################################################### |
6 | # Wrong result done by FaceClassifier algorythm |
7 | ####################################################################### |
8 | |
9 | restore [locate_data_file bug24422_Compound.brep] b |
10 | explode b f |
11 | copy b_1 f |
12 | |
13 | point p 115.945392440981 106 230.000108990528 |
14 | point p_proj 230.00010899052799 1925.9453924409811 |
15 | set info [b2dclassify f p_proj] |
16 | |
17 | if { [regexp "The point is OUT of shape" $info] != 1 } { |
18 | puts "Error : point should be ON shape" |
19 | } else { |
20 | puts "OK: point is OUT of shape" |
21 | } |
22 | |
23 | axo |
24 | fit |
25 | set only_screen_axo 1 |
26 | |
27 | |