5 ###############################
6 ## Provide API access to the new functionalities of Boolean Components
7 ###############################
15 for {set i 0} {$i < $N} {incr i} {
16 for {set j 0} {$j < $N} {incr j} {
18 ttranslate b_${i}_${j} [expr $i * 10] [expr $j * 10] 0.
19 lappend qs1 b_${i}_${j}
30 for {set i 0} {$i < $N} {incr i} {
31 for {set j 0} {$j < $N} {incr j} {
33 ttranslate b_${i}_${j} [expr $i * 10] [expr $j * 10] 0.
34 lappend qs2 b_${i}_${j}
47 checknbshapes result -vertex 2640 -edge 5960 -wire 3720 -face 3720 -shell 560 -solid 560 -compsolid 0 -compound 1 -shape 17161
48 checkview -display result -3d -path ${imagedir}/${test_image}.png