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