tests/bugs/vis/bug26056

   1 puts "============"
   2 puts "CR26056"
   3 puts "AIS_LengthDimension can not build dimension for face-edge or edge-face"
   4 puts "============"
   5 puts ""
   6 puts "Tests case of edge-face and face-edge input geometry for dimension"
   7 pload MODELING VISUALIZATION
   8 line aLine 0 -100 0 1 0 0
   9 mkedge anEdge aLine -100 100
  10
  11 plane aPlane 0 0 50 0 0 1
  12 mkface aFace aPlane -100 100 -100 100
  13
  14 line aLine2 0 0 100 1 1 0
  15 mkedge anEdge2 aLine2 -150 150
  16
  17 vinit View1
  18 vclear
  19 vaxo
  20 vdisplay anEdge anEdge2 aFace
  21 vdimension aDim1 -length -shapes anEdge aFace -text 15 3d sh
  22 vdimension aDim2 -length -shapes aFace anEdge2 -text 15 3d sh
  23 vfit
  24
  25 set only_screen 1