0030202: IntPatch_WLineTool::JoinWLines array out of bounds
[occt.git] / tests / bugs / modalg_7 / bug30202_1
1 puts "========"
2 puts "0030202: IntPatch_WLineTool::JoinWLines array out of bounds"
3 puts "========"
4 puts ""
5
6 restore [locate_data_file bug30202_src.brep] b1
7 restore [locate_data_file bug30202_tool.brep] b2
8
9 bclearobjects
10 bcleartools
11 baddobjects b1
12 baddtools b2
13
14 bfillds
15
16 bbop r_0 0
17 bbop r_1 1
18 bbop r_2 2
19 bbop r_3 3
20 bbop r_4 4
21
22
23 checkshape r_0
24 checknbshapes r_0 -solid 1 -shell 1 -face 10 -wire 10
25 checkprops r_0 -s 3.07923 -v 0.15225
26 if {[regexp "Faulties" [bopargcheck r_0]]} {
27   puts "Error: bopargcheck has found some faulties in r_0"
28 }
29
30 checkshape r_1
31 checknbshapes r_1 -solid 1 -shell 1 -face 31 -wire 33
32 checkprops r_1 -s 128.978 -v 46.7138
33 if {[regexp "Faulties" [bopargcheck r_1]]} {
34   puts "Error: bopargcheck has found some faulties in r_1"
35 }
36
37 checkshape r_2
38 checknbshapes r_2 -solid 1 -shell 1 -face 29 -wire 31
39 checkprops r_2 -s 117.75 -v 45.3505
40 if {[regexp "Faulties" [bopargcheck r_2]]} {
41   puts "Error: bopargcheck has found some faulties in r_2"
42 }
43
44 checkshape r_3
45 checknbshapes r_3 -solid 1 -shell 1 -face 12 -wire 12
46 checkprops r_3 -s 14.3071 -v 1.2111
47 if {[regexp "Faulties" [bopargcheck r_3]]} {
48   puts "Error: bopargcheck has found some faulties in r_3"
49 }
50
51 checkshape r_4
52 checknbshapes r_4 -vertex 8 -edge 8
53 checkprops r_4 -l 8.28981
54 if {[regexp "Faulties" [bopargcheck r_4]]} {
55   puts "Error: bopargcheck has found some faulties in r_4"
56 }
57
58 checksection r_4 -r 0
59
60 # FUSE
61 copy r_1 result
62 checkmaxtol result -min_tol 1.0e-4
63 checkview -display result -2d -path ${imagedir}/${test_image}.png
64