Modified TODOs in test cases bugs modalg_2 bug5805_* with number of issue #25925.
[occt.git] / tests / bugs / modalg_2 / bug5805_43
CommitLineData
c1e0171c 1puts "TODO OCC25925 ALL: Tcl Exception: result is not a topological shape!!!"
2puts "TODO OCC25925 ALL: ERROR. offsetperform operation not done"
3puts "TODO OCC25925 ALL: Faulty OCC5805 : result is not Closed shape"
4puts "TODO OCC25925 ALL: TEST INCOMPLETE"
ab87e6fc 5
3bea4c16 6puts "============"
7puts "OCC5805"
8puts "============"
9
10#######################################################################
11# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results.
12#######################################################################
13
14set BugNumber OCC5805
15
16set z1 5
17set z2 -5
18
19# beziercurve1
20beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1}
21mkedge e1 bc1
22wire UpCover e1
23
24# beziercurve2
25beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2}
26mkedge e2 bc2
27wire BottomCover e2
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.001
37catch { OFFSETSHAPE $distance {s_3} $calcul $type }
38# Bad result
39
40
41set square 495.635
42
43set nb_v_good 2
44set nb_e_good 3
45set nb_w_good 3
46set nb_f_good 3
47set nb_sh_good 1
48set nb_sol_good 1
49set nb_compsol_good 0
50set nb_compound_good 0
51set nb_shape_good 13
52
53
54set index [lsearch [whatis s] Closed]
55if {$index == -1} {
56 puts "Faulty ${BugNumber} : s is not Closed shape"
57
58}
59
60set index [lsearch [whatis result] Closed]
61if {$index == -1} {
62 puts "Faulty ${BugNumber} : result is not Closed shape"
63
64}
65
66
67set 2dviewer 0