puts "========="
puts "0026889: Very poor mesh result from shape"
puts "========="
puts ""

pload XDE

stepread [locate_data_file bug26889_export.step] a *

dchrono t restart
incmesh a_1 1.0 1
dchrono t stop counter incmesh

checktrinfo a_1 -tri 73119 -nod 36828 -defl 1.0

set log [tricheck a_1]
if { [llength $log] != 0 } {
  puts "Error : Invalid mesh"
} else {
  puts "Mesh is OK"
}


vinit
vdefaults -autoTriang 0
vsetdispmode 1
vdisplay a_1
vfit
checkview -screenshot -3d -path ${imagedir}/${test_image}.png