0030690: Draw Harness - provide XDisplay command for displaying XDE document
[occt.git] / 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 vclear
7 vinit
8
9 box b 10 20 30
10 vdisplay b
11 vfit
12
13 set shift 1
14
15 # Create a symmetric relation from 3 edges.
16 vselmode b 2 1
17
18 vselect 280 23
19 vselect 123 112 $shift
20 vselect 123 382 $shift
21
22 vrelation r3edges -symmetric
23
24 vdump $imagedir/${casename}_3edges.png
25
26 # Create a symmetric relation from edge and 2 vertices.
27 vremove r3edges
28
29 vselect 0 0
30 # Select an edge.
31 vselect 123 112
32
33 vselmode b 2 0
34 vselmode b 1 1
35
36 # Select 2 vertices.
37 vselect 230 0 325 55 $shift
38
39 vrelation redge2vertices -symmetric
40
41 vdump $imagedir/${casename}_edge_2vertices.png