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