5 ###############################
6 ## Can't cut a sphere from a cylinder
7 ###############################
9 restore [locate_data_file bug26431_Body.brep] b1
10 restore [locate_data_file bug26431_Sphere.brep] b2
15 bsection result b1_3 b2_1
17 set log [checksection result]
19 if { [string compare -nocase $log " nb alone Vertices : 0\n\n"] } {
20 puts "ERROR: the section is not closed"
22 puts "The section is OK"
28 checkview -screenshot -2d -path ${imagedir}/${test_image}.png