0029807: [Regression to 7.0.0] Impossible to cut cone from prism
[occt.git] / tests / bugs / modalg_2 / bug20964_4
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 # CUT 1-2
16 bbop result 2
17
18 checkprops result -s 821864
19 checkshape result
20
21 set NbShapesRef "
22 Number of shapes in .*
23  VERTEX : 22
24  EDGE : 35
25  WIRE : 17
26  FACE : 14
27  SHELL : 2
28  SOLID : 1
29  COMPSOLID : 0
30  COMPOUND : 1
31  SHAPE : 92
32 "
33
34 checknbshapes result -ref $NbShapesRef
35 checkmaxtol result -ref 0.013928665225777443
36
37 checkview -display result -2d -path ${imagedir}/${test_image}_axo.png
38
39 vdisplay result
40 vsetdispmode 1
41 vviewparams -scale 3.80971 -proj 0.769527 -0.23844 0.59243 -up -0.456402 0.443531 0.771348 -at 70.5761 168.919 28.0572 -eye 455.34 49.6989 324.272
42
43 if { [string compare "" [tricheck result] ] } {
44   puts "Error in triangulation"
45 }
46
47 checkview -screenshot -3d -path ${imagedir}/${test_image}_shade.png