tests/v3d/dimensions/symmetric

   1 puts "===================================================================="
   2 puts "OCC28162: Draw Harness - eliminate usage of deprecated Local Context"
   3 puts "Select 3 edges or 1 edge and 2 vertices"
   4 puts "===================================================================="
   5
   6 pload MODELING VISUALIZATION
   7 vclear
   8 vinit View1
   9
  10 box b 10 20 30
  11 vdisplay b
  12 vfit
  13
  14 set shift 1
  15
  16 # Create a symmetric relation from 3 edges.
  17 vselmode b 2 1
  18
  19 vselect 280 23
  20 vselect 123 112 $shift
  21 vselect 123 382 $shift
  22
  23 vrelation r3edges -symmetric
  24
  25 vdump $imagedir/${casename}_3edges.png
  26
  27 # Create a symmetric relation from edge and 2 vertices.
  28 vremove r3edges
  29
  30 vselect 0 0
  31 # Select an edge.
  32 vselect 123 112
  33
  34 vselmode b 2 0
  35 vselmode b 1 1
  36
  37 # Select 2 vertices.
  38 vselect 230 0 325 55 $shift
  39
  40 vrelation redge2vertices -symmetric
  41
  42 vdump $imagedir/${casename}_edge_2vertices.png