puts "TODO OCC23068 ALL: Error : big tolerance of shape result"
puts "TODO OCC23068 ALL: Faulty shapes in variables faulty_1 to faulty_2"
set os "ALL"
if {[array get env os_type] != ""} {
  set os $env(os_type)
}

if {
        [string compare $os "Debian40"] != 0
    &&  [string compare $os "Mandriva2010"] != 0
    &&  [string compare $os "Mandriva2008"] != 0
   } {
  puts "TODO OCC23068 $os: Error : The resulting shape is WRONG"
}



restore [locate_data_file offset_wire_041.brep] s

set length 3319.85
set nbsh_v 618
set nbsh_e 618
set nbsh_w 1