1puts "============"
2puts "OCC26757"
3puts "============"
4puts ""
5###############################################################################################
6# Wrong history of a fillet
7###############################################################################################
8
9restore [locate_data_file bug26757_s.brep] s
10
11explode s e
12blend r s 2 s_14
13checkhist
14explode generated_001
15
16set nbshapes_expected_1 "
17Number of shapes in shape
18 VERTEX    : 2
19 EDGE      : 1
20 WIRE      : 0
21 FACE      : 0
22 SHELL     : 0
23 SOLID     : 0
24 COMPSOLID : 0
25 COMPOUND  : 0
26 SHAPE     : 3
27"
28checknbshapes generated_001_1 -ref ${nbshapes_expected_1} -t -m "selected edge"
29
30set nbshapes_expected_2 "
31Number of shapes in shape
32 VERTEX    : 5
33 EDGE      : 5
34 WIRE      : 1
35 FACE      : 1
36 SHELL     : 0
37 SOLID     : 0
38 COMPSOLID : 0
39 COMPOUND  : 0
40 SHAPE     : 12
41"
42if { [info exists generated_001_2] == 0 } {
43   puts "Error: Wrong history of a fillet"
44} else {
45   checknbshapes generated_001_2 -ref ${nbshapes_expected_2} -t -m "fillet face"
46}
47
48smallview
49donly generated_001_1 generated_001_2
50fit
51xwd ${imagedir}/${test_image}.png
52