tests/bugs/vis/bug24965

   1 puts "============"
   2 puts "OCC24966"
   3 puts "============"
   4 puts ""
   5 ####################################################################################
   6 # Problem in local selection mode with selected objects staying in the viewer
   7 # Outdated entity owners remain selected after recompute of presentation in
   8 # local context.
   9 # The following cases are tested:
  10 # o Recompute should not clear per-object selection (neutral selection context).
  11 # o Recompute should clear per-owner selection (local selection context).
  12 ####################################################################################
  13
  14 set check_recomputed_x 227
  15 set check_recomputed_y 269
  16 set check_untouched_x 239
  17 set check_untouched_y 309
  18
  19 vinit View1
  20 vpoint p1 100 100 0
  21 vpoint p2 150 150 0
  22 vpoint p3 100 150 0
  23 vplane pln1 p1 p2 p3
  24 veraseall
  25 vdisplay pln1 p1 p2 p3
  26 vselect 0 0 2500 2500
  27 vchangeplane pln1 x=100 y=100 z=200 dx=0.707 dy=0.707 dz=0.707
  28 vfit
  29
  30 checkcolor $check_recomputed_x $check_recomputed_y 0.8 0.8 0.8
  31 if { $stat != 1 } {
  32    puts "Error : Neutral selection of updated object is erased."
  33 }
  34
  35 checkcolor $check_untouched_x $check_untouched_y 0.8 0.8 0.8
  36 if { $stat != 1 } {
  37    puts "Error : Neutral selection of unmodified object is erased."
  38 }
  39
  40 vinit View2
  41 vpoint p4 100 100 0
  42 vpoint p5 150 150 0
  43 vpoint p6 100 150 0
  44 vplane pln2 p4 p5 p6
  45 veraseall
  46 vdisplay -local pln2 p4 p5 p6
  47 vselect 0 0 2500 2500
  48 vchangeplane pln2 x=100 y=100 z=200 dx=0.707 dy=0.707 dz=0.707
  49 vfit
  50
  51 checkcolor $check_recomputed_x $check_recomputed_y 0 1 0
  52 if { $stat != 1 } {
  53    puts "Error : Local (renewed) selection of updated object is not updated."
  54 }
  55
  56 checkcolor $check_untouched_x $check_untouched_y 0.8 0.8 0.8
  57 if { $stat != 1 } {
  58    puts "Error : Local selection of unmodified object is erased."
  59 }
  60
  61 vdump ${imagedir}/${casename}_View1.png
  62 vdump ${imagedir}/${casename}_View2.png