tests/bugs/vis/bug24606

   1 puts "============"
   2 puts "OCC24606"
   3 puts "============"
   4 puts ""
   5 ####################################################################################
   6 # Tests ::FitDepth and ::FitAll implementation of V3d_View.
   7 ####################################################################################
   8
   9 set check_x 402
  10 set check_y 320
  11
  12 restore [locate_data_file bug24606.brep] shape
  13
  14 vinit View1
  15 vautozfit 0
  16 vsetdispmode 1
  17 vdisplay shape
  18 OCC24606
  19 vmoveto $check_x $check_y
  20
  21 checkcolor $check_x $check_y 0 1 1
  22
  23 if {$stat != 1} {
  24     puts "Error : V3d view ::FitAll is broken."
  25 }
  26 vdump ${imagedir}/${casename}_1.png
  27
  28 vinit View2
  29 vautozfit 1
  30 vsetdispmode 1
  31 vdisplay shape
  32 OCC24606
  33 vmoveto $check_x $check_y
  34
  35 checkcolor $check_x $check_y 0 1 1
  36
  37 if {$stat != 1} {
  38     puts "Error : V3d view ::FitAll is broken."
  39 }
  40 vdump ${imagedir}/${casename}_2.png