1 puts "================"
3 puts "================"
5 ######################################################################################
6 # Too many intersection vertices between line and cylinder
7 ######################################################################################
11 restore [locate_data_file bug23008_ez15] b1
12 restore [locate_data_file bug23008_fz37] b2
14 set info [ bopnews -v ]
15 for {set i 0} {$i <= 100} {incr i} {
16 set word [lsearch $info z$i]
26 set result [lsearch $check_z 1]
27 if { ${result} == -1 } {
28 puts "OK ${BugNumber}"
30 puts "Faulty ${BugNumber}"