0026233: BRepOffset_MakeOffset makes incorrect result
[occt.git] / tests / bugs / modalg_2 / bug5805_30
CommitLineData
c1e0171c 1puts "TODO OCC25925 ALL: Error : The square of result shape is"
3bea4c16 2
3puts "============"
4puts "OCC5805"
5puts "============"
6
7#######################################################################
8# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results.
9#######################################################################
10
11set BugNumber OCC5805
12
13set z1 10
14set z2 -10
15
16# circle1
17circle c1 0 0 ${z1} 5
18mkedge ec1 c1
19wire UpCover ec1
20
21# circle2
22circle c2 0 0 ${z2} 30
23mkedge ec2 c2
24wire BottomCover ec2
25
26set issolid 1
27set isruled 1
28if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] {
29 puts "Faulty ${BugNumber} : thrusections is wrong"
30
31}
32
33set distance -0.5
34catch { OFFSETSHAPE $distance {s_2} $calcul $type }
35
36
37set square 1336.75
38
39set nb_v_good 4
40set nb_e_good 6
41set nb_w_good 6
42set nb_f_good 5
43set nb_sh_good 1
44set nb_sol_good 1
45set nb_compsol_good 0
46set nb_compound_good 0
47set nb_shape_good 23
48
49
50set index [lsearch [whatis s] Closed]
51if {$index == -1} {
52 puts "Faulty ${BugNumber} : s is not Closed shape"
53
54}
55
56set index [lsearch [whatis result] Closed]
57if {$index == -1} {
58 puts "Faulty ${BugNumber} : result is not Closed shape"
59
60}
61
62
63set 2dviewer 0