0029807: [Regression to 7.0.0] Impossible to cut cone from prism
[occt.git] / tests / bugs / modalg_2 / bug20964_2
1 puts "============"
2 puts "OCC20964: Wrong result of cut operation for given shapes"
3 puts "============"
4 puts ""
5
6 restore [locate_data_file OCC20964_revsolid.brep] b1 
7 restore [locate_data_file OCC20964_sphere.brep] b2 
8
9 bclearobjects
10 bcleartools
11 baddobjects b1
12 baddtools b2
13 bfillds
14
15 # COMMON
16 bbop result 0
17
18 checkprops result -s 5158.93
19 checkshape result
20
21 set NbShapesRef "
22 Number of shapes in .*
23  VERTEX : 8
24  EDGE : 12
25  WIRE : 6
26  FACE : 5
27  SHELL : 1
28  SOLID : 1
29  COMPSOLID : 0
30  COMPOUND : 1
31  SHAPE : 34
32 "
33
34 checknbshapes result -ref $NbShapesRef
35
36 checkmaxtol result -ref 0.013928665225777443
37
38 checkview -display result -2d -path ${imagedir}/${test_image}_axo.png
39
40 vdisplay result
41 vsetdispmode 1
42 vviewparams -scale 15.9695 -proj 0.0161244 -0.535424 0.84443 -up -0.773936 0.528029 0.349583 -at 117.532 248.227 -4.41145e-007 -eye 118.783 206.661 65.5549
43
44 if { [string compare "" [tricheck result] ] } {
45   puts "Error in triangulation"
46 }
47
48 checkview -screenshot -3d -path ${imagedir}/${test_image}_shade.png