mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
53a73fc1d1
Implementation of the new class *BOPAlgo_MakePeriodic* for making the shape periodic in 3D space. Periodicity of the shape means that the shape can be repeated in any periodic direction any number of times without creation of the new geometry or splits. The idea of this algorithm is to make the shape look similarly on the opposite sides or on the period bounds of periodic directions. It does not mean that the opposite sides of the shape will be mirrored. It just means the the opposite sides of the shape should be split by each other and obtain the same geometry on opposite sides. Such approach will allow repeating the shape, i.e. translating the copy of a shape on the period, without creation of new geometry because there will be no coinciding parts of different dimension. Draw commands for the new algorithm: * makeperiodic - makes the shape periodic in required directions; * repeatshape - repeats the periodic shape in requested periodic direction; * periodictwins - returns the periodic twins for the shape; * clearrepetitions - clears all previous repetitions of the periodic shape. Documentation & test cases for the algorithm.
40 lines
907 B
Plaintext
40 lines
907 B
Plaintext
box b 10 10 10
|
|
copy b bf
|
|
foreach e [explode b e] {
|
|
nurbsconvert ne $e
|
|
eval mkvolume s ne [explode bf f]
|
|
|
|
savehistory mv_hist
|
|
modified m mv_hist ne
|
|
|
|
mkcurve cur m
|
|
if {![regexp "BSplineCurve" [dump cur]]} {
|
|
puts "Error: Boolean Operation took the second face"
|
|
}
|
|
|
|
# make the shape periodic in all directions
|
|
makeperiodic res s -x 10 -y 10 -z 10
|
|
|
|
savehistory h
|
|
modified me h m
|
|
|
|
# get twins for the edge
|
|
periodictwins twins me
|
|
|
|
checknbshapes twins -edge 2 -m "Periodic twins" -t
|
|
mkcurve c_me me
|
|
if {![regexp {Basis curve :\n([^ \n]*)} [dump c_me] full e_type]} {
|
|
puts "Error: Unable to get the type"
|
|
}
|
|
|
|
foreach t [explode twins e] {
|
|
mkcurve c_$t $t
|
|
if {![regexp {Basis curve :\n([^ \n]*)} [dump c_$t] full t_type]} {
|
|
puts "Error: Unable to get the type"
|
|
}
|
|
if {$e_type != $t_type} {
|
|
puts "Error: Twins have different geometries"
|
|
}
|
|
}
|
|
}
|