set os "ALL" if {[array get env os_type] != ""} { set os $env(os_type) } if { [string compare $os "Debian40"] == 0 || [string compare $os "Mandriva2008"] == 0 } { puts "TODO OCC23068 $os: Faulty shapes in variables faulty_1 to faulty_4" puts "TODO OCC23068 $os: Error : The length of result shape is" puts "TODO OCC23068 $os: Error : Result shape is WRONG" } restore [locate_data_file offset_wire_038.brep] s set length 223.954 set nbsh_v 38 set nbsh_e 38 set nbsh_w 1