0030082: Intersection algorithm returns curve with big tolerance value
[occt.git] / tests / bugs / modalg_7 / bug28366
1 puts "TODO OCC28366 ALL: Error: BOP"
2
3 puts "============"
4 puts "OCC28366"
5 puts "============"
6 puts ""
7 #############################################
8 # BOP Common fails with solid and planar face
9 #############################################
10
11 pload XDE
12
13 stepread [locate_data_file bug28366_fuselage.stp] a *
14 renamevar a_1 a
15
16 # Sew all the faces and make a solid.
17 explode a f
18 sewing shell 1.0e-6 a_1 a_2 a_3 a_4 a_5 a_6 a_7 a_8 
19 mkvolume fuselage shell
20
21 # Make a xy-plane at the origin.
22 plane pln
23 mkface face pln
24
25 # Try a bcommon
26 set Log_1 [bcommon common face fuselage]
27 if {[regexp "Warning" ${Log_1}] == 1} {
28     puts "Error: BOP Common fails with solid and planar face"
29 }
30 set Log [bopcheck common]
31 if {[regexp "This shape seems to be OK" ${Log}] != 1} {
32     puts "Error: BOP Common fails with solid and planar face"
33 }
34 checkview -display common -2d -path ${imagedir}/${test_image}_common.png
35
36 # Try bsection
37 set Log_2 [bsection section face fuselage]
38 if {[regexp "Warning" ${Log_1}] == 1} {
39     puts "Error: BOP Section fails with solid and planar face"
40 }
41 set Log [bopcheck section]
42 if {[regexp "This shape seems to be OK" ${Log}] != 1} {
43     puts "Error: BOP Section fails with solid and planar face"
44 }