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