puts "============"
puts "OCC25455"
puts "============"
puts ""
######################################################
# fixshape works at the second attempt
######################################################

restore [locate_data_file bug25455_rx.brep] rx

fixshape rx rx

set info [checkshape rx]

# Resume
puts ""
if { [regexp {This shape seems to be valid} ${info}] } {
   puts "OK: fixshape works properly"
} else {
   puts "Error: fixshape works bad"
}
