tests/bugs/vis/bug26035_6

   1 puts "============"
   2 puts "CR26035"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 #  Drawing dimension between point and edge
   7 #######################################################################
   8
   9 vfont add [locate_data_file DejaVuSans.ttf] SansFont
  10
  11 vinit View1
  12 vclear
  13 vaxo
  14
  15 vertex v1 10 -10 0
  16 vertex v2 10 10 0
  17 edge e v1 v2
  18 vdisplay e
  19
  20 vpoint p 10 0 10
  21
  22 vdimension len -length -shapes p e -plane yoz -font SansFont
  23
  24 vfit
  25
  26 checkview -screenshot -3d -path ${imagedir}/${test_image}.png
  27