tests/bugs/vis/bug25052

   1 puts "REQUIRED All: Error: clipping planes limit"
   2 puts "==========="
   3 puts "OCC25052: Visualization - activation of all Clipping Planes within driver limit leads to broken planes management"
   4 puts "==========="
   5 puts ""
   6
   7 set Image1 ${imagedir}/${casename}_1.png
   8 set Image9 ${imagedir}/${casename}_9.png
   9
  10 box b -30 -30 -30 70 80 90
  11
  12 vinit
  13 vsetdispmode 1
  14 vdisplay b
  15 vfit
  16
  17 vclipplane create p1
  18 vclipplane change p1 equation 1 0 0 -0.1
  19 vclipplane create p2
  20 vclipplane change p2 equation 1 0 0 -0.1
  21 vclipplane create p3
  22 vclipplane change p3 equation 1 0 0 -0.1
  23 vclipplane create p4
  24 vclipplane change p4 equation 1 0 0 -0.1
  25 vclipplane create p5
  26 vclipplane change p5 equation 1 0 0 -0.1
  27 vclipplane create p6
  28 vclipplane change p6 equation 1 0 0 -0.1
  29 vclipplane create p7
  30 vclipplane change p7 equation 1 0 0 -0.1
  31 vclipplane create p8
  32 vclipplane change p8 equation 1 0 0 -0.1
  33 vclipplane create p9
  34 vclipplane change p9 equation 1 0 0 -0.1
  35
  36 vclipplane set p1 view Driver1/Viewer1/View1
  37 vdump ${Image1}
  38 vclipplane set p2 view Driver1/Viewer1/View1
  39 vclipplane set p3 view Driver1/Viewer1/View1
  40 vclipplane set p4 view Driver1/Viewer1/View1
  41 vclipplane set p5 view Driver1/Viewer1/View1
  42 vclipplane set p6 view Driver1/Viewer1/View1
  43 vclipplane set p7 view Driver1/Viewer1/View1
  44 vclipplane set p8 view Driver1/Viewer1/View1
  45 vclipplane set p9 view Driver1/Viewer1/View1
  46 vdump ${Image9}