puts "========"
puts "OCC26664"
puts "========"
puts ""
#################################
# Triangulating a very small polygon fails
#################################

restore [locate_data_file bug26664_f.brep] a

set log2 [incmesh a 1e-4]
vinit
vsetdispmode 1
vdisplay a
vfit
vdump ${imagedir}/${casename}_1.png

if { [regexp "NoError" ${log2}] == 1 } {
   puts "OK : Triangulating a very small polygon is good"
} else {
   puts "Error : Triangulating a very small polygon fails"
}