mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
58 lines
1.4 KiB
Plaintext
58 lines
1.4 KiB
Plaintext
puts "============"
|
|
puts "OCC24157"
|
|
puts "============"
|
|
puts ""
|
|
############################################
|
|
# Parallelization of assembly part of BO
|
|
############################################
|
|
|
|
box b1 100 100 100
|
|
set cx {}
|
|
psphere sp 1.
|
|
explode sp f
|
|
copy sp_1 sp
|
|
|
|
set ds 2.5
|
|
set dS 10.
|
|
set aNbGroups 3
|
|
|
|
for {set N 0} {$N < ${aNbGroups}} {incr N} {
|
|
for {set K 0} {$K < ${aNbGroups}} {incr K} {
|
|
for {set M 0} {$M < ${aNbGroups}} {incr M} {
|
|
for {set n 0} {$n < 3} {incr n} {
|
|
for {set k 0} {$k < 3} {incr k} {
|
|
for {set m 0} {$m < 3} {incr m} {
|
|
tcopy sp sp_${N}_${K}_${M}_${n}_${k}_${m}
|
|
ttranslate sp_${N}_${K}_${M}_${n}_${k}_${m} 2.5 2.5 2.5
|
|
ttranslate sp_${N}_${K}_${M}_${n}_${k}_${m} [expr $k*${ds}] [expr $m*${ds}] [expr $n*${ds}]
|
|
ttranslate sp_${N}_${K}_${M}_${n}_${k}_${m} [expr $M*${dS}] [expr $K*${dS}] [expr $N*${dS}]
|
|
lappend cx sp_${N}_${K}_${M}_${n}_${k}_${m}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
eval compound $cx b2
|
|
|
|
bclearobjects
|
|
bcleartools
|
|
baddobjects b1
|
|
baddcompound b2
|
|
bfillds
|
|
|
|
regexp { +Tps: +([-0-9.+eE]+)} [bbuild result -t] full tps_time
|
|
|
|
if { [regexp {Debug mode} [dversion]] } {
|
|
set check_time 40
|
|
} else {
|
|
set check_time 24
|
|
}
|
|
if { $tps_time > $check_time } {
|
|
puts "Error: low performance"
|
|
} else {
|
|
puts "OK: high performance"
|
|
}
|
|
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|