tests/bugs/xde/bug23193

   1 puts "============"
   2 puts "OCC23193"
   3 puts "============"
   4 puts ""
   5 ###########################################################################
   6 # Some triangles are inverted when writing an STL file
   7 ###########################################################################
   8 pload QAcommands
   9
  10
  11 set aFile $imagedir/bug23193_sample.stl
  12
  13 vinit
  14 stepread [locate_data_file bug23193_sample.stp] a *
  15 incmesh a_1 1
  16 writestl a_1 ${aFile} 0
  17
  18 meshfromstl m1 ${aFile}
  19 meshcolors m1 elem2 1
  20 vrotate 4 0 0
  21 vfit
  22
  23 set x_coord 189
  24 set y_coord 236
  25
  26 #checkcolor $x_coord $y_coord 0 0 0.7
  27
  28 if { "[vreadpixel $x_coord $y_coord rgb name]" != "MATRABLUE" } {
  29     puts "Error : There is missing triangle"
  30 }
  31
  32 set only_screen 1
  33
  34
  35
  36