mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-30 13:05:50 +03:00
af4b075434
1. Methods ClearVertexes(), RemoveVertex(...) and InsertVertexBefore(...) was added to the IntPatch_WLine class. 2. Function IsSame(...) for IntSurf_PntOn2S was added (see IntSurf_PntOn2S.cdl for detail information). 3. Concatenate WLine got if it is possible. Some test cases were changed according to their new behavior.
59 lines
1.1 KiB
Plaintext
59 lines
1.1 KiB
Plaintext
puts "========="
|
|
puts "OCC24825"
|
|
puts "========="
|
|
puts ""
|
|
###########################################################
|
|
# Fit Boolean Operation Algorithm to treat multiple arguments.
|
|
###########################################################
|
|
|
|
restore [locate_data_file bug24825_steering-wheel-ring1.brep] b1
|
|
restore [locate_data_file bug24825_steering-wheel-ring2.brep] b2
|
|
restore [locate_data_file bug24825_steering-wheel-drum.brep] b4
|
|
restore [locate_data_file bug24825_steering-wheel-handle.brep] hb
|
|
|
|
set qs {}
|
|
|
|
set N 10
|
|
set N1 [expr 360. / $N ]
|
|
|
|
for {set i 0} {$i < $N} {incr i} {
|
|
tcopy hb hb_${i}
|
|
trotate hb_${i} 0. 0. 0. 0. 0. 1. [expr $i * $N1 ]
|
|
lappend qs hb_${i}
|
|
}
|
|
eval compound $qs b3
|
|
|
|
tcopy b1 b5
|
|
ttranslate b5 0 0 100
|
|
|
|
tcopy b2 b6
|
|
ttranslate b6 0 0 100
|
|
|
|
tcopy b3 b7
|
|
ttranslate b7 0 0 100
|
|
|
|
#-cut-#
|
|
|
|
bclearobjects
|
|
bcleartools
|
|
baddobjects b2 b6 b4 b1 b5
|
|
baddctools b3
|
|
baddctools b7
|
|
|
|
bfillds
|
|
bbop result 2
|
|
|
|
set square 103838
|
|
|
|
set nb_v_good 160
|
|
set nb_e_good 218
|
|
set nb_w_good 142
|
|
set nb_f_good 80
|
|
set nb_sh_good 3
|
|
set nb_sol_good 3
|
|
set nb_compsol_good 0
|
|
set nb_compound_good 1
|
|
set nb_shape_good 607
|
|
|
|
set 2dviewer 1
|