puts "============"
puts "CR25020"
puts "============"
puts ""
##########################################################################################################
# checkoverlapedges doesn't have the check for degenerated edges
##########################################################################################################

restore [locate_data_file bug25020_b.brep] b
explode b e

dlog reset
dlog on
catch {checkoverlapedges b_1 b_2}
set info [dlog get]

if { [regexp "degenerated" ${info} ] == 1 } {
    puts "OK : checkoverlapedges have the check for degenerated edges"
} else {
    puts "Error : checkoverlapedges doesn't have the check for degenerated edges"
}
