0030690: Draw Harness - provide XDisplay command for displaying XDE document
[occt.git] / tests / v3d / dimensions / identic
CommitLineData
404c8936 1puts "===================================================================="
2puts "OCC28162: Draw Harness - eliminate usage of deprecated Local Context"
3puts "Select 2 edges or vertices"
4puts "===================================================================="
5
6vclear
7vinit
8
9box b 10 20 30
10vdisplay b
11vfit
12
13set shift 1
14
15# Create an identic relation from 2 edges.
16#vremove rfaces
17vselmode b 4 0
18vselmode b 2 1
19
20vselect 87 170
21vselect 165 170 $shift
22
ab1f4580 23vrelation redges -identic
404c8936 24
25vdump $imagedir/${casename}_edges.png
26
27# Create an identic relation from 2 vertices.
28vremove redges
29vselmode b 2 0
30vselmode b 1 1
31
32vselect 160 130 170 140
33vselect 240 0 250 10 $shift
34
35vrelation rvertices -identic
36
37vdump $imagedir/${casename}_vertices.png