0014531: Boolean Operation Algorithm fails
[occt.git] / tests / bugs / modalg_3 / bug5805_9
1 puts "============"
2 puts "OCC5805"
3 puts "============"
4
5 #######################################################################
6 # BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results.
7 #######################################################################
8
9 set BugNumber OCC5805
10
11 # ellipse1
12 ellipse ell 10 0 0 1 0 0 5 3
13 mkedge ee1 ell
14 wire UpCover ee1
15
16 # ellipse2
17 copy ee1 ee2
18 ttranslate ee2 -20 0 0
19 wire BottomCover ee2
20
21 set issolid 1
22 set isruled 1
23 if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] {
24    puts "Faulty ${BugNumber} : thrusections is wrong"
25    
26 }
27
28 set distance -0.5
29 catch { OFFSETSHAPE $distance {} $calcul $type }
30
31
32 checkprops result -s 518.774
33 checkshape result
34 checknbshapes result -vertex 2 -edge 3 -wire 3 -face 3 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 13
35
36 set index [lsearch [whatis s] Closed]
37 if {$index == -1} {
38   puts "Faulty ${BugNumber} : s is not Closed shape"
39   
40 }
41
42 set index [lsearch [whatis result] Closed]
43 if {$index == -1} {
44   puts "Faulty ${BugNumber} : result is not Closed shape"
45   
46 }
47
48
49 checkview -display result -2d -path ${imagedir}/${test_image}.png