1 puts "================"
3 puts "================"
5 ##########################################################################################
6 # Wrong result done by solid classifier algorithm
7 ##########################################################################################
11 restore [locate_data_file bug23088_Pipe_1.brep] b2
12 restore [locate_data_file bug23089_px.draw] px
13 set info [ bclassify b2 px ]
14 set word1 [string compare [lindex ${info} end] "shape"]
15 set word2 [string compare [lindex ${info} end-1] "IN"]
16 set word3 [string compare [lindex ${info} end-2] "is"]
17 set word4 [string compare [lindex ${info} end-3] "point"]
18 set word5 [string compare [lindex ${info} end-4] "The"]
22 if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 && ${word4} == 0 && ${word5} == 0 } {
23 puts "OK ${BugNumber}"
25 puts "Faulty ${BugNumber}"