0025462: BRepAlgoAPI_Fuse not work correctly for a planar face
[occt.git] / tests / bugs / modalg_7 / bug25462
1 puts "============================================================================================="
2 puts "0025462: BRepAlgoAPI_Fuse not work correctly for a planar face"
3 puts "============================================================================================="
4 puts ""
5
6 polyline p 0 0 0 0.01 0 0 0 0.01 0 0 0 0
7 mkplane f1 p
8 ellipse e 0.01 0.01 0 0 0 1 1 0 0 0.01 0.005
9 mkedge e e; wire w e; mkplane f2 w
10 circle c 0 0 0 0 0 1 1 0 0 0.005
11 mkedge e c; wire w e; mkplane f3 w
12 polyline p -0.01 0.005 0 -0.01 0 0 0 0 0 0 0.005 0 -0.01 0.005 0
13 mkplane f4 p
14
15 bclearobjects
16 bcleartools
17 baddobjects f1
18 baddtools f2 f3 f4
19
20 bsimplify -e 1 -f 1
21 bapibop result 1
22 checkshape result
23 checkprops result -s 0.000293167
24 checknbshapes result -wire 1 -face 1
25
26 bsimplify -e 0 -f 0
27 bapibop result1 1
28 checkshape result1
29 checkprops result1 -s 0.000293167
30 checknbshapes result1 -wire 7 -face 7
31
32 checkview -display result -2d -path ${imagedir}/${test_image}.png