5 ############################################
6 # Parallelization of assembly part of BO
7 ############################################
20 for {set j 1} {$j < $N} {incr j} {
22 ttranslate fx_${j} [expr $j*$dX] 0. 0.
26 for {set j 1} {$j < $N} {incr j} {
28 ttranslate fy_${j} 0. [expr $j*$dX] 0.
32 for {set j 1} {$j < $N} {incr j} {
34 ttranslate fz_${j} 0. 0. [expr $j*$dX]
45 regexp { +Tps: +([-0-9.+eE]+)} [bbuild result -t] full tps_time
47 if { [regexp {Debug mode} [dversion]] } {
52 if { $tps_time > $check_time } {
53 puts "Error: low performance"
55 puts "OK: high performance"