mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
7e4ff64898
Substitution of degenerated edges by their copies is implemented to make edges not shared in BRepPrimAPI_MakeRevol::Build(). Method BRepPrimAPI_MakeRevol::Generated(...) is changed in order to use history of substitutions. Test case is added.
44 lines
793 B
Plaintext
44 lines
793 B
Plaintext
puts "========"
|
|
puts "OCC29586"
|
|
puts "========"
|
|
puts ""
|
|
#################################################
|
|
# Revolution creates solid with degenerated edges shared among faces
|
|
#################################################
|
|
|
|
circle c1 0 -5 0 1 0 0 10
|
|
circle c2 0 5 0 1 0 0 10
|
|
mkedge e1 c1
|
|
mkedge e2 c2
|
|
wire w1 e1
|
|
wire w2 e2
|
|
mkplane f1 w1
|
|
mkplane f2 w2
|
|
bcut f12 f1 f2
|
|
revol r f12 0 0 0 0 0 1 180
|
|
|
|
explode r f
|
|
|
|
explode r_1 e
|
|
|
|
explode r_2 e
|
|
|
|
explode r_3 e
|
|
|
|
if {[regexp "same shapes" [compare r_1_1 r_2_1]]} { puts "Error" }
|
|
# Error
|
|
|
|
if {[regexp "same shapes" [compare r_3_2 r_2_2]]} { puts "Error" }
|
|
# Error
|
|
|
|
#testing generated
|
|
savehistory h
|
|
explode f12 v
|
|
generated g1 h f12_1
|
|
checknbshapes g1 -edge 2
|
|
generated g2 h f12_2
|
|
checknbshapes g2 -edge 1
|
|
generated g3 h f12_3
|
|
checknbshapes g3 -edge 2
|
|
|