1 puts "========================"
3 puts "========================"
5 ################################################################################################################
6 # Wrong results of BRepExtrema_DistShapeShape: non-null minimum distance between intersecting line and cylinder
7 ################################################################################################################
11 restore [locate_data_file bug23043_croix.brep] a
12 restore [locate_data_file bug23043_cylindre.brep] b
17 set dist2 [ dval dd2 ]
18 set dist3 [ dval dd3 ]
19 set dist4 [ dval dd4 ]
23 if { $dist1 == 0 && $dist2 == 0 && $dist3 == 0 && $dist4 == 0 } {
24 puts "OK ${BugNumber}"
26 puts "Faulty ${BugNumber}"