404c8936 |
1 | puts "====================================================================" |
2 | puts "OCC28162: Draw Harness - eliminate usage of deprecated Local Context" |
3 | puts "Select 2 edges" |
4 | puts "====================================================================" |
5 | |
0d828ac8 |
6 | pload MODELING VISUALIZATION |
404c8936 |
7 | vclear |
0d828ac8 |
8 | vinit View1 |
404c8936 |
9 | |
10 | box b -5 -10 -15 10 20 30 |
11 | vdisplay b |
12 | vfit |
13 | |
14 | set shift 1 |
15 | |
16 | # Create a parallel relation from 2 edges. |
17 | vselmode b 2 1 |
18 | vselect 87 170 |
19 | vselect 165 170 $shift |
20 | |
21 | vrelation r -parallel |
22 | vzoom 0.5 |
23 | |
24 | vdump $imagedir/${casename}_edges.png |