tests/bugs/vis/bug25300_2

   1 puts "============"
   2 puts "CR25300"
   3 puts "============"
   4 puts ""
   5
   6 ##########################################################################################
   7 puts "Visualization - Build wireframe representation consistent with the shape's triangulation"
   8 #
   9 # Case 2: Conic shape where isolines are build outside of its displayed triangulation
  10 ##########################################################################################
  11
  12 pload VISUALIZATION MODELING
  13
  14 pcone aCone 90 0 150 360
  15
  16 set aSimpleIsoImg $imagedir/${casename}_iso.png
  17 set aIsoOnTrgImg $imagedir/${casename}_iso_on_triang.png
  18
  19 vinit View1
  20 vclear
  21 vaxo
  22 vdisplay aCone
  23 vviewparams -scale 122.2874 -proj 0.0353 -0.9281 0.3706
  24 vviewparams -up -0.2791 0.3469 0.8954 -at -5.5784 62.4399 122.7242
  25 vviewparams -eye 12.0732 -401.6167 308.0344
  26 vsetdispmode 1
  27
  28 # shows that default isoline builder has problemas with proper
  29 # construction of isolines on top of the conic surface
  30 vmoveto 300 300
  31 vdump $aSimpleIsoImg
  32 checkcolor 347 179 0 1 1
  33
  34 vmoveto 0 0
  35
  36 # enable isoline-on-triangulation builder
  37 vaspects aCone -isoontriang on
  38
  39 # shows that isoline-on-triangulation builder constructs isos that
  40 # do not extend beyond the boundaries of shape's triangulation
  41 vmoveto 300 300
  42 vdump $aIsoOnTrgImg
  43 checkcolor 347 179 0 0 0