0029807: [Regression to 7.0.0] Impossible to cut cone from prism
[occt.git] / tests / bugs / modalg_7 / bug29807_i2005
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-tool.brep] b2
8
9 trotate b2 +23.85857157145715500000 +12.00000000000000000000 +5.50000000000000000000 7 -7.14142842854285 0 5
10 trotate b2 +23.85857157145715500000 +12.00000000000000000000 +5.50000000000000000000 7.1414284285428495 7.0000000000000009 -0 -38
11 ttranslate b2 0 0 2
12
13 explode b1 f
14 explode b2 f
15 nurbsconvert f1 b1_5
16 smallview
17 don f1 b2_2
18 fit
19
20 regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves f1 b2_2 -2d] full Toler NbCurv
21
22 checkreal Tolerance $Toler 6.4774617011651419e-006 0.0 0.01
23
24 if {$NbCurv != 2} {
25   puts "Error: Please check NbCurves for intersector"
26 }
27
28 checkview -screenshot -2d -path ${imagedir}/${test_image}_3d.png
29 smallview -2D-
30 2dfit
31 checkview -screenshot -2d -path ${imagedir}/${test_image}_2d.png