0a512187 |
1 | puts "================" |
2 | puts "CR25969" |
3 | puts "================" |
4 | puts "" |
5 | ############################################### |
6 | ## Wrong result obtained by 2d classifier algorithm. |
7 | ############################################### |
8 | |
9 | pload DCAF |
10 | |
e837410d |
11 | Open [locate_data_file bug25969_pal22851.cbf] D |
0a512187 |
12 | |
13 | GetShape D 0:1:15:1:1:2 b1 |
14 | GetShape D 0:1:29:1:1:2 b2 |
15 | |
16 | explode b1 |
17 | explode b2 |
18 | |
19 | bop b1_2 b2_1 |
20 | bopcut r |
21 | |
22 | explode r f |
23 | copy r_4 f |
24 | pcurve f |
25 | |
26 | point p 12.658283198213592 21.045164979270297 |
27 | |
28 | set cls1 [b2dclassifx f p] |
29 | if { [regexp {OUT} $cls1] } { |
30 | puts "Error : Wrong result of 2d classifier algorithm" |
31 | } else { |
32 | puts "OK : Good result of 2d classifier algorithm" |
33 | } |
34 | |
35 | smallview |
36 | fit |
5747059b |
37 | checkview -screenshot -2d -path ${imagedir}/${test_image}.png |