+++ /dev/null
-puts "========"
-puts "OCC27766"
-puts "========"
-puts ""
-#################################################
-# Incorrect section curves between attached cylinders
-#################################################
-
-set ExpTol 1.0e-7
-set GoodNbCurv 3
-
-restore [locate_data_file bug27761_c1.brep] c1
-restore [locate_data_file bug27761_c2.brep] c2
-
-set log [bopcurves c1 c2 -2d]
-
-regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
-
-if {${NbCurv} != ${GoodNbCurv}} {
- puts "Error: Number of curves is bad!"
-}
-
-checkreal TolReached $Toler $ExpTol 0.0 0.1
-
-smallview
-don c_*
-fit
-disp c1 c2
-
-checkview -screenshot -2d -path ${imagedir}/${test_image}.png