mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
33 lines
945 B
Plaintext
33 lines
945 B
Plaintext
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
|