b7cd7c2b |
1 | puts "================" |
2 | puts "OCC152" |
3 | puts "SAM1178" |
4 | puts "================" |
5 | puts "" |
6 | ################################################################# |
7 | ## SAM1178(#1871): Bad escaped result after a cut operation on the shape. |
8 | ################################################################# |
9 | |
10 | restore [locate_data_file OCC152.brep] sh |
11 | explode sh |
12 | |
13 | # the shape sh_1 is self-interfered |
14 | # rebuild it |
15 | eval mkvolume a [explode sh_1 f] |
16 | checkshape a |
17 | |
18 | if {![regexp "OK" [bopcheck a]]} { |
19 | puts "Error: first argument is still self-interfered" |
20 | } |
21 | |
22 | # Note, that one of the edges of the shape sh_2 contains invalid PCurve |
23 | # on one of the faces of the shape sh_1. Try: |
24 | # explode sh_1 f |
25 | # explode sh_2 e |
26 | # v2d |
27 | # pcurve sh_1_3; 2dfit |
28 | # pcurve c2d sh_2_1 sh_1_3 |
29 | # c2d is not adjusted. |
30 | # |
31 | # Boolean Operations algorithm will adjust it itself. |
32 | |
33 | copy sh_2 b |
34 | |
35 | |
36 | # perform intersection |
37 | bclearobjects |
38 | bcleartools |
39 | baddobjects a |
40 | baddtools b |
41 | bfillds |
42 | |
43 | # perform all kinds of Boolean operations |
44 | |
45 | # common |
46 | bbop rcom 0 |
47 | checkshape rcom |
48 | checkprops rcom -s 57108.7 -v 436179 |
49 | checknbshapes rcom -wire 3 -face 3 -shell 2 -solid 2 -m "Common" |
50 | |
51 | |
52 | # fuse |
53 | bbop rfuse 1 |
54 | checkshape rfuse |
55 | checkprops rfuse -s 211120 -v 7.18494e+006 |
56 | checknbshapes rfuse -wire 4 -face 4 -shell 1 -solid 1 -m "Fuse" |
57 | |
58 | |
59 | # cut |
60 | bbop rcut 2 |
61 | checkshape rcut |
62 | checkprops rcut -s 376623 -v 6.74877e+006 |
63 | checknbshapes rcut -wire 9 -face 9 -shell 3 -solid 3 -m "Cut" |
64 | |
65 | |
66 | # tuc |
67 | bbop rtuc 3 |
68 | checkshape rtuc |
69 | checkprops rtuc -s empty -v empty |
70 | checknbshapes rtuc -wire 0 -face 0 -shell 0 -solid 0 -m "Cut21" |
71 | |
72 | # gf |
73 | bbuild result |
74 | checkshape result |
75 | checkprops result -s 490840 -v 7.62112e+006 |
76 | checknbshapes result -wire 10 -face 10 -shell 5 -solid 5 -m "GF" |
77 | |
78 | checkview -display result -2d -path ${imagedir}/${test_image}.png |