0029807: [Regression to 7.0.0] Impossible to cut cone from prism
[occt.git] / tests / bugs / modalg_7 / bug29807_i1006
1 puts "========"
2 puts "0029807: Impossible to cut cone from prism"
3 puts "========"
4 puts ""
5
6 restore [locate_data_file bug25542_cylinder.brep] b1
7 restore [locate_data_file bug25542_cone.brep] b2
8
9 explode b1 f
10 explode b2 f
11
12 smallview
13 don b1_1 b2_1
14 fit
15
16 regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b1_1 b2_1 -2d] full Toler NbCurv
17
18 checkreal Tolerance $Toler 0.0016015772839744358 0.0 0.01
19
20 if {$NbCurv != 2} {
21   puts "Error: Please check NbCurves for intersector"
22 }
23
24 checkview -screenshot -2d -path ${imagedir}/${test_image}_3d.png
25 smallview -2D-
26 2dfit
27 checkview -screenshot -2d -path ${imagedir}/${test_image}_2d.png