1 puts "================"
3 puts "================"
5 #######################################################################
6 # Wrong result done by FaceClassifier algorythm
7 #######################################################################
9 restore [locate_data_file bug24422_Compound.brep] b
13 point p 115.945392440981 106 230.000108990528
14 point p_proj 230.00010899052799 1925.9453924409811
15 set info [b2dclassify f p_proj]
17 if { [regexp "The point is OUT of shape" $info] != 1 } {
18 puts "Error : point should be ON shape"
20 puts "OK: point is OUT of shape"