5 ###########################################################
6 # Wrong intersection between a surface of revolution and a plane.
7 ###########################################################
12 restore [locate_data_file bug22766_f1] f1
13 restore [locate_data_file bug22766_f2] f2
15 set log [bopcurves f1 f2]
17 regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
19 if {${NbCurv} != ${NbCurv_OK}} {
20 puts "Error: ${NbCurv_OK} curve(s) expected, but ${NbCurv} found."
23 if {${Toler} > ${MaxTol}} {
24 puts "Error: Tolerance is too big!"