1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-05-31 11:15:31 +03:00
occt/tests/bugs/modalg/bug23089
apn 809eca9db6 Added test cases to folders /bugs/modalg and /bugs/moddata from chl grid.
Modified TODO in some offset cases.
Deleted the same test cases bug697_* in /bugs/modalg
Deleted test cases which is based on v2d commands
Added test cases to folder bugs
2013-01-25 16:22:41 +04:00

28 lines
929 B
Plaintext
Executable File

puts "================"
puts "OCC23089"
puts "================"
puts ""
##########################################################################################
# Wrong result done by solid classifier algorithm
##########################################################################################
set BugNumber OCC23089
restore [locate_data_file bug23088_Pipe_1.brep] b2
restore [locate_data_file bug23089_px.draw] px
set info [ bclassify b2 px ]
set word1 [string compare [lindex ${info} end] "shape"]
set word2 [string compare [lindex ${info} end-1] "IN"]
set word3 [string compare [lindex ${info} end-2] "is"]
set word4 [string compare [lindex ${info} end-3] "point"]
set word5 [string compare [lindex ${info} end-4] "The"]
# Resume
puts ""
if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 && ${word4} == 0 && ${word5} == 0 } {
puts "OK ${BugNumber}"
} else {
puts "Faulty ${BugNumber}"
}
set 3dviewer 0