5 #######################################
6 ## Viewer problem: Selection of objects on global context
7 #######################################
11 set ll [llength ${info}]
13 puts "OCC138: Error (case 1)"
15 regexp {No of currents += +([-0-9.+eE]+)} $info full NbCurrents
16 if {${NbCurrents} != 3 } {
17 puts "OCC138: Error (case 2)"
22 checkview -screenshot -3d -path ${imagedir}/${test_image}.png